mvmcoords.cpp

Go to the documentation of this file.

/******************************************************************************
 *
// El'Beem - the visual lattice boltzmann freesurface simulator
// All code distributed as part of El'Beem is covered by the version 2 of the 
// GNU General Public License. See the file COPYING for details.  
//
// Copyright 2008 Nils Thuerey , Richard Keiser, Mark Pauly, Ulrich Ruede
//
 *
 * Mean Value Mesh Coords class
 *
 *****************************************************************************/

#include "mvmcoords.h"
#include <algorithm>
using std::vector;

void MeanValueMeshCoords::clear() 
{
    mVertices.resize(0);
    mNumVerts = 0;
}

void MeanValueMeshCoords::calculateMVMCs(vector<ntlVec3Gfx> &reference_vertices, vector<ntlTriangle> &tris, 
        vector<ntlVec3Gfx> &points, gfxReal numweights)
{
    clear();
    mvmTransferPoint tds;
    int mem = 0;
    int i = 0;

    mNumVerts = (int)reference_vertices.size();

    for (vector<ntlVec3Gfx>::iterator iter = points.begin(); iter != points.end(); ++iter, ++i) {
        /*
        if(i%(points.size()/10)==1) debMsgStd("MeanValueMeshCoords::calculateMVMCs",DM_MSG,"Computing weights, points: "<<i<<"/"<<points.size(),5 );
        */
        tds.lastpos = *iter;
        tds.weights.resize(0);  // clear
        computeWeights(reference_vertices, tris, tds, numweights);
        mem += (int)tds.weights.size();
        mVertices.push_back(tds);
    }    
    int mbmem = mem * sizeof(mvmFloat) / (1024*1024);
    debMsgStd("MeanValueMeshCoords::calculateMVMCs",DM_MSG,"vertices:"<<mNumVerts<<" points:"<<points.size()<<" weights:"<<mem<<", wmem:"<<mbmem<<"MB ",7 );
}

