!!!FEA SOL1: STATIC ANALYSIS OF A SWITCH BAR

!!Initial setup

! White canvas
/RGB/RGB, Kywrd, PRED, PGRN, PBLU, N1, N2, NINC, NCNTR Specifies the RGB color values for indices and contours.,INDEX,100,100,100,0
/RGB/RGB, Kywrd, PRED, PGRN, PBLU, N1, N2, NINC, NCNTR Specifies the RGB color values for indices and contours.,INDEX,0,0,0,15
! Isometric view
/VIEW/VIEW, WN, XV, YV, ZV Defines the viewing direction for the display.,1,1,1,1
/ANG/ANGLE, WN, THETA, Axis, KINCR Rotates the display about an axis.,1
/REP/REPLOT, Label Automatically reissues the last display command for convenience.,FAST
! Define constant parameters
! Units: [N],[Nmm],[N/mm^2=MPa],[N/mm]
ELAST=2E5
NU=0.3
P1=6
P2=8

!!SETUP: element types, materials, sections

KEYWKEYW, Keyword, KEY Sets a keyword used by the GUI for context filtering (GUI).,PR_STRUC,1! Preferences / Structural
/PREP7/PREP7 Enters the model creation preprocessor.
ETET, ITYPE, Ename, KOP1, KOP2, KOP3, KOP4, KOP5, KOP6, INOPR Defines a local element type from the element library.,1,SOLID185

!
MPTEMPMPTEMP, SLOC, T1, T2, T3, T4, T5, T6 Defines a temperature table for material properties.,1,0
MPDATAMPDATA, Lab, MAT, SLOC, C1, C2, C3, C4, C5, C6 Defines property data to be associated with the temperature table.,EX,1,,ELASTELAST = 2E5
MPDATAMPDATA, Lab, MAT, SLOC, C1, C2, C3, C4, C5, C6 Defines property data to be associated with the temperature table.,PRXY,1,,NUNU = 0.3
!
WPROTAWPROTA, THXY, THYZ, THZX Rotates the working plane.,,,90.0
!
BLC4BLC4, XCORNER, YCORNER, WIDTH, HEIGHT, DEPTH Creates a rectangular area or block volume by corner points.,0,0,50,60
!
WPOFFSWPOFFS, XOFF, YOFF, ZOFF Offsets the working plane.,,,150
!
BLC4BLC4, XCORNER, YCORNER, WIDTH, HEIGHT, DEPTH Creates a rectangular area or block volume by corner points.,0,0,50,30
!
VV, P1, P2, P3, P4, P5, P6, P7, P8 Defines a volume through keypoints.,1,2,3,4,5,6,7,8
!
WPOFFSWPOFFS, XOFF, YOFF, ZOFF Offsets the working plane.,60,
!
KK, NPT, X, Y, Z Defines a keypoint.,9,150,0,-60
KK, NPT, X, Y, Z Defines a keypoint.,10,150,30,-60
LL, P1, P2, NDIV, SPACE, XV1, YV1, ZV1, XV2, YV2, ZV2 Defines a line between two keypoints.,9,10
!
WPROTAWPROTA, THXY, THYZ, THZX Rotates the working plane.,,,90.0
VROTATVROTAT, NA1, NA2, NA3, NA4, NA5, NA6, PAX1, PAX2, ARC, NSEG Generates cylindrical volumes by rotating an area pattern about an axis.,2,,,,,,9,10,90,1
VEXTVEXT, NA1, NA2, NINC, DX, DY, DZ, RX, RY, RZ Generates additional volumes by extruding areas.,11,,,0,0,-30
! Set the number of elements on specific lines
*DO*DO, Par, IVAL, FVAL, INC Defines the beginning of a do-loop.,III,9,12
  LESIZELESIZE, NL1, SIZE, ANGSIZ, NDIV, SPACE, KFORC, LAYER1, LAYER2, KYNDIV Specifies the divisions and spacing ratio on unmeshed lines.,III,,,20
