Searched refs:MC_BLdelta (Results 1 – 1 of 1) sorted by relevance
31 real*8 :: MC_BLdelta !boundary layer thickness variable66 if(MC_BLdelta > 0) then70 MC_vscale(i) = min(one, d2wall(imapped)/MC_BLdelta)164 if(MC_BLdelta .gt. 0) then !Apply a velocity profile with a BL225 read(1002, *) MC_dMtCO, MC_BLdelta231 if(iRANS >= 0) MC_BLdelta = 0237 call MPI_BCAST(MC_BLdelta, 1, MPI_DOUBLE_PRECISION, 265 write(1002, "(2(F18.14))") MC_dMtCO, MC_BLdelta