Scribd
Upload
46 views6 pages

Código Ansys

This document contains an ANSYS simulation of thermal analysis. It defines materials, generates a geometry, applies loads, and performs the analysis. Temperature results are obtained at various nodes over time and exported for post-processing.

Uploaded by

Carlos Martinez
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd
46 views6 pages

Código Ansys

This document contains an ANSYS simulation of thermal analysis. It defines materials, generates a geometry, applies loads, and performs the analysis. Temperature results are obtained at various nodes over time and exported for post-processing.

Uploaded by

Carlos Martinez
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd
You are on page 1/ 6

CÓDIGO ANSYS

/BATCH
/COM,ANSYS RELEASE Release 19.0 BUILD 19.0 UP20171214 19:08:09
!*
!*
/NOPR
KEYW,PR_SET,1
KEYW,PR_STRUC,0
KEYW,PR_THERM,1
KEYW,PR_FLUID,0
KEYW,PR_ELMAG,0
KEYW,MAGNOD,0
KEYW,MAGEDG,0
KEYW,MAGHFE,0
KEYW,MAGELC,0
KEYW,PR_MULTI,0
/GO
!*
/COM,
/COM,Preferences for GUI filtering have been set to display:
/COM, Thermal
!* ABRE EL PREPROCESADOR
/PREP7
!*
ET,1,PLANE55
!*
!* PROPIEDADES DE LOS MATERIALES
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,KXX,1,,0.720
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,C,1,,835
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,1,,1920
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,KXX,2,,0.038
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,C,2,,418
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,2,,130
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,KXX,3,,0.055
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,C,3,,1300
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,3,,290
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,KXX,4,,0.0263
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,C,4,,1007
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,4,,1.1614
!* CREACIÓN DE KEYPOINTS
K,1,0,0,0,
K,2,0.075,0,0,
K,3,0.1,0,0,
K,4,0.125,0,0,
K,5,1.625,0,0,
K,6,0,0.25,0,
K,7,0.075,0.25,0,
K,8,0.1,0.25,0,
K,9,0.125,0.25,0,
K,10,1.625,0.25,0,
FLST,2,4,3
FITEM,2,1
FITEM,2,6
FITEM,2,7
FITEM,2,2
!* CREACIÓN DE AREAS
A,P51X
FLST,2,4,3
FITEM,2,8
FITEM,2,7
FITEM,2,2
FITEM,2,3
A,P51X
FLST,2,4,3
FITEM,2,9
FITEM,2,8
FITEM,2,3
FITEM,2,4
A,P51X
FLST,2,4,3
FITEM,2,9
FITEM,2,10
FITEM,2,5
FITEM,2,4
A,P51X
GPLOT
FLST,2,3,5,ORDE,2
FITEM,2,1
FITEM,2,-3
!* PEGADO DE ÁREAS
AGLUE,P51X
!* ASIGNACIÓN DE ATRIBUTOS
CM,_Y,AREA
ASEL, , , , 1
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT, 1, , 1, 0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
CM,_Y,AREA
ASEL, , , , 2
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT, 2, , 1, 0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
CM,_Y,AREA
ASEL, , , , 3
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT, 3, , 1, 0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
CM,_Y,AREA
ASEL, , , , 4
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT, 4, , 1, 0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1

!* MALLADO
AESIZE,ALL,0.0125,
MSHKEY,0
FLST,5,4,5,ORDE,2
FITEM,5,1
FITEM,5,-4
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y

