Hallo und Danke,
hat sich aber schon erledigt. Mit diesen Befehlen klappts:
/SOLU
ANTYPE,SUBST
SEOPT,GEN,2,2,0,BACKSUB
LUMPM,0
EQSLV,SPAR
!*
NSEL,S,,,200000,200010,1
!*
M,ALL,ALL
ALLSEL,ALL
!*
SAVE
SOLVE
FINISH
!**************************************************************************************
!* USE PASS
!**************************************************************************************
!*
/CLEAR
/FILNAME,USE
/prep7
!*
ET,1,MATRIX50
TYPE,1
!*
SE,GEN
ALLSEL
!*
SAVE
!**************************************************************************************
/SOLU
ANTYPE,2
MODOPT,LANB,100
EQSLV,FRONT
MXPAND,100, , ,0
LUMPM,0
PSTRES,0
MODOPT,LANB,100,0,260., ,OFF
!*
NSEL,S,,,200008,200010,1
d,all,all
!*
ESEL,S,TYPE,,1
SFE,ALL,1,SELV,,1 ! Apply super-element load vector
!*
ALLSEL
SOLVE
FINISH
!**************************************************************************************
!* EXPANSION PASS
!**************************************************************************************
!*
/CLEAR
/FILNAME,GEN
RESUME
/SOLU
EXPASS,ON,YES
SEEXP,GEN,USE
*do,i,1,30
EXPSOL,1,i,
SOLVE
*enddo
!*
FINISH
!**************************************************************************************
------------------
Grüsse, Torsten
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP