文章目錄

• • 編譯dll
  • 調(diào)用dll
  • 數(shù)據(jù)類型對應(yīng)
  • 在C語言中調(diào)用

前情提要：

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

編譯dll

下面寫個最簡單的fortran的函數(shù)，實(shí)現(xiàn)整數(shù)加法

! 文件名 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，完成動態(tài)鏈接庫的編譯。

調(diào)用dll

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

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

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

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

數(shù)據(jù)類型對應(yīng)

一旦涉及到混合編程，第一步就是統(tǒng)一數(shù)據(jù)類型，C和fortran的基本類型對應(yīng)如下表

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來調(diào)整整型或浮點(diǎn)型的位長，而在C中，則通過不同的關(guān)鍵字來表示。其中，

• 實(shí)型real的4位、8位和16位，分別對應(yīng)C中的float, double, long double
• 整型integer的1、2、4、8位，分別對應(yīng)C中的singed char, short, int, long long int
• 邏輯logical的1、2、4、8位，與integer表現(xiàn)相同。

此外，字符串將被轉(zhuǎn)化為數(shù)組，復(fù)數(shù)則被轉(zhuǎn)換為結(jié)構(gòu)體

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語言中調(diào)用

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

別把數(shù)據(jù)類型搞混，這個在上一節(jié)已經(jīng)給出了對應(yīng)關(guān)系

需要在fortran函數(shù)的后面添加一個下劃線，所以add2i在C語言中調(diào)用時寫為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); }

然后編譯運(yùn)行

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

總結(jié)

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

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。