Searched refs:vmag (Results 1 – 1 of 1) sorted by relevance
96 real*8 :: vmagref, vmag local165 vmag = vmagref*blower(iBlower)%vscale(i) !scale the reference 167 BC(imapped, 3) = -vmag*wnorm(imapped, 1) !x velocity168 BC(imapped, 4) = -vmag*wnorm(imapped, 2) !y velocity169 BC(imapped, 5) = -vmag*wnorm(imapped, 3) !z velocity325 real*8 :: deltaBLinv, vmag, dt local