Practica 0

Descargar como pdf o txt
Descargar como pdf o txt
Está en la página 1de 4

PRCTICA 0

CASO 1. VIGA CARGA AXIAL


Determinar los desplazamientos y reacciones de la barra mostrada en la figura
Datos:
Material
E
v
A
2L
P

Acero
210GPa
0.3
2x10-4 m2
2m
50 KN

Modelo Geomtrico
2L
2P

Modelo de anlisis
f3

f2

f1
1
1

2
3

2
u1

u2

u3

CASO I.- A PATIR DE UN MODELO DE ANALISIS (MALLA)


/prep7

!* abre el preprocesador

et, 1, link180
mp, ex, 1, 210e9
mp, prxy, 1, 0.3

!* define el tipo de elemento (slo deformacin axial)


!* define el material ex = mdulo de elasticidad
!* define el material prxy = mdulo de poisson

r, 1, 0.0002

!* define la seccin trasversal (real constant)

n,1, 0.0, 0.0, 0.0


n,2, 1.0, 0.0, 0.0
n,3, 2.0, 0.0, 0.0

!* coordenada nodo 1
!* coordenada nodo 2
!* coordenada nodo 3

en, 1, 1, 2

!* creacin elemento 1

en, 2, 2, 3

!* creacin elemento 2

d, 1, ux, 0

!* condicin de contorno en el nodo 1, dezplazamiento en x = 0

d, 1, uy, 0

!* condicin de contorno en el nodo 1, dezplazamiento en y = 0

f, 2, fx, 50000

!* aplicacin de carga en el nodo 2, fx=50000 N

f, 3, fx, 100000

!* aplicacin de carga en el nodo 3, fx=100000 N

FINISH
/SOL
SOLVE
FINISH
/POST1
PRNSOL,U,X

PRRSOL,FX

!* Cierra el preprocesador
!* abre el procesador
!* soluciona el modelo
!* Cierra el procesador
!* Abre el postprocesador
!* PR=print N=nodal SOL=solution , U = desplazamiento, X = direccin x

!* PR=print R=reaction SOL=solution , F = fuerza, X = direccin x

CASO II.- A PATIR DE UN MODELO GEOMETRICO


APDL
!* INGRESO AL PRE-PROCESADOR
/PREP7
!*
!* tipo de elemento
ET,1,LINK180
!*
!* ingreso de la seccin (real constant)
R,1,0.0002, ,0
!*
!*
!* propiedades del material
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,210e9
MPDATA,PRXY,1,,0.3
!* creacion de keypoints y lneas
K,1,,,,
K,2,1,,,
K,3,2,,,
LSTR,
1,
2
LSTR,
2,
3
!*
!* control mallado (1 solo elemento por cada lnea)
LESIZE,ALL, , ,1, ,1, , ,1,
!*

mallado de las lneas

FLST,2,2,4,ORDE,2
FITEM,2,1
FITEM,2,-2
LMESH,P51X
!* aplicacin de condiciones de frontera
!* desplazamiento cero en X y Y en keypoint 1
FLST,2,1,3,ORDE,1
FITEM,2,1
!*
/GO
DK,P51X, , , ,0,UX,UY, , , , ,
!* fuerza en X
FLST,2,1,3,ORDE,1
FITEM,2,3
!*
/GO
FK,P51X,FX,100000
!* fuerza en X

de 100000 en keypoint 3

de 50000 en keypoint 2

FLST,2,1,3,ORDE,1
FITEM,2,2
!*
/GO
FK,P51X,FX,50000
FINISH
!*

INGRESO AL PROCESADOR

/SOL
/STATUS,SOLU
SOLVE
FINISH
!*

INGRESO AL POST-PROCESADOR

/POST1
!*
PRNSOL,U,X
PRRSOL,FX

También podría gustarte