
En esta página se pueden encontrar los números atrasados de "ANSYS Advantage", "ANSYS Solutions" y "Fluent News". Estas dos últimas no se editan actualmente.
/TITLE, Coupled Thermal-Stress and Physics Evironments
/prep7
! --------------------------------------
! Geometría
! --------------------------------------
k,1,0,0,0
k,2,10,0,0
k,3,10,10,0
k,4,0,10,0
l,1,2
l,2,3
l,3,4
l,4,1
al,1,2,3,4
! --------------------------------------
! Material: Propidades térmicas
! --------------------------------------
mp,kxx,1,2.2 !material 1, conductividad del acero
! --------------------------------------
! Elemento placa térmico
! --------------------------------------
ET,1,shell131,0,0,0,1 ! keyop 4-> nº de capas
! --------------------------------------
! Sección
! --------------------------------------
sectype,1,shell
secdata,0.6,1,0 ! espesor, material y ángulo de orientación
! --------------------------------------
! Mallado
! --------------------------------------
type,1
secnum,1
esize,5
amesh,1
! --------------------------------------
! Condiciones de contorno térmicas
! --------------------------------------
da,all,Tbot,25
da,all,ttop,125
! --------------------------------------
! Physics Environment
! --------------------------------------
physics,write,thermal ! Escribe el archivo térmico
physics,clear ! Elimina CC y opciones
! --------------------------------------
! Elemento placa estructural
! --------------------------------------
et,1,shell181
! --------------------------------------
! Sección
! --------------------------------------
sectype,1,shell
secdata,0.6,1,0 ! espesor, material y ángulo de orientación
! --------------------------------------
! Material
! --------------------------------------
mp,ex,1,30e6
mp,alpx,1,0.65e-5 ! Secant coefficients of thermal expansion
mp,nuxy,1,0.3
! --------------------------------------
! Empotramiento
! --------------------------------------
dl,4,,all,0
! --------------------------------------
! Temperatura de referencia
! --------------------------------------
tref,25
! --------------------------------------
! Physics Environment
! --------------------------------------
physics,write,struct ! Escribe el archivo estructural
! --------------------------------------
finish
/solu
! --------------------------------------
! Physics Environment
! --------------------------------------
physics,read,thermal
! --------------------------------------
solve
finish
/post1
! --------------------------------------
! Visualizamos resultados térmicos
! --------------------------------------
plnsol,ttop ! Graficamos la temperatura de la cara superior
plnsol,tbot ! Graficamos la temperatura de la cara inferior
! Damos volumen y representamos el gradiente
/ESHAPE,1
/GRAPHICS,POWER
PLNSOL,TEMP
! --------------------------------------
finish
/solu
! --------------------------------------
! Physics Environment
! --------------------------------------
physics,read,struct ! lee el archivo estructural
ldread,temp,,,,,,rth ! lee las temperaturas del análisis térmico
! --------------------------------------
solve
finish
/post1
! --------------------------------------
! Visualizamos resultados estructurales
! --------------------------------------
! Damos volumen
/ESHAPE,1
plnsol,s,eqv ! Grafica tensiones
pldisp,2 ! Deformada y posición original
/TITLE, Gradiente Termico Usando "Thermal Elements"
/prep7
! --------------------------------------
! Geometría
! --------------------------------------
k,1,0,0,0
k,2,10,0,0
k,3,10,10,0
k,4,0,10,0
a,1,2,3,4
! --------------------------------------
! Material
mp,kxx,1,2.2 ! Conductividad del acero
! --------------------------------------
! Elemento
! --------------------------------------
ET,1,shell131,0,0,0,1 ! keyop 4-> nº de capas
! --------------------------------------
! Sección
! --------------------------------------
sectype,1,shell
secdata,0.6,1,0 ! espesor, material y ángulo de orientación
! --------------------------------------
!Mallado
! --------------------------------------
type,1
secnum,1
esize,5
amesh,1
! --------------------------------------
! Condiciones de Contorno
! --------------------------------------
da,all,Tbot,25
da,all,ttop,125
/solu
solve
finish
/post1
! --------------------------------------
! Visualización de resultados
! Graficamos la temperatura de la cara superior
plnsol,ttop
! Graficamos la temperatura de la cara inferior
plnsol,tbot
! Damos volumen y representamos el gradiente
/ESHAPE,1
/GRAPHICS,POWER
PLNSOL,TEMP
! --------------------------------------
FINISH
~CFCLEAR,,1
! --------------------------------------
/TITLE, Gradiente termico en una placa
! --------------------------------------
! Unidades y normas
! --------------------------------------
~UNITS,SI
! --------------------------------------
! Parámetros
recub = 0.03 ! Recubrimiento
e1= 0.6 ! Espesor de la placa
! --------------------------------------
/prep7
! --------------------------------------
! Materiales
~CFMP,1,LIB,CONCRETE,EC2,C25/30,0,0,0 ! Mat 1: Hormigón C25/30
~CFMP,2,LIB,REINF,EC2,S500,0,0,0 ! Mat 2: Acero para armado
! --------------------------------------
! Secciones y propiedades reales
! --------------------------------------
!Definimos vértices de placa de hormigón armado
~shlrnf,1,e1,1,2,recub ! Vértice 1
! Propiedades de placas de hormigón
~BMSHPRO,1,SHELL,1,1,1,1,63,,,,Placa de hormigon
! --------------------------------------
! Tipos de elementos
! --------------------------------------
ET,1,shell63
! --------------------------------------
! Geometría
! --------------------------------------
k,1,0,0,0
k,2,5,0,0
k,3,5,5,0
k,4,0,5,0
l,1,2
l,2,3
l,3,4
l,4,1
al,1,2,3,4
! --------------------------------------
! Mallado
! --------------------------------------
mshkey,1 ! Mallado mapeado
esize,10 !tamaño de elemento
type,1 $ mat,1 $ real,1
amesh,all
! --------------------------------------
! Visualización
! --------------------------------------
/eshape,1 $ eplot ! muestra los elementos con su verdadera forma
/eshape,0 $ eplot ! Vuelve a la representación esquemática
! --------------------------------------
! Condiciones de contorno y carga térmica
! --------------------------------------
! Empotramiento
dl,4,,all,0
! Carga térmica - Gradiente de 100ºC
bfe,all,temp,1,25,25,25,25
bfe,all,temp,5,125,125,125,125
! --------------------------------------
/solu
solve
finish
/post1
! Define el data set de ANSYS y la alternativa de CivilFEM
! a ser leída del fichero de resultados de ANSYS y CivilFEM
~cfset,,1
! --------------------------------------
! Distribución de temperaturas
! --------------------------------------
/eshape,1
PLESOL, BFE,TEMP, 0,1.0 ! Sin modelo original
! PLESOL, BFE,TEMP, 1,1.0 ! Con modelo original
! --------------------------------------
! Deformada
! --------------------------------------
/eshape,1
pldisp,1 ! Con modelo original
! --------------------------------------
! Distribución de tensiones Von Mises
! --------------------------------------
! PLESOL, S,EQV, 1,1.0 ! Con modelo original
PLESOL, S,EQV, 0,1.0 ! Sin modelo original
! --------------------------------------
"Esperar a saber bastante, para actuar con toda seguridad, es condenarse a la inacción".