abaqus的Fortran子程序中使用自由格式與固定格式

        帖子Fortran語言的自由格式與固定格式指出Abaqus的Fortran子程序在默認狀態(tài)下只能使用固定格式,而實際上自由格式更為靈活好用,其一行不受72個字符的限制,并且可以將多個語句寫在同一行,同時續(xù)行符相對于固定格式也更為好用。同時自由格式能夠采用很多現(xiàn)代Fortran的語法來編寫程序,簡化程序編寫,有相當大的優(yōu)勢。另外一方面,目前現(xiàn)存很多代碼,課題組祖?zhèn)鞒绦虼蠖嗍枪潭ǜ袷骄帉懀@些代碼量多,質量久經考驗,我們在新編代碼中又希望能使用他們,那么有沒有方法在一個文件中同時使用兩種風格的代碼呢。答案是可以的,本文主要描述下如何實現(xiàn)在abaqus中采用Fortran自由格式編程以及自由格式和固定格式混編。

        以for文件默認是固定格式,可以通過!DIR$ FREEFORM 和 !DIR$ NOFREEFORM  分別控制代碼個編譯格式。以下兩個例子詳細描述。      

        1.    文檔中自由格式和固定格式混合。

QQ圖片20210513112453.png

計算結果:

QQ圖片20210513112647.png

        2.    一個子程序中自由格式和固定格式混寫。

這種情況基本很少遇到,這是個騷操作,我也不過多介紹,直接搬運IVF官方例子:

QQ圖片20210513112936.png

        總結:Abaqus的for文件可以采用自由格式編寫,或者自由格式和固定格式混編。只需要在文件中加上!DIR$ FREEFORM 和 !DIR$ NOFREEFORM 進行格式控制就行,不用修改環(huán)境文件和使用格式轉換鵝毛筆,這種方法簡單實用,希望對大家有所幫助。

登錄后免費查看全文
立即登錄
App下載
技術鄰APP
工程師必備
  • 項目客服
  • 培訓客服
  • 平臺客服

TOP

20
17
35