- 积分
- 0
- 注册时间
- 2007-4-22
- 仿真币
-
- 最后登录
- 1970-1-1
|
/POST1
CSYS,1
*CFOPEN,FRAD,DAT
TOR = 0
FRDY = 0
FRDX = 0
BBSUM = 0
*DO,J,3293,3652,1
ESEL,S,,,J
ETABLE,FVWX,NMISC,3
ETABLE,FVWY,NMISC,4
*GET,FXX,ELEM,J,ETAB,FVWX
*GET,FYY,ELEM,J,ETAB,FVWY
*GET,RAD,ELEM,J,CENT,X
*GET,ANG,ELEM,J,CENT,Y
FT=FXX*SIN(ANG)-FYY*COS(ANG)
FRAD=(FYY*SIN(ANG)+FXX*COS(ANG))*0.026
FRDY = FRDY + FYY
FRDX = FRDX + FXX
TOR = TOR +FT*RAD*0.026
*VWRITE,FRAD
(F10.4)
*ENDDO
*VWRITE,TOR, FRDX*0.026,FRDY*0.026
(3F15.9)
*CFCLOS,FRAD,DAT
ALLSEL
FINISH
请教这里乘以0.26的意义是什么 ?为什么还要乘上一个常数 |
|