ABAQUS如何在用戶子程序讀取文件? 20
瀏覽:1952 回答:2
最近在做一個聯(lián)合仿真的算例要用到vdisp,因為邊界條件是從另一個軟件輸出的,所以就在用戶子程序里加了一小段代碼,用于讀取數(shù)據(jù)
open(unit=12,file='E:\Documents\Code\Fortran
1 \TestFortra\variable.txt',
2 status='old')
read(12,*)ang
close(12)
ang是預(yù)先定義的數(shù)組,在vs里調(diào)試了代碼沒有問題,但是加在子程序里就會報錯,而且看不出時什么錯誤,有沒有哪位大神之前做過類似的算例,能給一點指點,子程序能不能實現(xiàn)數(shù)據(jù)讀取呢






















C*************************************************************************************
C 調(diào)試
C*************************************************************************************
c OPEN(UNIT=1000,FILE='E:/OUTPUT.DAT',position='append')
c WRITE(1000,*) sigmat,stressNew(km,1)
c CLOSE(1000)
C*************************************************************************************
這是我用來寫文件的,沒有出現(xiàn)問題。有可能是你文件號跟系統(tǒng)默認(rèn)的沖突了,你試下把12改成1000呢