Lines Matching refs:BC
2 & iBC, BC, argument
48 & BC(nshg,ndofBC), ilwork(nlwork),
124 call MC_init(Delt, lstep, BC)
128 call MC_applyBC(BC)
152 call BC_init(Delt, lstep, BC) !Note: sets BC_enable
154 if(BC_enable) call itrBC (yold, ac, iBC, BC, iper, ilwork)
228 BC(imapInlet(i),7)=evis_IC_BC
236 call itrBCsclr(yold,ac,iBC,BC,iper,ilwork)
301 call initBCprofileScale(vbc_prof,BC,yold,x)
303 call itrBC (yold, ac, iBC, BC, iper, ilwork)
305 call itrBCsclr(yold,ac,iBC,BC,iper,ilwork)
310 call BCprofileInitKW(PresBase,VelBase,BC)
329 call BCprofileScaleKW(PresBase,VelBase,BC,yold)
334 & call BCprofileScale(vbc_prof,BC,yold)
343 BC(:,7:6+nsclr)= BC(:,7:6+nsclr)*tdecay
346 if(nosource.eq.1) BC(:,7:6+nsclr)= BC(:,7:6+nsclr)*0.8
357 & shpb, shglb, x, BC, iBC)
392 call asbwmod(yold, acold, x, BC, iBC,
399 call itrBC (y, ac, iBC, BC, iper, ilwork)
403 call itrBCSclr (y, ac, iBC, BC, iper, ilwork)
464 & iBC, BC,
479 & iBC, BC,
498 & iBC, BC,
517 & iBC, BC,
543 call itrBCSclr (y, ac, iBC, BC, iper, ilwork)
564 & iBC, BC,
578 & iBC, BC,
598 call itrBC (y, ac, iBC, BC, iper, ilwork)
617 call itrBCSclr ( yold, acold, iBC, BC,
626 call solvecon (y, x, iBC, BC,
631 call itrBCSclr ( y, ac, iBC, BC, iper, ilwork)
652 call itrBC (yold, acold, iBC, BC, iper,ilwork)
659 call itrBCSclr (yold, acold, iBC, BC, iper, ilwork)
685 call MC_applyBC(BC)
696 call BC_iter(BC)
709 call setBlowing_Duct2(x,BC,yold,iTurbWall,istp)