双层板,材料性性不一样么,还是当各当异性板考虑?
我这有个单层玻璃的命令流,不知道能借鉴不。
/PREP7
!*
ET,1,SHELL63
!*
R,1,6, , , , , ,
RMORE, , , ,
RMORE
RMORE, ,
!*
!*
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,720000
MPDATA,PRXY,1,,0.2
BLC4, , ,1500,2000
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
!*
/SHRINK,0
/ESHAPE,1.0
/EFACET,1
/RATIO,1,1,1
/CFORMAT,32,0
/REPLOT
!*
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/VIEW,1,,1
/ANG,1
/REP,FAST
/VIEW,1,1
/ANG,1
/REP,FAST
/VIEW,1,,1
/ANG,1
/REP,FAST
/VIEW,1,,,-1
/ANG,1
/REP,FAST
/VIEW,1,-1
/ANG,1
/REP,FAST
/VIEW,1,,1
/ANG,1
/REP,FAST
/VIEW,1,1
/ANG,1
/REP,FAST
/VIEW,1,1,2,3
/ANG,1
/REP,FAST
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
/VIEW,1,,,1
/ANG,1
/REP,FAST
/VIEW,1,1,2,3
/ANG,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/USER, 1
/VIEW, 1, 0.461004736600 , 0.608315660521 , 0.646085667691
/ANG, 1, 9.90188147593
/REPLO
/VIEW, 1, 0.744489487283 , 0.582901160813 , -0.325517495763
/ANG, 1, 62.1432949395
/REPLO
/VIEW, 1, -0.298667981059E-01, 0.907975871112 , 0.417956686572
/ANG, 1, -55.7675331324
/REPLO
/VIEW, 1, 0.543381780307 , 0.729182402194 , 0.415967865539
/ANG, 1, -3.87363055594
/REPLO
FLST,2,1,5,ORDE,1
FITEM,2,1
AESIZE,P51X,50,
CM,_Y,AREA
ASEL, , , , 1
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT, 1, 1, 1, 0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
!*
AMAP,1,1,4,3,2
!*
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
/VIEW,1,1,2,3
/ANG,1
/REP,FAST
/VIEW,1,1,2,3
/ANG,1
/REP,FAST
/VIEW,1,,,1
/ANG,1
/REP,FAST
GPLOT
FINISH
/SOL
FLST,2,4,4,ORDE,2
FITEM,2,1
FITEM,2,-4
!*
/GO
DL,P51X, ,UZ,
FLST,2,2,3,ORDE,2
FITEM,2,1
FITEM,2,4
!*
/GO
DK,P51X, , , ,0,UX,UZ, , , , ,
FLST,2,2,3,ORDE,2
FITEM,2,1
FITEM,2,-2
!*
/GO
DK,P51X, , , ,0,UY,UZ, , , , ,
FLST,2,1,5,ORDE,1
FITEM,2,1
/GO
!*
SFA,P51X,1,PRES,0.001
SAVE,'6mmboli','db','C:\DOCUME~1\ADMINI~1\'
/STATUS,SOLU
SOLVE
FINISH
/POST1
PLDISP,0
!*
/EFACET,1
PLNSOL, U,SUM, 0,1.0
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,0.924021086472,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
/DIST,1,1.08222638492,1
/REP,FAST
!*
/EFACET,1
PLNSOL, S,1, 0,1.0
FINISH
/SOL
LSCLEAR,ALL
/REPLOT
FINISH