Home
last modified time | relevance | path

Searched refs:ifac (Results 1 – 25 of 703) sorted by relevance

12345678910>>...29

/dports/science/code_saturne/code_saturne-7.1.0/src/cfbl/
H A Dcfxtcl.f90181 wbfb(ifac) = coefbp(ifac)
235 rcodcl(ifac,ipr,1) = wbfa(ifac)
363 bc_en(ifac) = rcodcl(ifac,ien,1)
364 bc_pr(ifac) = rcodcl(ifac,ipr,1)
365 bc_tk(ifac) = rcodcl(ifac,itk,1)
386 bc_en(ifac) = rcodcl(ifac,ien,1)
387 bc_pr(ifac) = rcodcl(ifac,ipr,1)
388 bc_tk(ifac) = rcodcl(ifac,itk,1)
412 bc_en(ifac) = rcodcl(ifac,ien,1)
413 bc_pr(ifac) = rcodcl(ifac,ipr,1)
[all …]
/dports/science/code_saturne/code_saturne-7.1.0/src/base/
H A Daltycl.f90167 rcodcl(ifac, iuma, 1) = b_fluid_vel(1, ifac)
184 ialtyb(ifac) = -ialtyb(ifac)
209 do ii = ipnfbr(ifac), ipnfbr(ifac+1)-1
258 do ii = ipnfbr(ifac), ipnfbr(ifac+1)-1
314 ialtyb(ifac) = -ialtyb(ifac)
323 ialtyb(ifac) = -ialtyb(ifac)
332 ialtyb(ifac) = -ialtyb(ifac)
344 ialtyb(ifac) = -ialtyb(ifac)
406 rcodcl(ifac,iu,1) = rcodcl(ifac,iuma,1)
407 rcodcl(ifac,iv,1) = rcodcl(ifac,ivma,1)
[all …]
H A Dcondli.f90812 theipb(ifac) = bvar_s(ifac)
1232 normal(1) = surfbo(1,ifac)/surfbn(ifac)
1233 normal(2) = surfbo(2,ifac)/surfbn(ifac)
1234 normal(3) = surfbo(3,ifac)/surfbn(ifac)
2541 bvar_s(ifac) = coefap(ifac) + coefbp(ifac) * bvar_s(ifac)
2559 bvar_s(ifac) = coefap(ifac) + coefbp(ifac) * bvar_s(ifac)
2577 bvar_s(ifac) = coefap(ifac) + coefbp(ifac) * bvar_s(ifac)
2595 bvar_s(ifac) = coefap(ifac) + coefbp(ifac) * bvar_s(ifac)
2613 bvar_s(ifac) = coefap(ifac) + coefbp(ifac) * bvar_s(ifac)
2658 bfconv(ifac) = cofafp(ifac) + cofbfp(ifac)*theipb(ifac)
[all …]
H A Dvericl.f90247 itypfb(ifac) = -itypfb(ifac)
259 itypfb(ifac) = -itypfb(ifac)
271 itypfb(ifac) = -itypfb(ifac)
290 itypfb(ifac) = -itypfb(ifac)
309 itypfb(ifac) = -itypfb(ifac)
336 itypfb(ifac) = -itypfb(ifac)
356 itypfb(ifac) = -itypfb(ifac)
370 itypfb(ifac) = -itypfb(ifac)
384 itypfb(ifac) = -itypfb(ifac)
398 itypfb(ifac) = -itypfb(ifac)
[all …]
H A Dclsyvt.f90182 isympa(ifac) = 0
283 iel = ifabor(ifac)
419 coefbf_rij(isou,ii, ifac) = - hint * coefb_rij(isou,ii, ifac)
421 coefbd_rij(isou,ii, ifac) = coefb_rij(isou,ii, ifac)
513 do ifac = 1, nfabor
752 iel = ifabor(ifac)
822 cofarut(isou,ifac) = coefaut(isou,ifac)
824 cofbrut(isou,jsou,ifac) = coefbut(isou,jsou,ifac)
840 ( a_al(ifac), af_al(ifac), &
841 b_al(ifac), bf_al(ifac), &
[all …]
H A Dtypecl.f90186 itypfb(ifac) = 0
539 if ((itypfb(ifac).eq.isolib.or.itypfb(ifac).eq.ifrent).and. &
792 rcodcl(ifac,ivar,1) = pripb(ifac) - pref
826 b_head_loss(ifac) = rcodcl(ifac,ivar,2)
833 rcodcl(ifac,ivar,1) = pripb(ifac) - pref
1216 itypfb(ifac) = - abs(itypfb(ifac))
1238 itypfb(ifac) = - abs(itypfb(ifac))
1302 itypfb(ifac) = - abs(itypfb(ifac))
1322 itypfb(ifac) = - abs(itypfb(ifac))
1552 icodcl(ifac,ivar+i_dim) = icodcl(ifac,ivar)
[all …]
H A Dclptur.f901474 xkip = 0.5d0*(rijipb(ifac,1)+rijipb(ifac,2)+rijipb(ifac,3))
1493 xkip = 0.5d0*(rijipb(ifac,1)+rijipb(ifac,2)+rijipb(ifac,3))
2477 hint(ifac) = viscis/surfbn(ifac)/fikis
2576 hext = hextp(ifac)/surfbn(ifac)
2640 cofafp(ifac) = -heq*dist_theipb(ifac)
2683 bfconv(ifac) = cofafp(ifac) + cofbfp(ifac)*theipb(ifac)
2768 ( a_al(ifac), af_al(ifac), &
2769 b_al(ifac), bf_al(ifac), &
2782 phit = cofafp(ifac)+cofbfp(ifac)*theipb(ifac)
2784 phit = cofafp(ifac)+cofbfp(ifac)*bval_s(ifac)
[all …]
H A Dmmtycl.f90122 iel = ifabor(ifac)
149 if (rcodcl(ifac,iu,1).gt.rinfin*0.5d0) rcodcl(ifac,iu,1) = 0.d0
150 if (rcodcl(ifac,iv,1).gt.rinfin*0.5d0) rcodcl(ifac,iv,1) = 0.d0
151 if (rcodcl(ifac,iw,1).gt.rinfin*0.5d0) rcodcl(ifac,iw,1) = 0.d0
181 do ifac = 1, nfabor
183 iel = ifabor(ifac)
194 (itypfb(ifac).eq.iparoi.or.itypfb(ifac).eq.iparug)) then
201 distbf = distb(ifac)
211 coftur(ifac) = 0.d0
212 hfltur(ifac) = hint
[all …]
H A Dstdtcl.f90240 ( rcodcl(ifac,iu,1)*surfbo(1,ifac) + &
241 rcodcl(ifac,iv,1)*surfbo(2,ifac) + &
242 rcodcl(ifac,iw,1)*surfbo(3,ifac) )
246 ( rcodcl(ifac,iu,1)*surfbo(1,ifac) + &
247 rcodcl(ifac,iv,1)*surfbo(2,ifac) + &
248 rcodcl(ifac,iw,1)*surfbo(3,ifac) )
257 (rcodcl(ifac,iu,1)*surfbo(1,ifac) + &
259 rcodcl(ifac,iw,1)*surfbo(3,ifac))
297 rcodcl(ifac,iu,1) = rcodcl(ifac,iu,1)*qisqc
298 rcodcl(ifac,iv,1) = rcodcl(ifac,iv,1)*qisqc
[all …]
H A Ddriflu.f90271 imasfl_gas(ifac) = imasfl_mix(ifac)
275 bmasfl_gas(ifac) = bmasfl_mix(ifac)
591 imasfl(ifac) = imasfl_mix(ifac) + flumas(ifac)
595 bmasfl(ifac) = bmasfl_mix(ifac) + flumab(ifac)
620 imasfl_gas(ifac) = imasfl_gas(ifac) - x2(ielup)*imasfl(ifac)
628 bmasfl_gas(ifac) = bmasfl_gas(ifac) - x2(ielup)*bmasfl(ifac)
654 bmasfl_gas(ifac) = bmasfl_gas(ifac)/bpro_x1(ifac)
674 flumas(ifac) = - imasfl_mix(ifac)
678 flumab(ifac) = - bmasfl_mix(ifac)
682 flumas(ifac) = imasfl(ifac) - imasfl_mix(ifac)
[all …]
H A Dclptrg.f90760 dt = theipb(ifac)-rcodcl(ifac,isca(iscalt),1)
1015 ( coefa_k(ifac), coefaf_k(ifac), &
1016 coefb_k(ifac), coefbf_k(ifac), &
1277 ( coefa_k(ifac), coefaf_k(ifac), &
1278 coefb_k(ifac), coefbf_k(ifac), &
1331 ( coefa_k(ifac), coefaf_k(ifac), &
1332 coefb_k(ifac), coefbf_k(ifac), &
1391 ( coefa_k(ifac), coefaf_k(ifac), &
2136 bfconv(ifac) = cofafp(ifac) + cofbfp(ifac)*theipb(ifac)
2144 phit = (cofafp(ifac) + cofbfp(ifac)*val_s(iel))
[all …]
H A Ddistyp.f90272 ( coefap(ifac), cofafp(ifac), &
273 coefbp(ifac), cofbfp(ifac), &
284 ( a_y(ifac), af_y(ifac), &
285 b_y(ifac), bf_y(ifac), &
310 ( a_y(ifac), af_y(ifac), &
311 b_y(ifac), bf_y(ifac), &
369 imasfl(ifac) = - imasfl(ifac)
372 bmasfl(ifac) = - bmasfl(ifac)
385 rovsdp(ifacel(1, ifac)) = rovsdp(ifacel(1, ifac)) + imasfl(ifac)
386 rovsdp(ifacel(2, ifac)) = rovsdp(ifacel(2, ifac)) - imasfl(ifac)
[all …]
/dports/science/code_saturne/code_saturne-7.1.0/src/atmo/
H A Dattycl.f90283 izone = izfppp(ifac)
284 iel = ifabor(ifac)
345 vs = xuent*surfbo(1,ifac) + xvent*surfbo(2,ifac)
368 if (itypfb(ifac).eq.0) itypfb(ifac) = ientre
374 if (rcodcl(ifac,iu,1).gt.rinfin*0.5d0) rcodcl(ifac,iu,1) = xuent
375 if (rcodcl(ifac,iv,1).gt.rinfin*0.5d0) rcodcl(ifac,iv,1) = xvent
376 if (rcodcl(ifac,iw,1).gt.rinfin*0.5d0) rcodcl(ifac,iw,1) = xwent
424 rcodcl(ifac,ipr,1) = coefap(ifac)
518 rcodcl(ifac,ivar,1) = rcodcl(ifac,ivar,1) * (ps/pp)**rscp
528 do ifac = 1, nfabor
[all …]
/dports/science/code_saturne/code_saturne-7.1.0/src/user_examples/
H A Dcs_user_boundary_conditions-electric_arcs.f90185 ifac = lstelt(ilelt)
187 itypfb(ifac) = ientre
193 izfppp(ifac) = izone
314 ifac = lstelt(ilelt)
323 izfppp(ifac) = izone
384 ifac = lstelt(ilelt)
392 izfppp(ifac) = izone
457 ifac = lstelt(ilelt)
465 izfppp(ifac) = izone
538 ifac = lstelt(ilelt)
[all …]
H A Dcs_user_boundary_conditions-gas_3ptchem.f90159 ifac = lstelt(ilelt)
162 itypfb(ifac) = ientre
168 izfppp(ifac) = izone
260 ifac = lstelt(ilelt)
269 izfppp(ifac) = izone
361 ifac = lstelt(ilelt)
370 izfppp(ifac) = izone
384 ifac = lstelt(ilelt)
393 izfppp(ifac) = izone
407 ifac = lstelt(ilelt)
[all …]
H A Dcs_user_boundary_conditions-richards.f90165 icodcl(ifac,iu) = 3
166 icodcl(ifac,iv) = 3
167 icodcl(ifac,iw) = 3
197 icodcl(ifac,iu) = 3
198 icodcl(ifac,iv) = 3
199 icodcl(ifac,iw) = 3
207 rcodcl(ifac,ipr,1) = -1.d0 * cdgfbo(3,ifac)
226 icodcl(ifac,iu) = 3
227 icodcl(ifac,iv) = 3
228 icodcl(ifac,iw) = 3
[all …]
H A Dcs_user_boundary_conditions-compressible.f90169 ifac = lstelt(ilelt)
173 iel = ifabor(ifac)
177 izfppp(ifac) = izone
208 uref2 = rcodcl(ifac,iu,1)**2 + rcodcl(ifac,iv,1)**2 + rcodcl(ifac,iw,1)**2
264 ifac = lstelt(ilelt)
268 izfppp(ifac) = izone
292 ifac = lstelt(ilelt)
296 izfppp(ifac) = izone
336 rcodcl(ifac,iu,1) = -surfbo(1,ifac)
337 rcodcl(ifac,iv,1) = -surfbo(2,ifac)
[all …]
H A Dcs_user_boundary_conditions-base.f90164 ifac = lstelt(ilelt)
165 iel = ifabor(ifac)
167 itypfb(ifac) = ientre
221 ifac = lstelt(ilelt)
222 iel = ifabor(ifac)
224 itypfb(ifac) = ientre
270 ifac = lstelt(ilelt)
276 itypfb(ifac) = isolib
288 ifac = lstelt(ilelt)
335 ifac = lstelt(ilelt)
[all …]
H A Dcs_user_boundary_conditions-fuel.f90163 ifac = lstelt(ilelt)
166 itypfb(ifac) = ientre
172 izfppp(ifac) = izone
268 ifac = lstelt(ilelt)
271 itypfb(ifac) = ientre
277 izfppp(ifac) = izone
376 ifac = lstelt(ilelt)
390 izfppp(ifac) = izone
403 ifac = lstelt(ilelt)
428 ifac = lstelt(ilelt)
[all …]
H A Dcs_user_boundary_conditions-auto_inlet_profile.f90231 do ifac = 1, nfabor
242 ifac = lstelt(ilelt)
243 iel = ifabor(ifac)
247 rcodcl(ifac,iu,1) = - fmprsc * surfbo(1,ifac) / surfbn(ifac)
248 rcodcl(ifac,iv,1) = - fmprsc * surfbo(2,ifac) / surfbn(ifac)
249 rcodcl(ifac,iw,1) = - fmprsc * surfbo(3,ifac) / surfbn(ifac)
315 iel = ifabor(ifac)
338 iel = ifabor(ifac)
344 rcodcl(ifac,iu,1) = - fmul * vnrm * surfbo(1,ifac) / surfbn(ifac)
345 rcodcl(ifac,iv,1) = - fmul * vnrm * surfbo(2,ifac) / surfbn(ifac)
[all …]
H A Dcs_user_boundary_conditions-atmospheric.f90183 ifac = lstelt(ilelt)
186 izfppp(ifac) = izone
201 iautom(ifac) = 1
219 ifac = lstelt(ilelt)
222 izfppp(ifac) = izone
249 ifac = lstelt(ilelt)
252 izfppp(ifac) = izone
261 zent=cdgfbo(3,ifac)
320 ifac = lstelt(ilelt)
323 izfppp(ifac) = izone
[all …]
H A Dcs_user_boundary_conditions-advanced.f90169 ifac = lstelt(ilelt)
171 itypfb(ifac) = iparoi
173 icodcl(ifac,iu ) = 1
177 icodcl(ifac,iv ) = 1
181 icodcl(ifac,iw ) = 1
205 ifac = lstelt(ilelt)
209 itypfb(ifac) = iindef
233 ifac = lstelt(ilelt)
241 itypfb(ifac) = 89
272 ifac = lstelt(ilelt)
[all …]
H A Dcs_user_boundary_conditions-gas_ebu.f90156 ifac = lstelt(ilelt)
159 itypfb(ifac) = ientre
165 izfppp(ifac) = izone
259 ifac = lstelt(ilelt)
268 izfppp(ifac) = izone
315 ifac = lstelt(ilelt)
324 izfppp(ifac) = izone
337 ifac = lstelt(ilelt)
346 izfppp(ifac) = izone
360 ifac = lstelt(ilelt)
[all …]
H A Dcs_user_boundary_conditions-gas_libby_williams.f90157 ifac = lstelt(ilelt)
160 itypfb(ifac) = ientre
166 izfppp(ifac) = izone
259 ifac = lstelt(ilelt)
268 izfppp(ifac) = izone
315 ifac = lstelt(ilelt)
324 izfppp(ifac) = izone
337 ifac = lstelt(ilelt)
346 izfppp(ifac) = izone
360 ifac = lstelt(ilelt)
[all …]
/dports/science/code_saturne/code_saturne-7.1.0/src/cogz/
H A Dd3ptcl.f90215 izone = izfppp(ifac)
217 if (itypfb(ifac).eq.ientre.or.itypfb(ifac).eq.i_convective_inlet) then
311 izone = izfppp(ifac)
313 ( rcodcl(ifac,iu,1)*surfbo(1,ifac) + &
314 rcodcl(ifac,iv,1)*surfbo(2,ifac) + &
315 rcodcl(ifac,iw,1)*surfbo(3,ifac) )
331 izone = izfppp(ifac)
338 rcodcl(ifac,iu,1) = rcodcl(ifac,iu,1)*qisqc
339 rcodcl(ifac,iv,1) = rcodcl(ifac,iv,1)*qisqc
340 rcodcl(ifac,iw,1) = rcodcl(ifac,iw,1)*qisqc
[all …]

12345678910>>...29