intel-fortran

0熱度

1回答

我想將Fortran代碼與Fortran製作的DLL鏈接起來。簡單的方式... 我想使程序 Fortran程序（編輯代碼） - 友情鏈接的Fortran DLL（不可編輯）（通過Fortran程序代碼??聯法）我不想顯示我的代碼（這部分將以DLL形式）。例如：我在英特爾Fortran的DLL中的代碼是 SUBROUTINE TWICE(x,y) IMPLICIT NONE !DEC$ A

0熱度

1回答

MIXED_STR_LEN_ARG與gfortran

我在混合的C++/Fortran中，程序，其中一個C++字符作爲參數用於Fortran函數。的代碼被編譯和與工作ifort編譯器，使用選項-mixed_str_len_arg，它指定了隱藏的長度爲字符的參數的位置（參見https://software.intel.com/en-us/node/525960）。出於某種原因，我想編譯代碼使用gfortran，但沒有找到任何與此編譯器等效的選項。你

1熱度

1回答

將未知大小的數組（子例程輸出）傳遞給另一個子例程

我是英特爾MKL的新手。這是我遇到的一個問題 - 顯然是一個與MKL本身無關的問題，但是涉及如何聲明並傳遞一個前所未知大小的數組作爲子例程的輸出到另一個子例程的問題。我試圖用mkl_ddnscsr一個矩陣其CSR格式轉換成適合用於調用由PARDISO： CALL mkl_ddnscsr(job,Nt,Nt,Adns,Nt,Acsr,ja,ia,info) CALL PARDISO(pt,1,

0熱度

1回答

Gfortran沒有模塊函數，但ifort做

一旦O嘗試編譯依賴於funits的Fortran代碼。而它在gfortran 4.9.3中不可用。 use FUNITS 1 Fatal Error: Can't open module file 'funits.mod' for reading at (1): No such file or directory 這裏是gfortran信息 gfortran -v Us

1熱度

2回答

在Fortran中編寫DLL /從Excel調用

我試圖在Fortran中編寫一些數字功能，以便以後可以在Excel中訪問這些功能。我使用的是Office 2013（64位），Visual Studio 2015「Community」和Intel Fortran（Intel Parallel Studio XE 2017）;我能夠正確編譯可執行程序。我也能夠生成DLL文件，我認爲這是正確的。這裏有一個最小的Fortran代碼示例我從this t

2熱度

1回答

Fortran動態庫，在運行時加載？

有沒有可能讓Fortran程序在運行時加載Fortran庫？如果是這樣，是否有可能修改一個函數並僅重新編譯該庫以使原始編譯的程序在運行時在庫中調用修改的函數？如果任何人都可以提供一個最基本的工作示例，說明如何實現這一目標將會很棒。

0熱度

1回答

錯誤LNK1104：無法打開文件 'ifconsol.lib' 使用f2py和英特爾Fortran

系統信息的Windows 10家64位（10.0，建設14393）的Python 3.5.2 |蟒蛇4.1.1 （64位）| 英特爾Parallel Studio XE 2017年問題遇到我試着按照f2py用戶手冊中的示例和本地目錄推出cmd，然後鍵入以下 f2py -c fib1.f -m fibtest ，一切似乎OK直到 Found executable C:\Program F

0熱度

1回答

正確的方法將指針傳遞到許多子例程

我不是一個很好的程序員，我只是試圖與提供數據作爲指針的模型進行接口。這些指針在寫入數據之前通過幾個子例程傳遞。我不知道如何做到這一點，以避免內存泄漏。比方說，我有一個數組指針A在寫入之前傳遞給幾個子例程，我該如何處理聲明，分配和釋放？ module data implicit none contains subroutine s1(a) real, pointer, intent(o

1熱度

1回答

無法檢測文件是否存在

在我正在改進的程序中，我注意到Fortran沒有檢測到文件存在與否。這導致了一個尚未修復的邏輯錯誤。我非常感謝您能否指出問題或錯誤，並給我更正。 open(unit=nhist,file=history,iostat=ierr)!This setting cannot exit program if file does not exist because ierr is always 0

0熱度

1回答

Fortran指針錯誤：「名稱中的字符無效」

我有一個名爲m_mixing.F90的文件。在這個文件中，有哪些是給編譯錯誤的函數： function getstackval(mix,sidx,hidx) result(d1) type(tMixer), intent(in) :: mix integer, intent(in) :: sidx integer, intent(in), optional :: h