|
|
输出时要用到类似fortan格式的行，需要在脚本文件里运行，你直接拷贝下面的数字就可以输出了，提取fx和fy的力 etab,fvwx,nmisc,3 或者其他命令
% A; C2 G. p/ J$ }/com，*******************************! L: G6 [ f3 N4 G% k( c6 O5 m
/prep7
! y6 V. j% F' Z4 K7 z*dim,strs,char,3,1) b4 l, {* g" a1 j" Y9 U8 h% H4 Q
*do,i,1,3$ |) X' L" G l" r7 j
strs(i,1)='mass%i%'' v6 h0 r1 k: u$ e
*enddo
& N/ [" {* [% ~*dim,fxx,array,3+ Z) g5 ?% @, e; p% [2 u
*dim,fyy,array,3
9 c* G% Z) j: `! ^0 r. jfxx(1)=0.092884,-0.22312e-4,-0.84152e-1: q- s7 U" j7 e1 a* K3 {( @
fyy(1)=-0.59409e-1,-0.45030,-0.64670. U3 O3 {3 G/ I- m. }/ i! _! ~* Y5 R
*create,out1_scr,mac0 K# J( z% s# o: |3 G7 @& O
/out,virforce,vrt: R0 b( B6 p: C$ M, n H6 I
/com,SUMMARY OF FORCES BY VIRTUAL WORK, Q- w7 u, @' G3 W
/com,
5 s( d7 G8 `% r/ m9 q/com,Component Force-X Force-Y" s3 L1 r- j/ e* K
*vwrite,strs(1,1),fxx(1,1),fyy(1,1)' i9 s6 m' h7 K2 w* U/ d
(a5,' ',e12.4,' ',e12.4)
4 W; S8 D' n# Z*end8 p0 A/ C" C# |
out1_scr; V& u' Z! ]0 x3 B4 E
*list,virforce,vrt& g5 ~! N. ~5 U- g1 v* b
|
|
/1 
发表于 2022-2-25 13:40
收藏
淘帖
支持！
反对！