22 double tanpsi = alivec[1];
23 double tantheta = alivec[2];
24 double ux = alivec[3];
25 double vx = alivec[4];
30 aliderivs[0][0] = -1.0;
31 aliderivs[0][1] = 0.0;
32 aliderivs[0][2] = 0.0;
33 aliderivs[0][3] = 0.0;
35 aliderivs[1][0] = 0.0;
36 aliderivs[1][1] = -1.0;
37 aliderivs[1][2] = 0.0;
38 aliderivs[1][3] = 0.0;
40 aliderivs[2][0] = tanpsi;
41 aliderivs[2][1] = tantheta;
42 aliderivs[2][2] = tanpsi;
43 aliderivs[2][3] = tantheta;
45 aliderivs[3][0] = vx * tanpsi;
46 aliderivs[3][1] = vx * tantheta;
48 aliderivs[3][3] = 1.0;
50 aliderivs[4][0] = -ux * tanpsi;
51 aliderivs[4][1] = -ux * tantheta;
52 aliderivs[4][2] = -1.0;
53 aliderivs[4][3] = 0.0;
56 aliderivs[5][1] = -ux;
57 aliderivs[5][2] = tantheta;
58 aliderivs[5][3] = -tanpsi;