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)
gltri(int * n1,int * n2,double pt[][3],double wt[],int * npt)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