1 if (abs(tt - 1.0) < eps)
13 RealT
ww = 1.0 / (1.0 - tt);
15 basis[0] = 0.25 * (-rr - ss - 1.0) * ((1.0 - rr) * (1.0 - ss) - tt + rr * ss * tt *
ww);
16 basis[1] = 0.25 * (rr - ss - 1.0) * ((1.0 + rr) * (1.0 - ss) - tt - rr * ss * tt *
ww);
17 basis[2] = 0.25 * (rr + ss - 1.0) * ((1.0 + rr) * (1.0 + ss) - tt + rr * ss * tt *
ww);
18 basis[3] = 0.25 * (-rr + ss - 1.0) * ((1.0 - rr) * (1.0 + ss) - tt - rr * ss * tt *
ww);
20 basis[4] = tt * (2.0 * tt - 1.0);
22 basis[5] = 0.5 * (1.0 + rr - tt) * (1.0 - rr - tt) * (1.0 - ss - tt) * ww;
23 basis[6] = 0.5 * (1.0 + ss - tt) * (1.0 - ss - tt) * (1.0 + rr - tt) * ww;
24 basis[7] = 0.5 * (1.0 + rr - tt) * (1.0 - rr - tt) * (1.0 + ss - tt) * ww;
25 basis[8] = 0.5 * (1.0 + ss - tt) * (1.0 - ss - tt) * (1.0 - rr - tt) * ww;
27 basis[9] = tt * (1.0 - rr - tt) * (1.0 - ss - tt) *
ww;
28 basis[10] = tt * (1.0 + rr - tt) * (1.0 - ss - tt) *
ww;
29 basis[11] = tt * (1.0 + rr - tt) * (1.0 + ss - tt) *
ww;
30 basis[12] = tt * (1.0 - rr - tt) * (1.0 + ss - tt) *
ww;