*ENDDO*ENDDO Ends a do-loop and starts the looping action.
*DO*DO, Par, IVAL, FVAL, INC Defines the beginning of a do-loop.,III,1,4
  LESIZELESIZE, NL1, SIZE, ANGSIZ, NDIV, SPACE, KFORC, LAYER1, LAYER2, KYNDIV Specifies the divisions and spacing ratio on unmeshed lines.,III,,,8
  LESIZELESIZE, NL1, SIZE, ANGSIZ, NDIV, SPACE, KFORC, LAYER1, LAYER2, KYNDIV Specifies the divisions and spacing ratio on unmeshed lines.,III+4,,,8
  LESIZELESIZE, NL1, SIZE, ANGSIZ, NDIV, SPACE, KFORC, LAYER1, LAYER2, KYNDIV Specifies the divisions and spacing ratio on unmeshed lines.,III+13,,,8
  LESIZELESIZE, NL1, SIZE, ANGSIZ, NDIV, SPACE, KFORC, LAYER1, LAYER2, KYNDIV Specifies the divisions and spacing ratio on unmeshed lines.,III+21,,,8
*ENDDO*ENDDO Ends a do-loop and starts the looping action.
*DO*DO, Par, IVAL, FVAL, INC Defines the beginning of a do-loop.,III,18,21
  LESIZELESIZE, NL1, SIZE, ANGSIZ, NDIV, SPACE, KFORC, LAYER1, LAYER2, KYNDIV Specifies the divisions and spacing ratio on unmeshed lines.,III,,,10
*ENDDO*ENDDO Ends a do-loop and starts the looping action.
*DO*DO, Par, IVAL, FVAL, INC Defines the beginning of a do-loop.,III,26,29
  LESIZELESIZE, NL1, SIZE, ANGSIZ, NDIV, SPACE, KFORC, LAYER1, LAYER2, KYNDIV Specifies the divisions and spacing ratio on unmeshed lines.,III,,,6
*ENDDO*ENDDO Ends a do-loop and starts the looping action.
! Mesh the volumes using mapped mesh
MSHAPEMSHAPE, KEY, Dimension For elements that support multiple shapes, specifies the element shape to be used for meshing.,0,3D
MSHKEYMSHKEY, KEY Specifies whether free meshing or mapped meshing should be used to mesh a model.,1
VMESHVMESH, NV1, NV2, NINC Generates nodes and volume elements within volumes.,1
VMESHVMESH, NV1, NV2, NINC Generates nodes and volume elements within volumes.,3
MSHKEYMSHKEY, KEY Specifies whether free meshing or mapped meshing should be used to mesh a model.,0
VSWEEPVSWEEP, VNUM, SRCA, TRGA, LSMO Fills an existing unmeshed volume with elements by sweeping the mesh from an adjacent area through the volume.,2
!
! Define kinematic constraints
DADA, AREA, Lab, Value1, Value2 Defines degree-of-freedom constraints on areas.,1,ALL,0
CSKPCSKP, KCN, KCS, PORIG, PXAXS, PXYPL, PAR1, PAR2 Defines a local coordinate system by three keypoint locations.,11,0,16,12,17,1,1
DSYSDSYS, KCN Activates a display coordinate system for geometry listings and plots.,11
!
! Apply first ramped distributed load
SFGRADSFGRAD, Lab, SLKCN, Sldir, SLZER, SLOPE Specifies a gradient (slope) for surface loads.,PRES,11,Z,,P1P1 = 6/50,
SFASFA, Area, LKEY, Lab, VALUE, VALUE2 Specifies surface loads on the selected areas.,15,1,PRES,p1
! Apply second ramped distributed load
SFGRADSFGRAD, Lab, SLKCN, Sldir, SLZER, SLOPE Specifies a gradient (slope) for surface loads.,PRES,11,X,,P2P2 = 8/30
SFASFA, Area, LKEY, Lab, VALUE, VALUE2 Specifies surface loads on the selected areas.,14,1,PRES,0
FINISHFINISH Exits normally from a processor.

!!Solve the finite element equation K.U = F

/SOL/SOLU Enters the solution processor.
SOLVESOLVE, Action Starts a solution.

!!Postprocessing

/POST1/POST1 Enters the database results postprocessor.
PLNSOLPLNSOL, Item, Comp, KUND, Fact, FileID Displays results as continuous contours.,U,X,2,1.0