!* MALLADO ÁREAS
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
FLST,2,1,5,ORDE,1
FITEM,2,4
!* APLICAR CARGA DE TEMPERATURA
/GO
DA,P51X,TEMP,293
/FOC, 1 ,0.300000,,,1
/REP,FAST
/FOC, 1 ,-0.300000,,,1
/REP,FAST
/FOC, 1 ,-0.300000,,,1
/REP,FAST
FLST,2,1,4,ORDE,1
FITEM,2,1
/GO
!* APLICAR CARGA DE CONVECCIÓN
SFL,P51X,CONV,283, ,253,
FINISH
/SOL
FINISH
/PREP7
!*
!* TIPO DE ANÁLISIS
ANTYPE,4
!*
TRNOPT,FULL
LUMPM,0
!*
FINISH
/SOL
NSUBST,360,0,0
OUTRES,ERASE
OUTRES,ALL,1
AUTOTS,0
TIME,18000
/STATUS,SOLU
SOLVE
/DIST, 1 ,1.082226,1
/REP,FAST
FINISH
/POST1
!*
/EFACET,1
PLNSOL, TEMP,, 0
/DIST, 1 ,1.082226,1
/REP,FAST
FINISH
/SOL
FINISH
/POST1
FLST,2,6,1
FITEM,2,12
FITEM,2,80
FITEM,2,183
FITEM,2,158
FITEM,2,225
FITEM,2,201

!* ESTABLECER PARÁMETROS DE RUTA


PATH,AN_1,6,30,20,
PPATH,P51X,1
PATH,STAT
!*
!*
/VIEW,1,WP
/REPLOT
!*
FLST,2,5,8
FITEM,2,0,0.15,0
FITEM,2,0.5E-01,0.1,0
FITEM,2,0.1,0.1,0
FITEM,2,0.1,0.15,0
FITEM,2,0.15,0.15,0
!*
PATH,AN1,5,30,20,
PPATH,P51X
/PBC,PATH,1
/REPLOT
!*
!*
PDEF, ,TEMP, ,AVG
/PBC,PATH, ,0
!*
PLPATH,TEMP
GPLOT

/EFACET,1
PLNSOL, TEMP,, 0
/VIEW,1,WP
/REPLOT
FLST,2,6,8
FITEM,2,0,0.5E-01,0
FITEM,2,0.5E-01,0.5E-01,0
FITEM,2,0.1,0.5E-01,0
FITEM,2,0.1,0.5E-01,0
FITEM,2,0.1,0.5E-01,0
FITEM,2,0.15,0.1,0
!*
PATH,G1,6,30,20,
PPATH,P51X
/PBC,PATH,1
/REPLOT
!*
!*
PDEF, ,TEMP, ,AVG
/PBC,PATH, ,0
!*
PLPATH,TEMP
FINISH
/POST26
FILE,'SIMULACIÓN_TERMICA','rth','.'
/UI,COLL,1
NUMVAR,200
SOLU,191,NCMIT
STORE,MERGE
FILLDATA,191,,,,1,1
REALVAR,191,191
FINISH
/POST1
!*
/EFACET,1
PLNSOL, TEMP,, 0
FINISH
/POST26
NUMVAR,200
FILLDATA,191,,,,1,1
REALVAR,191,191
!*
NSOL,2,62,TEMP,, TEMP_2,
STORE,MERGE
!*
NSOL,3,180,TEMP,, TEMP_3,
STORE,MERGE
!*
NSOL,4,159,TEMP,, TEMP_4,
STORE,MERGE
!*
NSOL,5,223,TEMP,, TEMP_5,
STORE,MERGE
XVAR,1
PLVAR,5,
FINISH
/POST1
/EFACET,1
PLNSOL, TEMP,, 0
FINISH
/POST26
NUMVAR,200
FILLDATA,191,,,,1,1
REALVAR,191,191
!*
NSOL,3,160,TEMP,, TEMP_3,
STORE,MERGE
!*
NSOL,4,225,TEMP,, TEMP_4,
STORE,MERGE
!*
NSOL,5,224,TEMP,, TEMP_6,
STORE,MERGE
PLVAR,5,3,4,6
FINISH
/SOL
FINISH
/POST1
!* GRÁFICO HISTORIA EN EL TIEMPO
/EFACET,1
PLNSOL, TEMP,, 0
! PLVAR,5,3,4,6
FINISH
/POST26
NUMVAR,200
FILLDATA,191,,,,1,1
REALVAR,191,191
PLVAR,5,3,4,6
!*CIERRA EL PROCESADOR Y ABRE EL POSTPROCESADOR

FINISH
/POST1

You might also like