6.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-13.3.0/gfortran/Interoperability-with-C.html