1/4车辆模型车桥耦合--迭代法

FINISH
/CLEAR
/CONFIG,NRES,2000
/PREP7
LB=10
NE=100
NN=NE+1
NN1=NN+1
P=10000
V=36*1E3/3600
DELTL=LB/NE
DELTT=DELTL/V
EM=2.1E11
AREA=0.18
IM=0.0054
DENG=7800
GRA=9.8
F1=ACOS(-1)/2/LB/LB*SQRT(EM*IM/(AREA*DENG))
ET,1,BEAM3
ET,2,MASS21,,,4
ET,3,COMBIN14,,2
MP,EX,1,EM
MP,NUXY,1,0.2
MP,DENS,1,DENG
R,1,AREA,IM,1.0
R,2,P/GRA
R,3,1E8
*DO,I,1,NN
N,I,(I-1)*DELTL
*ENDDO