-
Notifications
You must be signed in to change notification settings - Fork 2
/
conv_fins.inp
152 lines (130 loc) · 3.13 KB
/
conv_fins.inp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
/com,COLLABORATIVE SOLUTIONS, INC. (CSI) DOES NOT GUARANTEE THE CORRECTNESS
/com,OR USEFULNESS OF THE RESULTS OBTAINED USING THIS INPUT FILE. CSI IS
/com,NOT LIABLE FOR ANY CONCLUSIONS OR ACTIONS BASED ON THE RESULTS.
/com,IT IS THE RESPONSIBILITY OF THE USER TO CONFIRM THE ACCURACY AND
/com,USEFULNESS OF THE RESULTS.
/com,
!com,AUTHOR:
!com,Sheldon Imaoka
!com,Collaborative Solutions, Inc.
!com,2303 W. 190th St.
!com,Redondo Beach, CA 90278
/com,
/com,DESCRIPTION OF INPUT FILE:
/com, Natural convection problem (2D tri)
/com, three "fins" heated
/com,
finish
/clear
/prep7
et,1,141
keyopt,1,3,0
flda,prot,dens,AIR-SI_B
flda,prot,visc,AIR-SI_B
flda,prot,cond,AIR-SI_B
flda,prot,spht,AIR-SI_B
flda,vary,dens,1
rectng,-0.020,0.030,0,0.040
rectng,,.001,,0.010
rectng,.005,.006,,0.010
rectng,.010,.011,,0.010
asba,1,all
mshape,1
mshkey,0
esize,.001
lsel,r,loc,x,0,0.011
lsel,u,loc,y,0.040
lsel,u,loc,y,0
lesize,all,0.001/3,,,,,-3,-1.1,0
cm,TEMPLINE,line
lsel,inve
lesize,all,0.001/2,,,,,-1,-1.1,0
amesh,all
!----------------------------------------
! Either applied temp or heat flux
!----------------------------------------
cmsel,s,TEMPLINE
!dl,all,,temp,60,1
sfl,all,hflux,100
lsel,inve
lsel,u,loc,y,0
dl,all,,temp,20,1
lsel,all
dl,all,,vx,0,1
dl,all,,vy,0,1
ksel,s,loc,y,0.040
ksel,r,loc,x,-0.020
dk,all,pres,0
finish
/solu
!----------------------------------------
! Steady-state, solve energy eqn, too
!----------------------------------------
FLDATA1,SOLU,TRAN,0
FLDATA1,SOLU,FLOW,1
FLDATA1,SOLU,VOF,0
FLDATA1,SOLU,TEMP,1
FLDATA1,SOLU,TURB,1
FLDATA1,SOLU,COMP,0
FLDATA1,SOLU,IVSH,0
FLDATA1,SOLU,SWRL,0
FLDATA1,SOLU,SPEC,0
!----------------------------------------
! Set reference info
! Need:
! Reference pressure (property calc, gas law)
! Reference temp TOFFS (property calc, gas law)
! grav const ACEL (nat conv)
! Optional:
! nominal temp (initialization temp)
! bulk temp (for film coeff transferred via LDREAD)
!----------------------------------------
FLDATA15,PRES,REFE,101350,
FLDATA16,BULK,BETA,1e+015,
FLDATA17,GAMM,COMP,1.4,
FLDATA14,TEMP,NOMI,20,
FLDATA14,TEMP,BULK,20,
toff,273
acel,,9.81
!----------------------------------------
! TDMA solver fine for this problem (fluid only)
!----------------------------------------
!flda,meth,pres,1
!flda,meth,temp,1
!----------------------------------------
! Use iterative solvers instead to speed things up
! More RAM requirements, but small model, so OK
! PRES = PCG solver
! TEMP = PGMR solver
!----------------------------------------
flda,meth,pres,3
flda,conv,pres,1e-10
flda,meth,temp,4
flda,conv,temp,1e-12
!----------------------------------------
! Set relaxation for TEMP and DENS
! Speed things up
!----------------------------------------
flda,relx,temp,1
flda,relx,dens,1
allsel,all
!ic,all,temp,20
flocheck,1
!----------------------------------------
! 100 total iterations, save every 25
!----------------------------------------
flda,iter,exec,100
flda,iter,appe,25
solve
finish
/triad,lbot
/plopt,minm,off
/title,Velocity and Temperature Profiles
/post1
set,last
/noerase
plnsol,temp
/dev,vector,1
PLVECT,V, , , ,VECT,ELEM,ON,0
/dev,vector,0
/erase