- 积分
- 0
- 注册时间
- 2006-12-8
- 仿真币
-
- 最后登录
- 1970-1-1
|
本帖最后由 maocp 于 2013-3-7 21:55 编辑
現有複合材料疊層SHELL99 共24層
想得到每一層的最大破壞節點號碼以及最大破壞節點TASI-WU的數值
最後將12個數值儲存起來 來配合C++基因演算法做比較
請問該如何撰寫
下面是我的寫法
不知該如何直接存取最大值出來 ,所以將每層每個節點都存下來
可這樣子效率並不高
麻煩大家幫我改寫,並看看哪裡有錯
以及存檔格式(E13.6) 定義是如何? 我只直接把網路上的格式複製下來使用
NODENUM=855 !節點總數目
*DIM,TWSI,ARRAY,TWSI*NODENUM !定義TWSI矩陣存放大小
*CFOPEN,DISP,TXT,C:\HE,, !開啟文件檔儲存位置
*DO,N,1,NODENUM,1
layer,1
*GET,max_twsi,NODE,TWSI(N),S,TWSI
layer,2
*GET,max_twsi,NODE,TWSI(N),S,TWSI
layer,3
*GET,max_twsi,NODE,TWSI(N),S,TWSI
layer,4
*GET,max_twsi,NODE,TWSI(N),S,TWSI
layer,5
*GET,max_twsi,NODE,TWSI(N),S,TWSI
layer,6
*GET,max_twsi,NODE,TWSI(N),S,TWSI
layer,7
*GET,max_twsi,NODE,TWSI(N),S,TWSI
layer,8
*GET,max_twsi,NODE,TWSI(N),S,TWSI
layer,9
*GET,max_twsi,NODE,TWSI(N),S,TWSI
layer,10
*GET,max_twsi,NODE,TWSI(N),S,TWSI
layer,11
*GET,max_twsi,NODE,TWSI(N),S,TWSI
layer,12
*GET,max_twsi,NODE,TWSI(N),S,TWSI
*ENDDO
*VWRITE,TWSI(1) !寫入
(E13.6)
FINISH
!*************************************
|
|