FORTRAN的案例
問：是不是fortran 90之后所有新fortran程序標準后綴都是.f90了
答：
是的，Fortran 90之后的新Fortran程序通常使用.f90作為文件的后綴。這個約定有助于區分舊版Fortran程序（如Fortran 77），使用.f90后綴可以提醒其他人該文件采用了Fortran 90及以上的語法和特性。
雖然.f90是最常見的后綴，但實際上，一些編譯器也支持其他后綴名，如.f95、.f03等，以便與不同版本的Fortran兼容。具體使用哪種后綴名可能會因編譯器和項目要求而有所不同。
總之，對于Fortran 90及以上的新程序，使用.f90后綴是較為常見和推薦的做法。
展開 史上最全面的Fortran的內置函數說明，讓你遨游Fortran世界
Fortran作為一門主要用于數值計算的編譯型程序語言，其內置了大量針對數值計算的內置函數，使得Fortran程序員在進行數值計算時游刃有余。
例如：
計算兩個向量的點積，使用Fortran語言僅需要用以下方式編寫：
program main
implicit none
real::a(5)
real::b(5)
real::c
a=(/2,3,4,5,6/)
b=(/1,2,3,4,5)
c=dot_product(a,b)
write(*,*)c
End Program main
同理，如果是計算向量的模，則可以采用：
C=dot_product(a,a)**0.5
也可以采用：
C=norm2(a)
后者是采用norm2函數計算向量的二范數
計算矩陣與矩陣相乘：
Matmul(a,b)
獲取數組的最大值：
Maxval((/2,3,4,6,4/))=6
獲取數組中最大值的位置：
Maxloc：
Maxloc((/2,3,4,6,4/))=3
符號函數：
Sign(4.0,-6.0)=-4.0
Sign(4.0,6.0)=4.0
現在上傳Fortran的內置函數的全部說明以供大家需要時查找，關注公眾號：有限元術。在公眾號 有限元術 后臺回復 “ Fortran函數 “ 即可獲取Fortran全部內置函數的說明的下載鏈接。
展開 標準程序設計語言叢書 Fortran 90
標準程序設計語言叢書 Fortran 90
標準程序設計語言叢書 Fortran 90.part01.rar
標準程序設計語言叢書 Fortran 90.part02.rar
標準程序設計語言叢書 Fortran 90.part03.rar
標準程序設計語言叢書 Fortran 90.part04.rar
標準程序設計語言叢書 Fortran 90.part05.rar
標準程序設計語言叢書 Fortran 90.part06.rar
標準程序設計語言叢書 Fortran 90.part07.rar
標準程序設計語言叢書 Fortran 90.part08.rar
標準程序設計語言叢書 Fortran 90.part09.rar
標準程序設計語言叢書 Fortran 90.part10.rar
標準程序設計語言叢書 Fortran 90.part11.rar
標準程序設計語言叢書 Fortran 90.part12.rar
標準程序設計語言叢書 Fortran 90.part13.rar
標準程序設計語言叢書 Fortran 90.part14.rar
標準程序設計語言叢書 Fortran 90.part15.rar
標準程序設計語言叢書 Fortran 90.part16.rar
展開 PGI Fortran 編譯器
PGI Visual Fortran包括最新版的PGI本機OpenMP，以及支持FORTRAN77和Fortran95編程語言的自動并行化編譯器，主要特性包括一整套:
由面向Fortran的文本編輯器、Fortran本征函數提示和選擇關鍵字組成的Visual Studio Fortran項目系統； Fortran 應用程序自定義創建引擎；
自定義調試引擎，提供Fortran所需的語言專用調試功能；
支持單線程、多線程及OpenMP并行應用程序調試；
兼容Microsoft Visual C++ 2008；
支持調試PGI Fortran和Visual C++ 2005的混合應用程序
PGI的編譯器及開發工具都具有如下特性：完全本機支持OpenMP并行編程擴展、在多核心處理器上的自動并行化、完全支持64位尋址、本機集成標量和矢量SSE/SSE2/SSE3代碼生成，以及PGI 世界領先的優化基礎設施。
PGI Visual Fortran是為64位的AMD64和英特爾的EM64T及32位的x86處理器高度優化的，其創建PGI Unified Binary?的功能是業內獨一無二的。PGI Unified Binary?是一個能夠在兩個處理器平臺上運行的可執行文件，內含針對AMD64和EM64T處理器優化的代碼序列。PGI Unified Binary使獨立軟件開發商(ISV)和自定義應用程序開發人員認識到一個64位平臺的優點，同時還能充分利用英特爾和AMD公司開帶來的最新創新技術
展開 
Fortran語言的自由格式與固定格式
在早期的代碼中，以固定格式居多，但作為2021年的Fortran程序員，一般情況下，我們應當盡量使用自由格式編寫Fortran程序。某些軟件例如通用有限元軟件Abaqus的子程序在默認情況下會限定必須采用固定格式。但是事實上我們可以通過修改安裝目錄下的.env文件使得其可以采用自由格式編寫。
想獲得關于Fortran語法知識的教程，歡迎掃碼關注公眾號 有限元術并回復“fortran教程”獲得Fortran教程下載鏈接。
Fortran基礎編程（入門簡介篇）
Fortran
是一門上世紀古老的科學計算語言，具有強大的計算能力，雖然沒有現在的主流語言熱門，但對于想從事有限元二次開發的童鞋來言，是一個不得不跨過去的檻兒，Fortran語言用于自己領域進行開發計算時，往往不需要高深的算法，只需了解簡單的語法規則及循環之類結構即可。木木在剛開始學習Fortran時，遇到疑惑會問一問身邊的同學有沒有用過Fortran，大多數情況是，Fortran?那是啥語言？我......現如今使用的人確實很少，若不是自己對二次開發感興趣，我也不會去觸碰它~
本文先向大家簡單介紹一個二分法的fortran程序，然后推薦大家使用一些輕便的編譯器，最后推薦一下學習的書籍、論壇。
Fortran程序分為自由格式與固定格式，固定格式太太太難看了，閱讀起來也很費力，但大多數遺留下來的有限元程序是按照固定格式來編譯的（木得辦法），自由格式閱讀起來就比較友好了，接下來就用自由格式來編寫一個二分法程序，固定格式相關的將會在以后的推文中涉及。程序在文末！
本程序采用Module將代碼塊進行封裝，程序中用到的變量、function、subroutine，整理到Module中，用的時候只需要Use一下就可，如行48。程序中一些語法、注意的細節將會在以后專門設立一個Fortran的欄目中進行講解。
木木最開始用的編譯器是VS+IVF，后來發現VS占用系統資源很多，卸載也很麻煩，用起來不順手，現在我用的是Simply Fortran編譯器，小巧輕便（100M左右），很很很好用，Simply Fortran安裝包及簡單的說明手冊在文末獲取。界面大致長這個樣子：
B站有的教學視頻也用的是這個編譯器，大家有興趣可以看一下。
展開 鏈接 ABAQUS 和 FORTRAN ￥2
鏈接 ABAQUS 和 FORTRAN
ABAQUS 和 FORTRAN 鏈接以執行用戶子例程，例如 VUMAT、UMAT、USDFLD 等。
您可以找到各種版本的 ABAQUS 和 FORTRAN Available。以下是兼容性列表：
ABAQUS 2017 - Intel Composer XE 2013 或更高版本，
- Visual Studio 2010 或更高版本
v6.14 - Intel Visual Fortran 12.0 或更高版本
- Visual Studio 2010 或更高版本
可以從這里免費下載 FORTRAN 的學生版：
https://software.intel.com/en-us/qualify-for-free-software/student
第 1 步：安裝
安裝 SIMULIA ABAQUS 的副本，然后安裝 Visual Studio 和 Visual Fortran。確保你也安裝了 Visual Studio 的 C++ 組件。
第 2 步：Fortran 編譯器
在 FORTRAN 的安裝目錄中找到 ifort.exe 和 ifortvars.bat。
復制剪輯板上的地址。
展開 按 Fortran 順序顯示 Numpy 數組
Fortran 順序/數組是一種特殊情況，其中數組的所有元素都按列優先順序存儲。有時我們需要以 fortran 順序顯示數組，因為這個 numpy 有一個稱為 numpy.nditer（） 的函數。
Simply Fortran 保姆級教程（內附安裝包）
之前發過有關Simply Fortran的安裝包以及食用方法，還是有一些同學感覺相對比較陌生，木木在此重新梳理一下該Fortran編譯器的"Step-By-Step"步驟，以及解決之前的安裝包鏈接失效問題，公眾號：易木木響叮當 后臺回復：Simply，即可自動獲取。
Step 1
建議將所有程序文件加入到一個項目工程.prj里面，一個主程序，其他都寫為子程序，運行時，只需要對主程序文件一鍵編譯，運行即可。
圖 1 添加工程項目
Step 2 對照不同的程序，多窗口查看。
圖 2 窗口平鋪
Step 3 運行之前應該先編譯，這很重要！初學者易忽略。
圖 3 編譯、運行
Step 4 改動文件再運行時，應先“Ctrl+S”,不然會出現如下錯誤，Simply Fortran 會將出錯的文件名及對應行進行標記，雙擊即可跳轉該行。分享常用的快捷鍵：Ctrl+R 注釋；Ctrl+T 取消注釋。
圖 4 錯誤提示
Step 5
圖 5 編譯成功
Step 6 一個項目工程文件夾由編譯文件、可運行文件.exe、程序文件（fortran代碼）、項目文件.prj 組成
圖 6 項目工程文件組成
Step 7 簡單設置，行號、背景顏色、固定格式列標記。
Options--Editor
圖 7 基礎設置
關于固定格式的列標記，木木想再進一步給大家演示一下，Fortran 的固定格式只能在第 7~72 個字符位置編寫程序，第 6 個字符位置放置 0 以外的數字表示續行，第 1~5 個字符放置數字表示行代碼，或空格，Simply Fortran對于后綴名為 .f、.for 的文件就可以很方便的顯示第 6 和第 72 個字符的位置。
展開 ABAQUS配置Fortran子程序
ABAQUS配置Fortran子程序
在完成ABAQUS安裝的基礎上，先安裝VS2019，后安裝Fortran。
一、安裝VS
1.下載VS2019和Fortran2020(VS,fortran和ABAQUS版本相差不是太大即可）
2.打開安裝包
3.打開VS2019安裝包，解壓VS2019_0.zip。
4.點擊進入解壓后VS2019_0文件夾
5.隨便選一個版本進行安裝，這里選Setup_Professional0（其他也可嘗試。）點擊右鍵以管理員身份運行。
6.等待后，點擊繼續
7.繼續等待
8.等待后進入如下界面，選擇需要安裝的內容（選擇C++開發即可，下圖紅框內容）
9.等待安裝
10。可以重啟或以后再說，表明安裝完成。
11.在開始界面找到VS，右鍵點擊以管理員身份運行，看是否可用。
12.選擇not now，maybe later
13.選擇喜歡的點開始
14.可點開紅框，并創建一個程序進行嘗試。如正常運行，說明VS安裝成功。
二、安裝Fortran
1.找到fortran安裝包。
2.點擊右鍵裝載（或解壓）。
3.進入文件夾，找到install右鍵以管理員身份運行。
4.等待進入安裝界面
5.選擇需要安裝的位置和內容，這里均選默認（可根據需要修改）。
6.按照圖示選擇，并點擊Next
7.選擇Choose alternative activation。
展開 Fortran基礎編程——牛頓拉弗森迭代
今日推文主要分享一個非線性方程的牛頓-拉弗森迭代解法，借助Fortran語言，講述Fortran編程時需要注意的地方。理論及在Abaqus中的實現過程已在上幾期推文基于Abaqus的Newton-Raphson算法中說明，本次主要說明Fortran編程時需要注意的地方，本文代碼主要參考：《Fortran程序設計權威指南》。
例：
主程序
主程序：Solve.f90，子程序：New_Raphson.f90，函數文件：function.f90，Module模塊：NEWTON.F90。將整個程序分塊編寫，在主程序中調用即可，大型的Fortran中顯得尤為重要。
主程序代碼：
PROGRAM main
! 主程序：Newton迭代法計算方程的根
use NEWTON
OPEN(UNIT=11,FILE='FOUT1510.TXT')
OPEN(UNIT=12,FILE='IM_RESULT1510.TXT')
CALL SOLVE(X,ITER)
WRITE(11,46)X,ITER
46 FORMAT(T5,'Newton迭代法計算方程的根',//,&
3X,'X= ',F15.10,/,&
3X,'ITER=',I5)
END PROGRAM main
由上述程序可看出，主程序只有use、call、輸出語句，甚至可以將輸出語句編一個子程序，在主程序中用call調用即可，如此以來，使得自己的代碼更加簡潔明朗，在編寫Python、Matlab也是同樣的道理。
展開 
避坑abaqus+VS+Fortran子程序關聯問題
image_process=/format,webp" data-initial-src="https://img.jishulink.com/202602/attachment/cf9098b561244a699652bd86f64b523e.png">
</figure>
</figure><p><br></p><p>只是運行abaqus子程序，只需要安裝Fortran編譯器就行了，但是Intel Fortran編譯器需要集成VS開發環境，所以需要先裝Visual studio。筆者就只安裝了上圖中Fortran Compiler，同樣可以關聯VS和abaqus，并成功運行子程序。Intel官方也提供了Fortran Compiler單獨的安裝包。如下圖，只有335M，下載安裝很方便。
展開 ABAQUS DLOAD (子程序3) 自定義荷載 (附Fortran和input) ￥10
該例子可用于校核 ABAQUS關聯Visual Studio和Fortran compiler時 該關聯是否成功；通過簡單的Fortran代碼理解用Fortran自定義荷載時，Fortran代碼與ABAQUS主程序的接口問題；該例子適合新手入門，如何用Fortran自定義荷載
所編DLOAD子程序
對應用于校核該DLOAD子程序的Abaqus inp文件
Fortran調用Matlab引擎的簡單辦法
一、前言
1、這是FORTRAN和MATLAB混編的一種辦法，當然還有其它辦法，根據程序特點，不同的辦法有各自的好處；
2、這里做簡要介紹，可以進行MATLAB的簡單調用。更復雜的應用需要參考其它資料；
3、歡迎更正和更新。
二、準備工作
1、將例如“D:\Program Files\MATLAB\R2010b\bin”的MATLAB安裝目錄加到計算機環境變量-用戶變量-path中，重啟系統；
2、將例如“D:\Program Files\MATLAB\R2010b\extern\lib\win32\microsoft”中的所有.lib文件加入到新建的Fortran工程中；
三、具體編程
1、打開MATLAB的engine；
a) 申明：INTEGER,EXTERNAL :: engOpen；INTEGER :: EP
b) EP = engOpen(‘MATLAB’) ！EP =0: 啟動失敗；EP/=0：啟動成功；
2、將Fortran數據傳遞給MATLAB；
a) 申明：INTEGER,EXTERNAL :: mxCreateDoubleMatrix，mxGetPr，engPutVariable；INTEGER :: T,Status；REAL*8 :: Variables(M,N)
b) T = mxCreateDoubleMatrix(M,N,0)；!申請內存，建立矩陣
c) CALL mxCopyReal8ToPtr(Variables, mxGetPr(T),M*N)；!將
d) Status = engPutVariable(EP,'x',T)；!
展開 abaqus用fortran寫子程序的語法規則
abaqus用fortran寫子程序的語法規則
abaqus用fortran寫子程序時個人覺得語法上偏FORTRAN77，因此，收集了下的FORTRAN 77 語法概述。
以下為轉載內容：http://blog.sina.com.cn/s/blog_6e0aa6420100pu9p.html
