!Static Analysis FC-Set



/PREP7


!Element Types

ET,1,Mesh200,6
ET,2,solid45
ET,3,beam4

!Real Constants

R,1,2500,520000,520000,50,50	!Conexin rgida

!Materials

!Structure
MP,EX,1,210000
MP,PRXY,1,0.3
MP,Dens,1,7.8e-6

!Stiff Rod
MP,EX,2,210000
MP,PRXY,2,0.3
MP,Dens,2,1e-12

!Rotator Bearing
MP,EX,3,1130
MP,PRXY,3,0.3
MP,Dens,3,7.8e-6

!Keypoints

K,1,303,,363
K,2,323,,363
K,3,348,,363
K,4,353,,363
K,5,393,,363
K,6,393,,303
K,7,353,,303
K,8,348,,303
K,9,303,,303
K,10,348,,338
K,11,353,,338
K,12,348,,328
K,13,353,,328
K,14,0,0,0
K,15,0,0,1333


!Lines

l,1,2
l,2,3
l,3,10
l,10,11
l,11,4
l,4,5
l,5,6
l,6,7
l,7,13
l,13,12
l,12,8
l,8,9
l,9,1

l,2,15

l,10,12		!cerrar figura para dar otro material a los rodillos
l,11,13


a,1,2,3,10,12,8,9
a,4,5,6,7,13,11
a,10,11,13,12




asel,s,,,1,2,1
aatt,1,,1
esize,25
amesh,all

mat,1
type,solid45
extopt,esize,1

vrotat,1,2,,,,,15,14,,60	!crear volumenes con elementos

asel,s,,,3
aatt,3,,1
esize,25
amesh,all

mat,3
type,solid45
extopt,esize,1

vrotat,3,,,,,,15,14,,60		!crear volumenes con elementos



lsel,s,,,14	!mallar barras rgidas
latt,2,1,3
lmesh,all

csys,1

lgen,60,14,14,1,,6

nSEL,s,LOC,X,352,394 	!Boundary conditions
nsel,u,loc,z,305,370
d,all,all

csys,0

ksel,all
lsel,all
asel,all
nsel,all
esel,all

nummrg,node	!Merge items
nummrg,elem
nummrg,kp
numcmp,all	!Compress item numbering




plot,all


!Loads---------------------------------

FK,15,Fy,-1000	!Carga


!Solve-----------------------------------

/SOL
solve


!Postprocessing--------------------------

/POST1
PLNSOL, U,SUM, 0,1.0











