1 ST
1 ST
1 ST
2] Displacement :
3] Stress :
4] Strain :
5] Reaction solution:
NODE FX FY FZ
1 -0.10000E+006 0.0000 0.0000
TOTAL VALUES
VALUE -0.10000E+006 0.0000 0.0000
!* !*
! /REPLOT,RESIZE /PREP7
!* !*
/NOPR ET,1,LINK180
KEYW,PR_SET,1 !*
KEYW,PR_STRUC,1 !*
KEYW,PR_THERM,0 !*
KEYW,PR_FLUID,0 SECTYPE,1,LINK, ,1
KEYW,PR_ELMAG,0 SECDATA,314.159,
KEYW,MAGNOD,0 SECCONTROL,0,0
KEYW,MAGEDG,0 !*
KEYW,MAGHFE,0 !*
KEYW,MAGELC,0 !*
KEYW,PR_MULTI,0 SECTYPE,2,LINK, ,2
/GO SECDATA,78.5398,
!* SECCONTROL,0,0
! /COM, !*
!* FITEM,5,1
MPTEMP,,,,,,,, FITEM,5,-2
MPTEMP,1,0 CM,_Y,LINE
MPDATA,PRXY,1,,0.3 CM,_Y1,LINE
K,1,,,, CMSEL,,_Y
K,2,100,,, !*
K,4,350,,, !*
LSTR, 1, 3 FLST,2,2,4,ORDE,2
LSTR, 3, 4 FITEM,2,1
TYPE, 1 FITEM,2,-2
MAT, 1 LMESH,P51X
REAL, ! /PNUM,KP,0
ESYS, 0 ! /PNUM,LINE,0
SECNUM, 1 ! /PNUM,AREA,0
!* ! /PNUM,VOLU,0
CM,_Y,LINE ! /PNUM,NODE,0
LSEL, , , , 2 ! /PNUM,TABN,0
CM,_Y1,LINE ! /PNUM,SVAL,0
CMSEL,S,_Y ! /PNUM,DOMA,0
!* ! /NUMBER,0
!* !*
CMSEL,S,_Y1 ! /PNUM,ELEM,1
CMSEL,S,_Y !*
CMDELE,_Y FLST,2,1,3,ORDE,1
CMDELE,_Y1 FITEM,2,1
!* !*
FLST,5,2,4,ORDE,2 /GO
DK,P51X, , , ,0,ALL, , , , , , ! /REP,FAST
FITEM,2,2 ! /REP,FAST
!* ! /DIST, 1 ,0.924021,1
/GO ! /REP,FAST
FLST,2,1,3,ORDE,1 ! /REP,FAST
!* ! /REP,FAST
FK,P51X,FX,100000 ! /REP,FAST
! /REP,FAST ! /REP,FAST
! /REP,FAST /SOL
! /REP,FAST SOLVE
! /REP,FAST /POST1
! /DIST, 1 ,0.924021,1 !*
! /REP,FAST ! /EFACET,1
! /REP,FAST ! /RATIO,1,1,1
! /REP,FAST ! /REPLOT
! /DIST, 1 ,1.082226,1 !*
! /VIEW,1,1,1,1 ! /REP,FAST
! /REP,FAST ! /REP,FAST
!* ! /DIST, 1 ,0.924021,1
! /SHRINK,0 ! /REP,FAST
! /REP,FAST ! /REP,FAST
! /REP,FAST ! /REP,FAST
! /REP,FAST ! /REP,FAST
! /REP,FAST ! /REP,FAST
! /REP,FAST ! /ANG,1
! /REP,FAST ! /VIEW,1,,,1
! /REP,FAST ! /REP,FAST
! /REP,FAST ! /REP,FAST
! /REP,FAST ! /REP,FAST
! /REP,FAST ! /REP,FAST
! /REP,FAST ! /REP,FAST
! /REP,FAST ! /REP,FAST
! /REP,FAST ! /REP,FAST
! /REP,FAST ! /REP,FAST
!*
! /VIEW,1,1,1,1
! /ANG,1
! /REP,FAST
! /VIEW,1,,,1
! /ANG,1
! /REP,FAST
!*
! PRRSOL,
!*
!*
FINISH
/FILNAME,bar,0
!*
/CWD,'C:\Users\ANIKET W\Desktop\fea'
!
LGWRITE,'bar','lgw','C:\Users\ANIKET~1\Deskto
p\fea\',COMMENT