atmBoundaryLayer: Correct for SP compilation

Resolves bug-report http://www.openfoam.org/mantisbt/view.php?id=1536
This commit is contained in:
Henry 2015-02-17 13:38:00 +00:00
parent 9af2d6e22e
commit 449c461a29

View file

@ -73,7 +73,7 @@ atmBoundaryLayer::atmBoundaryLayer(const vectorField& p, const dictionary& dict)
flowDir_ /= mag(flowDir_);
zDir_ /= mag(zDir_);
Ustar_ = kappa_*Uref_/(log((Zref_ + z0_)/max(z0_, 0.001)));
Ustar_ = kappa_*Uref_/(log((Zref_ + z0_)/max(z0_, scalar(0.001))));
}
@ -136,7 +136,7 @@ tmp<vectorField> atmBoundaryLayer::U(const vectorField& p) const
scalarField Un
(
(Ustar_/kappa_)
*log(((zDir_ & p) - zGround_ + z0_)/max(z0_, 0.001))
*log(((zDir_ & p) - zGround_ + z0_)/max(z0_, scalar(0.001)))
);
return flowDir_*Un;