!Screws into Camera /clear /prep7 et,1,solid185 NodesPlate = 15 Weight = 1.322 R1 = .16 PlateThickness = .25 LargeSpacer = 1.811 SmallSpacer = .9843 Fixed = .57 Head = .24 !--------------------------Material Properties---------------------- mptemp,,,,,,,, mp,ex, 1, 85e3 mp,nuxy, 1, 0.3 mp,ctex,1,0 !----------------------------Creating Areas--------------------------- !Creates the Rectangles that will be revolved (rectng, X1, X2, Y1, Y2) rectng, 0,fixed, 0, R1 rectng, Fixed,Fixed+LargeSpacer, 0, R1 rectng, Fixed+LargeSpacer, fixed+LargeSpacer+PlateThickness, 0, R1 !rectng, Fixed+LargeSpacer+PlateThickness, fixed+LargeSpacer+PlateThickness+Head, 0, R2 alls nummrg, all numcmp, all !rearrange node order !----------------------------Creating Volumes--------------------------- lplot vrotat,all,,,,,,1,7,90,, !Rotates along the axis created by Keypoints alls !vovlap,all !Overlaps all volumes not needed because no overlapping volumes vglue,all !Glues the volumes together numcmp,all !----------------------------Meshing--------------------------- lsel,s,length,,Fixed !Selects lines along length of “Fixed” lesize,all,,,3 !Specifies the divisions and spacing ratio on unmeshed lines. lsel,s,length,,LargeSpacer lesize,all,,,50 lsel,s,length,,PlateThickness lesize,all,,,NodesPlate lsel,s,radius,,R1 !Selects all radius of R1 lsel,a,length,,R1 lesize,all,,,4 !----------Assign Material Property--------------- vsel,all vatt,1 !------------------Mesh--------------------------- /pnum,volume,on /pnum,node,off /pnum,line,pff mshkey,1 alls vmesh,all alls vsymm,y,all alls vsymm,z,all alls nummrg,all numcmmp,all alls vplot save !-----------------------Boundary Conditions--------------------------- /sol antype,static !Creates the Fixed Section for DOF nsel,s,loc,x,0,Fixed !selects nodes from x = 0 to x =Fixed and locks them d,all,ux,0 !constrains all selected nodes in the x, y, and z direction d,all,uy,0 d,all,uz,0 nsel,s,loc,x,Fixed+LargeSpacer,Fixed+LargeSpacer+PlateThickness nsel,r,loc,y,R1 F,all,fy,-Weight/NodesPlate !Applies force of -1.322 in y direction to all selected nodes allsel,all solve !Post /post1 /efacet,1 plnsol, u, y, 0,1.0