




版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報或認(rèn)領(lǐng)
文檔簡介
1、1.1 FORTRAN語言不區(qū)分大小寫,文件擴(kuò)展名為for,正文從第7列開始,第15列是標(biāo)號區(qū),第六列是續(xù)行標(biāo)志區(qū)。1.2 FORTRAN語言中的“I-N規(guī)則”:I、J、K、L、M、N開頭的為整型變量,其他開頭為實(shí)型變量;2 DIMENSION COORDS(3表示聲明一個含3個元素的數(shù)組,下標(biāo)分別為1、2、3,訪問形式為COORDS(n,n為13;3 子程序(*.for文件中如何輸出調(diào)試信息:WRITE(6,*'COORDS(1',COORDS(1,在*.dat文件中可看到輸出,如果希望WRITE輸出到msg文件中,則寫為WRITE(7,*'COORDS.;4 用戶子
2、程序DLOAD中COORDS數(shù)組的含義:COORDS(1也是一個數(shù)組,存貯單元集合中所有單元積分點(diǎn)的X坐標(biāo),COORDS(2存貯Y坐標(biāo),相應(yīng)INP文件中的寫法為:*DLOADPY,PYNU其中PY為單元集合名稱,定義方法為:*Elset, elset=BEAM, generate1, 5, 1.*ELSET,ELSET=PYBEAM5 DLOAD中F的定義方法:F只有定義在單元積分點(diǎn)上才有效,例如:F=1.0*COORDS (1附一個簡單實(shí)例:beam.inp文件:*Heading* Job name: Job-1 Model name: beam*Preprint, echo=NO, mod
3、el=NO, history=NO, contact=NO* PARTS*Part, name=PART-1*End Part* ASSEMBLY*Assembly, name=Assembly*Instance, name=PART-1-1, part=PART-1*Node1, 0., 0.2, 20., 0.3, 40., 0.4, 60., 0.5, 80., 0.6, 100., 0.*Element, type=B311, 1, 22, 2, 33, 3, 44, 4, 55, 5, 6*Elset, elset=BEAM, generate1, 5, 1* Region: (Se
4、ction-1-BEAM:BEAM, (Beam Orientation:BEAM* Section: Section-1-BEAM Profile: Profile-1*Beam Section, elset=BEAM, material=STEEL, temperature=GRADIENTS, section=RECT 0.2, 5.0.,0.,-1.*End Instance*Nset, nset=ENDS, instance=PART-1-11, 6*Nset, nset=_M4, internal, instance=PART-1-16,*Nset, nset=_M5, inter
5、nal, instance=PART-1-11,*End Assembly* MATERIALS*Material, name=STEEL*Elastic210000., 0.3*ELSET,ELSET=PYBEAM* BOUNDARY CONDITIONS* Name: Disp-BC-1 Type: Symmetry/Antisymmetry/Encastre*Boundary_M4, ENCASTRE* -* STEP: Step-1*Step, name=Step-1*Static* Name: CFORCE-1 Type: Concentrated force*DLOADPY,PYN
6、U* OUTPUT REQUESTS* FIELD OUTPUT: F-Output-1*Output, field, variable=PRESELECT* FIELD OUTPUT: F-Output-2*Output, field*Element OutputSF,* HISTORY OUTPUT: H-Output-1*Output, history*Node Output, nset=ENDSCF1, CF2, CF3, CM1, CM2, CM3, RF1, RF2RF3, RM1, RM2, RM3, U1, U2, U3, UR1UR2, UR3*El Print, freq=999999*Node Print, freq=999999*End Stepbbb.for文件SUBROUTINE DLOAD(F,KSTEP,KINC,TIME,NOEL,NPT,LAYER,KSPT,COORDS,1 JLTYP,SNAMECINCLUDE 'ABA_PARAM.INC'CDIMENSION TIME(2, COORDS (3CHARACTER*80 SNAMEWRITE(6,*'
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 油菜雙密雙高多抗技術(shù)
- 2024國際運(yùn)輸市場動態(tài)及試題及答案
- 考點(diǎn)26化學(xué)平衡狀態(tài)、化學(xué)平衡的移動(核心考點(diǎn)精講精練)-備戰(zhàn)2025年高考化學(xué)一輪復(fù)習(xí)考點(diǎn)幫(新高考)(原卷版)
- 物流風(fēng)險管理策略試題及答案
- jetson 系列移植指南 Jetson-Xavier-NX-and-Jetson-TX2-Series-Interface-Comparison-Migration-Application-Note-v1.0
- 高效復(fù)習(xí)CPMM試題及答案
- 國際物流師考試的案例分析題試題及答案
- 2024年CPMM考前沖刺策略與試題及答案
- 2024年國際物流師的考試題目解析試題及答案
- 際物流師考試中的重要法規(guī)試題及答案
- 第10章 流體的力現(xiàn)象 綜合素質(zhì)評價卷(含答案)2024-2025學(xué)年教科版八年級物理下冊
- 中國血管性認(rèn)知障礙診治指南(2024版)解讀
- 《壓縮空氣系統(tǒng)培訓(xùn)》課件
- 電腦采購安裝施工方案
- 2025年中考語文復(fù)習(xí):散文閱讀 試題解析+習(xí)題演練
- 物業(yè)客服主管轉(zhuǎn)正述職報告
- 《中國成人支氣管擴(kuò)張癥診斷與治療專家共識2021》
- 中學(xué)美術(shù)《剪紙藝術(shù)》完整課件
- Unit 8 單元基礎(chǔ)練習(xí) 人教版英語八年級下冊
- 【基于Django框架的網(wǎng)上商城設(shè)計(jì)(論文)6800字】
- 2024光伏支架技術(shù)規(guī)范
評論
0/150
提交評論