文章目錄

• • 編譯dll
  • 調用dll
  • 數據類型對應
  • 在C語言中調用

前情提要：

• 1 安裝和編譯💎 2 數據類型💎 3 過程和子過程💎 4 判斷和循環
• 5 數組💎 6 字符串💎7輸入輸出💎8 模塊和包管理

編譯dll

下面寫個最簡單的fortran的函數，實現整數加法

! 文件名 add_dll.f95 integer function add2i(x, y)integer, intent(in) :: x, yadd2i = x + y end function add2i

然后在命令行中用gfortran編譯，具體命令為

$ gfortran -c add_dll.f95 $ gfortran -shared -o add_dll.dll add_dll.o

其含義為，第一步通過源代碼生成.o文件，第二步通過.o文件，得到add_dll.dll，完成動態鏈接庫的編譯。

調用dll

生成動態鏈接庫之后，可先在fortran中小試一下，由于test2i是在外部定義的，所以在類型聲明時，需要用到external關鍵字

! 文件名dll_test.f95 program dll_testimplicit noneinteger :: ainteger, external :: add2ia = add2i(1, 2)write (*,*) "1 + 2 = ", a end program dll_test

然后在編譯的時候別忘了鏈接剛剛編好的dll，結果如下。

>gfortran -o test dll_test.f95 -L. add_dll.dll >test.exe1 + 2 = 3

數據類型對應

一旦涉及到混合編程，第一步就是統一數據類型，C和fortran的基本類型對應如下表

Fortran 95C大小對齊

BYTE	char	1	1
REAL	float	4	4
INTEGER	int	4	4
LOGICAL	int	4	4
CHARACTER x	unsigned char	1	1

在fortran中可通過kind來調整整型或浮點型的位長，而在C中，則通過不同的關鍵字來表示。其中，

• 實型real的4位、8位和16位，分別對應C中的float, double, long double
• 整型integer的1、2、4、8位，分別對應C中的singed char, short, int, long long int
• 邏輯logical的1、2、4、8位，與integer表現相同。

此外，字符串將被轉化為數組，復數則被轉換為結構體

Fortran 95C大小對齊

CHARACTER (LEN=n) x	unsigned char x[n] ;	n	1
DOUBLE COMPLEX x	struct {double dr, di;} x;	16	4/8
COMPLEX x	struct {float r,i;} x;	8	4
COMPLEX (KIND=4) x	struct {float r,i;} x;	8	4
COMPLEX (KIND=8) x	struct {double dr,di;} x;	16	4/8
COMPLEX (KIND=16) x	struct {long double dr,di;} x;	32	4/8/16

在C語言中調用

C語言調用動態鏈接庫這個大家都很熟悉了，調用fortran生成的動態鏈接庫也沒有什么不同，但有三點需要注意

別把數據類型搞混，這個在上一節已經給出了對應關系

需要在fortran函數的后面添加一個下劃線，所以add2i在C語言中調用時寫為add2i_

需要將傳入變量改為指針的形式

#include<stdio.h> int add2i_(int*, int*); int main(){int x=1, y=2;int a = add2i_(&x, &y);printf("1+2=%d", a); }

然后編譯運行

>gcc -o test.exe test.c -L./ -ladd_dll >test 1+2=3

總結

以上是生活随笔為你收集整理的fortran教程9：和C语言混合编程的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。