LESIZE,_Y1, , ,40,1, CMDEL,_Y CMDEL,_Y1 !*
CM,_Y,AREA
ASEL, , , , 1 CM,_Y1,AREA CHKMSH,\ CMSEL,S,_Y amesh,all CMDEL,_Y CMDEL,_Y1 CMDEL,_Y2 fini /solve
nlgeom,on! Turn on geometric nonlinearity
! Get the node numbers for the nodes located at the top ! of the axis of symmetry and at bottom right of the model ntop = node(0,thick,0) nright = node(radius,0,0)
! Activate the monitoring of the displacement and reaction force
histories
! during the analysis. This will be written out to the monitor
file ratch.mntr
monitor,1,ntop,uy monitor,2,nright,fy
outres,all,all ! Output all the results for
all sub-steps to the
! results file for
later postprocessing
! Select the nodes located at right end and constrain their radial
(x) and
! axial (y) direction displacement to be zero. nsel,s,loc,x,radius d,all,all
! Select the nodes located at left end and constrain their radial
(x) direction
! displacement to be zero. nsel,s,loc,x,0.0 d,all,ux,0.0
! Define the load for Load Step 1.
! Select the nodes located at top surface of plate and apply a
uniform pressure
! of 1.25 N/m^2 as dead load on the plate. nsel,s,loc,y,thick sf,all,pres,1.25 alls! Select all nodes
! Define the number of sub-steps (10). Also define maximum number
of
! substeps (50), and the minimum number of substeps (5) for the
automatic
! time stepping algorithm. nsub,10,50,5
! A load of: applied pressure (1.25) / number of sub-steps (10)
= 0.125 N/m^2
! will be applied for the first sub-step.
solve !
Solve load step 1
f = 0.0425 ! Define
the parameter, f, used to apply
!
the cyclic point load.
! Over six load steps apply a cyclic point load of magnitude f
= 0.0425 units
! applied at the center of the plate over three cycles ! Start Cycle 1 ! ---------------- nsel,s,node,,ntop
f,all,fy,-f ! Define
load for load step 2
nsel,all
nsubst,4,25,2 ! Set the
number of substeps, max and min number
! of
substeps
solve ! Solve
load step 2
nsel,s,node,,ntop
f,all,fy,f !
Define load for load step 3
nsel,all
nsubst,4,25,2 ! Set the
number of substeps, max and min number
!
of substeps
solve Solve load step 3
! Start Cycle 2 ! ---------------- nsel,s,node,,ntop
f,all,fy,-f load for load step 4
nsel,all
nsubst,4,25,2 number of substeps, max and min number
of substeps
solve Solve load step 4
nsel,s,node,,ntop
f,all,fy,f Define load for load step 5
nsel,all
nsubst,4,25,2 number of substeps, max and min number
of substeps
!
! Define
!
!
!
!
! Set the
! Set the
solve !
Solve load step 5
! Start Cycle 3 ! ---------------- nsel,s,node,,ntop
f,all,fy,-f ! Define
load for load step 6
nsel,all
nsubst,4,25,2 number of substeps, max and min number
of substeps
solve Solve load step 6
nsel,s,node,,ntop
f,all,fy,f Define load for load step 7
nsel,all
nsubst,4,25,2 number of substeps, max and min number
of sub-steps.
solve Solve load step 7
save fini /post1
!
!
!
!
!
! Set the
! Set the