1*f34e7d5cSCameron Smith #include <FCMangle.h> 259599516SKenneth E. Jansen int GaussLegendreTri(int,int,double [][3],double[]); 359599516SKenneth E. Jansen 4*f34e7d5cSCameron Smith #define gltri FortranCInterface_GLOBAL_(gltri, GLTRI) 5*f34e7d5cSCameron Smith void gltri(int *n1, int *n2, double pt[][3], double wt[], int *npt) 659599516SKenneth E. Jansen { 759599516SKenneth E. Jansen *npt = GaussLegendreTri(*n1,*n2,pt,wt); 859599516SKenneth E. Jansen } 9