fyqr 发表于 2012-10-14 16:00

求大神看看哪里错了

本帖最后由 fyqr 于 2012-10-14 16:00 编辑

fini
/cle
/config,nres,10000
/prep7
et,1,beam188
et,2,mass21
mp,ex,1,2.1e11
mp,prxy,1,0.3
mp,dens,1,0
mp,prxy,2,1
sectype,1,beam,rect,beam
secdata,0.4,0.4
r,2,1000
k,1
k,2,0,0,10
k,3,0,0,20
k,4,0,0,30
k,5,0,0,40
l,1,2
l,2,3
l,3,4
l,4,5
lsel,s,line,,1,4
latt,1,,1,,,,1
lmesh,all
katt,2,2,2
kmesh,2,5
d,1,all
finish
!-------------------------------------------------
!定义和读入时程曲线
*DIM,P1,ARRAY,2048,1,0
*CREATE,ansuitmp
*VREAD,P1(1,1),'P1','txt',' ',IJK,2048,1,0
(e12.3)
*END
/INPUT,ansuitmp
!-------------------------------------------------
!定义和读入时程曲线
*DIM,P2,ARRAY,2048,1,0
*CREATE,ansuitmp
*VREAD,P2(1,1),'P2','txt',' ',IJK,2048,1,0
(e12.3)
*END
/INPUT,ansuitmp

!-------------------------------------------------
!定义和读入时程曲线
*DIM,P3,ARRAY,2048,1,0
*CREATE,ansuitmp
*VREAD,P3(1,1),'P3','txt',' ',IJK,2048,1,0
(e12.3)
*END
/INPUT,ansuitmp

!-------------------------------------------------
!定义和读入时程曲线
*DIM,P4,ARRAY,2048,1,0
*CREATE,ansuitmp
*VREAD,P4(1,1),'P4','txt',' ',IJK,2048,1,0
(e12.3)
*END
/INPUT,ansuitmp
!--------------------------------------------------
FINISH
/SOL
antype,4
trnopt,full
*do,t,1,2048,1
time,0.1*t
kbc,1   
nsub,1
F,2,Fx,P1(t,1)
F,5,Fx,P2(t,1)
F,8,Fx,P3(t,1)
F,11,Fx,p4(t,1)
allsel,all
solve   
*enddo
finish
!后处理,先定义变量,在画图
/post26
nsol,2,2,u,x,ux2
nsol,5,5,u,x,ux5
nsol,8,8,u,x,ux8
nsol,11,11,u,x,ux11
deriv,3,2,1,,v2
deriv,4,3,1,,a2
deriv,6,5,1,,v5
deriv,7,6,1,,a5
deriv,9,8,1,,v8
deriv,10,9,1,,a8
deriv,12,11,1,,v11
deriv,13,12,1,,a11
PRVAR,2,4,5,7,8,10,11,13
finish
! /exit
计算的时候没啥错输出的时候只输出了前面的2,4,5,7,8,10;没有输出后面的11,13.求大神解释一下为啥?


fyqr 发表于 2012-10-14 19:01

自顶一个

fyqr 发表于 2012-10-15 09:54

没有回帖的啊,{:3_50:}
页: [1]
查看完整版本: 求大神看看哪里错了