gltri.c (revision 7acde132a6def0fe2daaec0d1a712dff0e5c6636) - OpenGrok cross reference for /phasta/phSolver/common/gltri.c

#include <FCMangle.h>
int GaussLegendreTri(int,int,double [][3],double[]);

#define gltri FortranCInterface_GLOBAL_(gltri, GLTRI)
void gltri(int *n1, int *n2, double pt[][3], double wt[], int *npt)
{
  *npt = GaussLegendreTri(*n1,*n2,pt,wt);
}