Lines Matching refs:a1
326 int a1, a2; in quad_face() local
348 for(a1 = 2; a1 < ip-1; a1++){ /* a1,a2 = 2....p-2 */ in quad_face()
350 if( a1+a1 == ip ){ in quad_face()
364 entfn[mc] = phi(a1,xi1)*phi(a2,xi2); in quad_face()
365 edrv[mc][gOrd[0]] = phiDrv(a1, xi1)*phi(a2, xi2); in quad_face()
366 edrv[mc][gOrd[1]] = phi(a1, xi1)*phiDrv(a2, xi2); in quad_face()
379 int a1, a2, a3; in hex_regn() local
397 for(a1=2; a1 < ip-3; a1++){ in hex_regn()
400 if(a1+a2+a3 == ip){ in hex_regn()
401 entfn[mc]=phi(a1,xi1)*phi(a2,xi2)*phi(a3,xi3); in hex_regn()
403 edrv[mc][0]=phiDrv(a1,xi1)*phi(a2,xi2)*phi(a3,xi3); in hex_regn()
405 edrv[mc][1]=phi(a1,xi1)*phiDrv(a2,xi2)*phi(a3,xi3); in hex_regn()
407 edrv[mc++][2]=phi(a1,xi1)*phi(a2,xi2)*phiDrv(a3,xi3); in hex_regn()