從Fortran中調用C＃

Question

我還沒有在Stack Overflow上發現任何討論從Fortran調用C＃的帖子（我正在使用Visual Studio 2010和Intel Visual Fortran進行安裝）。然而，有一個（非常）有限的帖子[1,2,3]討論了從fortran中調用C/C++。

在對這些帖子的回覆之一中，有人建議從Fortran調用C++比調用C更復雜，這引發了我對C＃可能更棘手的懷疑嗎？缺乏C/C++/C＃基礎，我想知道C/C++的程序是否適用於C＃？

我在這些帖子中注意到的一個共性是需要名爲ISO_C_BINDING的內在模塊。在閱讀了關於它的更多信息之後，我不清楚ISO_C_BINDING是否允許我將一些值得信息的2D數組傳遞給用C＃編寫的程序（編譯爲DLL），調用一些「事件」 （類似於函數？），最後從C＃中獲取二維數組信息，然後繼續介紹我在Fortran中的業務。

如果熟悉Fortran和C＃，可以請告訴我ISO_C_BINDING是否足以完成任務？我從上面列出的信息中得不到這種意義。如果任何人有一個工作的例子，包括之間C＃和Fortran傳遞數組，以及調用C＃從Fortran語言功能，我非常高興有機會來看看它在作爲一個模板，我怎麼可能繼續。謝謝，埃裏克

Answer 1

Fortran代碼：

function TestPass (floatArray) result (iRes) 
implicit none 
dll_export :: TestPass ! export function name 

integer :: Ires 
real, intent (in out) :: floatArray 

dimension floatArray(5) 

iRes = 0 ! Assign function result 

open (5,FILE='output.txt') 
write (5, 100) floatArray(3) 

floatArray(0) = 0.0 
floatArray(1) = 1.1 
floatArray(2) = 2.2 
floatArray(3) = 3.3 
floatArray(4) = 4.4 

! correct values are written to file here... 
open (5,FILE='output.txt') 
write (5, 100) floatArray(3) 
100 format(5X,'got here',5X,F3.3) 
close (5) 
end function 

C＃代碼：

static extern int TestPass (
[MarshalAs(UnmanagedType.LPArray, SizeConst=5, 
ArraySubType=UnmanagedType.R4)] 
float [] yields); 

private void BtnTestClick(object sender, System.EventArgs e) 
{ 
float [] floatArray = new float[5] {9.9F, 9.9F, 9.9F, 9.9F, 9.9F}; 
TestPass(floatArray); 

// floatArray.Length == 0 after the function call 

for (int i = 0; i < floatArray.Length; i++) 
Trace.WriteLine(floatArray[i]); 
} 

也可參考此鏈接：

http://software.intel.com/en-us/articles/calling-fortran-function-or-subroutine-in-dll-from-c-code

您也可以參考一些關於它的理論：

http://www.ibiblio.org/pub/languages/fortran/ch2-4.html