! 			Solsh190.mac


fini
/clear,start

filename='Solsh190'
/filnam,filename
/title,%filename%

*abbr,Solsh190,Solsh190.mac


/triad,rbot
/numb,1

/PREP7
/vup,,z


layout
/pnum,mat,1
/eshape,,1
/psymb,csys,0
/triad,rbot


!--------------------------
/com, Material
!--------------------------

/prep7


et,1,190
KEYOPT,1,6,1
KEYOPT,1,8,1

!--------------------   Holz    ------------------------------
/com, Holz			

MP,Ex,1,11600000		
MP,nuxy,1,0.035


sect,1,shell,,Schicht1  
secdata, 0.02,1,0,5 
secdata, 0.02,1,0.0,5   
secoffset,MID   
seccontrol,0,0,0, 0, 1, 1, 1




block,,3,,3,,0.2

lsel,s,length,,0.2
lesi,all,,,4
alls
esize,0.15

vmesh,all

nsel,s,loc,x
d,all,all

nsel,s,loc,z,0.2
esln,s
SFE,ALL,6,PRES,,0.7
alls


!---------------------
/com, Lösungsteil
!---------------------

/solu
ANTYPE,0
OUTRES,ERASE
OUTRES,all,all
sstif,on
neqit,10
AUTOTS,on
nropt,full
ncnv,2
NSUBST,10,500,10
nlge,on
alls

time,1

solv

save


/post1

rsys,solu   


! Window Settings
/WIND,1,-0.95994    ,  1.6700    , -1.0000    ,  1.0000    
/VIEW,1, 0.57735    , 0.57735    , 0.57735    
/FOC, 1,  1.6012    ,  1.4856    ,-0.59764E-03
/DIST,1,  1.8181    
/VUP, 1, Z
/TYPE,1, 6
/EDG, 1, 0,  45.000    
/CONT,1,  9,AUTO
/DSCA,1,  1.0000    
/GO  

alls


ETABLE, ,SMISC, 31  
PLETAB,SMIS31,AVG  

/title,Membran-Moment in [ kNm ]