// from: mean value coordinates for closed triangular meshes
// attention: fails if a point is exactly (or very close) to a vertex
void MeanValueMeshCoords::computeWeights(vector<ntlVec3Gfx> &reference_vertices, vector<ntlTriangle>& tris,
        mvmTransferPoint& tds, gfxReal numweights)
{
    const bool mvmFullDebug=false;
    //const ntlVec3Gfx cEPS = 1.0e-6;
    const mvmFloat cEPS = 1.0e-14;

    //mvmFloat d[3], s[3], phi[3],c[3];
    ntlVec3d u[3],c,d,s,phi;
    int indices[3];

    for (int i = 0; i < (int)reference_vertices.size(); ++i) {
        tds.weights.push_back(mvmIndexWeight(i, 0.0));
    }

    // for each triangle
    //for (vector<ntlTriangle>::iterator iter = tris.begin(); iter != tris.end();) {
    for(int t=0; t<(int)tris.size(); t++) {

        for (int i = 0; i < 3; ++i) { //, ++iter) {
            indices[i] = tris[t].getPoints()[i];
            u[i] = vec2D(reference_vertices[ indices[i] ]-tds.lastpos);
            d[i] = normalize(u[i]); //.normalize();        
            //assert(d[i] != 0.);
            if(mvmFullDebug) errMsg("MeanValueMeshCoords::computeWeights","t"<<t<<" i"<<indices[i] //<<" lp"<<tds.lastpos
                    <<" v"<<reference_vertices[indices[i]]<<" u"<<u[i]<<" ");
            // on vertex!
            //? if(d[i]<=0.) continue;
        }
        //for (int i = 0; i < 3; ++i) { errMsg("III"," "<<i     <<" i"<<indices[i]<<reference_vertices[ indices[i] ] ); }

        // arcsin is not needed, see paper
        phi[0] = 2.*asin( (mvmFloat)(0.5* norm(u[1]-u[2]) )  );
        phi[1] = 2.*asin( (mvmFloat)(0.5* norm(u[0]-u[2]) )  );
        phi[2] = 2.*asin( (mvmFloat)(0.5* norm(u[0]-u[1]) )  );
        mvmFloat h = (phi[0] + phi[1] + phi[2])*0.5;
        if (M_PI-h < cEPS) {
            if(mvmFullDebug) errMsg("MeanValueMeshCoords::computeWeights","point on triangle");
            tds.weights.resize(0);
            tds.weights.push_back( mvmIndexWeight(indices[0], sin(phi[0])*d[1]*d[2]));
            tds.weights.push_back( mvmIndexWeight(indices[1], sin(phi[1])*d[0]*d[2]));
            tds.weights.push_back( mvmIndexWeight(indices[2], sin(phi[2])*d[1]*d[0]));
            break;
        }
        mvmFloat sinh = 2.*sin(h);
        c[0] = (sinh*sin(h-phi[0]))/(sin(phi[1])*sin(phi[2]))-1.;
        c[1] = (sinh*sin(h-phi[1]))/(sin(phi[0])*sin(phi[2]))-1.;    
        c[2] = (sinh*sin(h-phi[2]))/(sin(phi[0])*sin(phi[1]))-1.;   
        if(mvmFullDebug) errMsg("MeanValueMeshCoords::computeWeights","c="<<c<<" phi="<<phi<<" d="<<d);
        //if (c[0] > 1. || c[0] < 0. || c[1] > 1. || c[1] < 0. || c[2] > 1. || c[2] < 0.) continue;

        s[0] = sqrt((float)(1.-c[0]*c[0]));
        s[1] = sqrt((float)(1.-c[1]*c[1]));
        s[2] = sqrt((float)(1.-c[2]*c[2]));

        if(mvmFullDebug) errMsg("MeanValueMeshCoords::computeWeights","s");
        if (s[0] <= cEPS || s[1] <= cEPS || s[2] <= cEPS) {
            //MSG("position lies outside the triangle on the same plane -> ignore it");
            continue;
        }
        const mvmFloat u0x = u[0][0];
        const mvmFloat u0y = u[0][1];
        const mvmFloat u0z = u[0][2];
        const mvmFloat u1x = u[1][0];
        const mvmFloat u1y = u[1][1];
        const mvmFloat u1z = u[1][2];
        const mvmFloat u2x = u[2][0];
        const mvmFloat u2y = u[2][1];
        const mvmFloat u2z = u[2][2];
        mvmFloat det = u0x*u1y*u2z - u0x*u1z*u2y + u0y*u1z*u2x - u0y*u1x*u2z + u0z*u1x*u2y - u0z*u1y*u2x;
        //assert(det != 0.);
        if (det < 0.) {
            s[0] = -s[0];
            s[1] = -s[1];
            s[2] = -s[2];
        }

        tds.weights[indices[0]].weight += (phi[0]-c[1]*phi[2]-c[2]*phi[1])/(d[0]*sin(phi[1])*s[2]);
        tds.weights[indices[1]].weight += (phi[1]-c[2]*phi[0]-c[0]*phi[2])/(d[1]*sin(phi[2])*s[0]);
        tds.weights[indices[2]].weight += (phi[2]-c[0]*phi[1]-c[1]*phi[0])/(d[2]*sin(phi[0])*s[1]);
        if(mvmFullDebug) { errMsg("MeanValueMeshCoords::computeWeights","i"<<indices[0]<<" o"<<tds.weights[indices[0]].weight);
        errMsg("MeanValueMeshCoords::computeWeights","i"<<indices[1]<<" o"<<tds.weights[indices[1]].weight);
        errMsg("MeanValueMeshCoords::computeWeights","i"<<indices[2]<<" o"<<tds.weights[indices[2]].weight);
        errMsg("MeanValueMeshCoords::computeWeights","\n\n\n"); }
    }

    //sort weights
    if((numweights>0.)&& (numweights<1.) ) {
    //if( ((int)tds.weights.size() > maxNumWeights) && (maxNumWeights > 0) ) {
      int maxNumWeights = (int)(tds.weights.size()*numweights);
        if(maxNumWeights<=0) maxNumWeights = 1;
        std::sort(tds.weights.begin(), tds.weights.end(), std::greater<mvmIndexWeight>());
        // only use maxNumWeights-th largest weights
        tds.weights.resize(maxNumWeights);
    }

    // normalize weights
    mvmFloat totalWeight = 0.;
    for (vector<mvmIndexWeight>::const_iterator witer = tds.weights.begin();
            witer != tds.weights.end(); ++witer) {
        totalWeight += witer->weight;
    }
    mvmFloat invTotalWeight;
    if (totalWeight == 0.) {
        if(mvmFullDebug) errMsg("MeanValueMeshCoords::computeWeights","totalWeight == 0");
        invTotalWeight = 0.0;
    } else {
        invTotalWeight = 1.0/totalWeight;
    }

    for (vector<mvmIndexWeight>::iterator viter = tds.weights.begin();
            viter != tds.weights.end(); ++viter) {
        viter->weight *= invTotalWeight;  
        //assert(finite(viter->weight) != 0);
        if(!finite(viter->weight)) viter->weight=0.;
    }
}

void MeanValueMeshCoords::transfer(vector<ntlVec3Gfx> &vertices, vector<ntlVec3Gfx>& displacements) 
{
    displacements.resize(0);

    //debMsgStd("MeanValueMeshCoords::transfer",DM_MSG,"vertices:"<<mNumVerts<<" curr_verts:"<<vertices.size()<<" ",7 );
    if((int)vertices.size() != mNumVerts) {
        errMsg("MeanValueMeshCoords::transfer","Different no of verts: "<<vertices.size()<<" vs "<<mNumVerts);
        return;
    }

    for (vector<mvmTransferPoint>::iterator titer = mVertices.begin(); titer != mVertices.end(); ++titer) {
        mvmTransferPoint &tds = *titer;
        ntlVec3Gfx newpos(0.0);

        for (vector<mvmIndexWeight>::iterator witer = tds.weights.begin();
                witer != tds.weights.end(); ++witer) {
            newpos += vertices[witer->index] * witer->weight;
            //errMsg("transfer","np"<<newpos<<" v"<<vertices[witer->index]<<" w"<< witer->weight);
        }

        displacements.push_back(newpos);
        //displacements.push_back(newpos - tds.lastpos);
        //tds.lastpos = newpos;
    }
}