src/Lagrange-tensor-product/3d.coeffs/3d.cube.order1.smooth0/coeffs-I.compute.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

fp t2;
fp t8;
fp t1;
fp t3;
fp t7;
fp t6;
fp t5;
      t2 = x*y;
      t8 = -y+t2;
      t1 = z*t2;
      t3 = x*z;
      t7 = t1-t3;
      t6 = t1-y*z;
      t5 = -t3+z+t6;
      coeffs_I->coeff_0_0_0 = RATIONAL(1.0,1.0)-x-t5+t8;
      coeffs_I->coeff_p1_0_0 = x-t2+t7;
      coeffs_I->coeff_0_p1_0 = t6-t8;
      coeffs_I->coeff_p1_p1_0 = -t1+t2;
      coeffs_I->coeff_0_0_p1 = t5;
      coeffs_I->coeff_p1_0_p1 = -t7;
      coeffs_I->coeff_0_p1_p1 = -t6;
      coeffs_I->coeff_p1_p1_p1 = t1;