7.1 Взаимодействие с C
С Fortran 2003 (ISO/IEC 1539-1:2004(E)) появился стандартизированный способ создания объявлений процедур и производных типов, а также глобальных переменных, совместимых с C (ISO/IEC 9899:1999). Атрибут bind(C) был добавлен, чтобы сообщить компилятору, что символ должен быть совместим с C; также добавлены некоторые ограничения. Однако обратите внимание, что не все возможности C имеют эквивалент в Fortran и наоборот. Например, ни целые числа без знака C, ни функции C с переменным числом аргументов не имеют эквивалента в Fortran.
Обратите внимание, что размерности массивов в C задаются в обратном порядке, и что массивы в C всегда начинаются с индекса 0, а в Fortran — по умолчанию с 1. Таким образом, объявление массива A(n,m) в Fortran соответствует A[m][n] в C, а обращение к элементу A(i,j) соответствует A[j-1][i-1]. Элемент, следующий за A(i,j) (C: A[j-1][i-1]; предполагая i < n) в памяти — A(i+1,j) (C: A[j-1][i]).
© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-11.1.0/gfortran/Interoperability-with-C.html