| /phasta/phSolver/compressible/ |
| H A D | gltet.c | 4 gltet_(int *n1, int *n2,int *n3, double pt[][4], double wt[], int *npt) in gltet_() argument
7 gltet_(int *n1, int *n2,int *n3, double pt[][4], double wt[], int *npt) in gltet_()
10 gltet(int *n1, int *n2,int *n3, double pt[][4], double wt[], int *npt) in gltet_()
13 void gltet_(int *n1, int *n2,int *n3, double pt[][4], double wt[], int *npt) in gltet_()
16 void gltet_(int *n1, int *n2,int *n3, double pt[][4], double wt[], int *npt) in gltet_()
19 void GLTET(int *n1, int *n2,int *n3, double pt[][4], double wt[], int *npt) in gltet_()
22 *npt = GaussLegendreTet(*n1,*n2,*n3,pt,wt); in gltet_()
|
| /phasta/phSolver/common/ |
| H A D | GaussLegendreSimplex.c | 16 int GaussLegendreTet(int n1,int n2,int n3,double GLrstw[][4],double *GLwt) { in GaussLegendreTet() argument
22 GaussLegendre1D(n1,&pt1,&wt1); in GaussLegendreTet()
25 for(i=0; i < n1; i++) { in GaussLegendreTet()
38 int GaussLegendreTri(int n1,int n2,double GLr[][3],double *GLwt) { in GaussLegendreTri() argument
44 GaussLegendre1D(n1,&pt1,&wt1); in GaussLegendreTri()
46 for(i=0; i < n1; i++) { in GaussLegendreTri()
|
| H A D | symline.c | 8 void symline(int *n1, double pt[][4], double wt[], int *err) in symline() argument
13 *err = lineIntPnt(*n1, &lpt, &lwt); in symline()
14 for(i=0; i < *n1; i++){ in symline()
|
| H A D | gltri.c | 5 void gltri(int *n1, int *n2, double pt[][3], double wt[], int *npt) in gltri() argument
7 *npt = GaussLegendreTri(*n1,*n2,pt,wt); in gltri()
|
| H A D | symtripyr.c | 8 void symtripyr(int *n1, double pt[][4], double wt[], int *err) in symtripyr() argument
13 *err = triIntPntPyr(*n1, &lpt, &lwt); in symtripyr()
14 for(i=0; i < *n1; i++){ in symtripyr()
|
| H A D | genbkbPosix.f | 126 n1=n
140 call gensvb (ientp(n1:n2,1:nshl),
141 & iBCBtp(n1:n2,:), BCBtp(n1:n2,:),
|
| H A D | genbkb.f | 182 n1=n
195 call gensvb (ientp(n1:n2,1:nshl),
196 & iBCBtp(n1:n2,:), BCBtp(n1:n2,:),
|
| H A D | genbkbSyncIO.f | 168 n1=n
181 call gensvb (ientp(n1:n2,1:nshl),
182 & iBCBtp(n1:n2,:), BCBtp(n1:n2,:),
|
| H A D | symquadw.c | 8 void symquadw(int *n1, double pt[][4], double wt[], int *err) in symquadw() argument
13 *err = quadwIntPnt(*n1, &lpt, &lwt); in symquadw()
14 for(i=0; i < *n1; i++) { in symquadw()
|
| H A D | symquad.c | 10 void symquad(int *n1, double pt[][4], double wt[], int *err) in symquad() argument
15 *err = quadIntPnt(*n1, &lpt, &lwt); in symquad()
16 for(i=0; i < *n1; i++) { in symquad()
|
| H A D | symtri.c | 8 void symtri(int *n1, double pt[][4], double wt[], int *err) in symtri() argument
13 *err = triIntPnt(*n1, &lpt, &lwt); in symtri()
14 for(i=0; i < *n1; i++){ in symtri()
|
| H A D | genblkPosix.f | 88 n1=n
91 call gensav (ientp(n1:n2,1:nshl),
|
| H A D | symhex.c | 10 void symhex(int *n1, double pt[][4], double wt[], int *err) in symhex() argument
15 *err = hexIntPnt(*n1, &lpt, &lwt); in symhex()
16 for(i=0; i < *n1; i++) { in symhex()
|
| H A D | genblkSyncIO.f | 131 n1=n
134 call gensav (ientp(n1:n2,1:nshl),
|
| H A D | genblk.f | 140 n1=n
143 call gensav (ientp(n1:n2,1:nshl),
|
| H A D | symwdg.c | 8 void symwdg(int *n1, double pt[][4], double wt[], int *err) in symwdg() argument
13 *err = wdgIntPnt(*n1, &lpt, &lwt); in symwdg()
14 for(i=0; i < *n1; i++) { in symwdg()
|
| H A D | symtet.c | 9 void symtet(int *n1, double pt[][4], double wt[], int *err) in symtet() argument
14 *err = tetIntPnt(*n1, &lpt, &lwt); in symtet()
15 for(i=0; i < *n1; i++) { in symtet()
|
| H A D | sympyr.c | 10 void sympyr(int *n1, double pt[][4], double wt[], int *err) in sympyr() argument
15 *err = pyrIntPnt(*n1, &lpt, &lwt); in sympyr()
16 for(i=0; i < *n1; i++) { in sympyr()
|
| H A D | fillsparse.f | 86 integer aa, b, c, e, i, k, n, n1 local
148 integer aa, b, c, e, i, k, n, n1 local
|