exaFOAM/foam-extend4.1-coherent-io
Archived
1
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Improved tolerances, Intel 12

Browse source
This commit is contained in:
Hrvoje Jasak 2011-09-29 10:43:22 +01:00
parent 6d3f609b92
commit 0cbb60d99b
1 changed files with 23 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

36
src/OpenFOAM/algorithms/octree/octree/treeBoundBox.C
View file

@ -331,7 +331,10 @@ bool Foam::treeBoundBox::intersects
scalar s;
static const scalar smallNumber = SMALL;
//HJ, experimental: problems with round-off on Intel 12 compiler.
// HJ, 29/Sep/2011
const scalar smallNumber = SMALL;
const scalar kSmall = 1000*SMALL;
while (true)
{
@ -356,10 +359,11 @@ bool Foam::treeBoundBox::intersects
if (ptBits & LEFTBIT)
{
// Intersect with plane V=min, n=-1,0,0
if (Foam::mag(overallVec.x()) > VSMALL)
if (Foam::mag(overallVec.x()) > kSmall)
{
s = (min().x() - overallStart.x())/
stabilise(overallVec.x(), smallNumber);
overallVec.x();
// stabilise(overallVec.x(), smallNumber);
pt.x() = min().x();
pt.y() = overallStart.y() + overallVec.y()*s;
@ -375,10 +379,11 @@ bool Foam::treeBoundBox::intersects
else if (ptBits & RIGHTBIT)
{
// Intersect with plane V=max, n=1,0,0
if (Foam::mag(overallVec.x()) > VSMALL)
if (Foam::mag(overallVec.x()) > kSmall)
{
s = (max().x() - overallStart.x())/
stabilise(overallVec.x(), smallNumber);
overallVec.x();
// stabilise(overallVec.x(), smallNumber);
pt.x() = max().x();
pt.y() = overallStart.y() + overallVec.y()*s;
@ -392,10 +397,11 @@ bool Foam::treeBoundBox::intersects
else if (ptBits & BOTTOMBIT)
{
// Intersect with plane V=min, n=0,-1,0
if (Foam::mag(overallVec.y()) > VSMALL)
if (Foam::mag(overallVec.y()) > kSmall)
{
s = (min().y() - overallStart.y())/
stabilise(overallVec.y(), smallNumber);
overallVec.y();
// stabilise(overallVec.y(), smallNumber);
pt.x() = overallStart.x() + overallVec.x()*s;
pt.y() = min().y();
@ -409,10 +415,11 @@ bool Foam::treeBoundBox::intersects
else if (ptBits & TOPBIT)
{
// Intersect with plane V=max, n=0,1,0
if (Foam::mag(overallVec.y()) > VSMALL)
if (Foam::mag(overallVec.y()) > kSmall)
{
s = (max().y() - overallStart.y())/
stabilise(overallVec.y(), smallNumber);
overallVec.y();
// stabilise(overallVec.y(), smallNumber);
pt.x() = overallStart.x() + overallVec.x()*s;
pt.y() = max().y();
@ -426,10 +433,12 @@ bool Foam::treeBoundBox::intersects
else if (ptBits & BACKBIT)
{
// Intersect with plane V=min, n=0,0,-1
if (Foam::mag(overallVec.z()) > VSMALL)
if (Foam::mag(overallVec.z()) > kSmall)
{
s = (min().z() - overallStart.z())/
stabilise(overallVec.z(), smallNumber);
overallVec.z();
// stabilise(overallVec.z(), smallNumber);
pt.x() = overallStart.x() + overallVec.x()*s;
pt.y() = overallStart.y() + overallVec.y()*s;
pt.z() = min().z();
@ -442,10 +451,11 @@ bool Foam::treeBoundBox::intersects
else if (ptBits & FRONTBIT)
{
// Intersect with plane V=max, n=0,0,1
if (Foam::mag(overallVec.z()) > VSMALL)
if (Foam::mag(overallVec.z()) > kSmall)
{
s = (max().z() - overallStart.z())/
stabilise(overallVec.z(), smallNumber);
overallVec.z();
// stabilise(overallVec.z(), smallNumber);
pt.x() = overallStart.x() + overallVec.x()*s;
pt.y() = overallStart.y() + overallVec.y()*s;