Lines Matching refs:TY
5 COMMON /EXTRA/ G(22),TX(3),TY(3),TZ(3) local
29 2 +DG(4)*(TY(KK)*TY(LL)+TZ(KK)*TZ(LL))
30 3 +G(4)*(TDY(KK)*TY(LL)+TY(KK)*TDY(LL)
41 2 +DG(7)*(TY(LL)*TY(NN)+TZ(LL)*TZ(NN))
42 3 +G(7)*(TDY(LL)*TY(NN)+TY(LL)*TDY(NN)
49 3 +DG(9)*(TY(KK)*TY(LL)+TZ(KK)*TZ(LL))*TX(NN)
50 4 +G(9)*((TDY(KK)*TY(LL)+TY(KK)*TDY(LL)
52 6 +(TY(KK)*TY(LL)+TZ(KK)*TZ(LL))*TDX(NN))
53 7 +DG(10)*(TX(KK)*(TY(LL)*TY(NN)+TZ(LL)*TZ(NN))
54 8 +TX(LL)*(TY(KK)*TY(NN)+TZ(KK)*TZ(NN)))
55 9 +G(10)*(TDX(KK)*(TY(LL)*TY(NN)+TZ(LL)*TZ(NN))
56 1 +TDX(LL)*(TY(KK)*TY(NN)+TZ(KK)*TZ(NN))
57 2 +TX(KK)*(TDY(LL)*TY(NN)+TY(LL)*TDY(NN)
59 4 +TX(LL)*(TDY(KK)*TY(NN)+TY(KK)*TDY(NN)
66 2 +DG(12)*(TY(MM)*TY(NN)+TZ(MM)*TZ(NN))
67 3 +G(12)*(TDY(MM)*TY(NN)+TY(MM)*TDY(NN)
74 3 +DG(14)*TX(LL)*(TY(MM)*TY(NN)+TZ(MM)*TZ(NN))
75 4 +G(14)*(TDX(LL)*(TY(MM)*TY(NN)+TZ(MM)*TZ(NN))
76 5 +TX(LL)*(TDY(MM)*TY(NN)+TY(MM)*TDY(NN)
78 7 +DG(15)*(TY(LL)*(TY(MM)*TX(NN)+TY(NN)*TX(MM))
80 9 +G(15)*(TDY(LL)*(TY(MM)*TX(NN)+TY(NN)*TX(MM))
82 2 +TY(LL)*(TDY(MM)*TX(NN)+TY(MM)*TDX(NN)
83 3 +TDY(NN)*TX(MM)+TY(NN)*TDX(MM))
93 5 +DG(17)*(TY(KK)*TY(LL)+TZ(KK)*TZ(LL))*TX(MM)*TX(NN)
94 6 +G(17)*((TDY(KK)*TY(LL)+TY(KK)*TDY(LL)
96 8 +(TY(KK)*TY(LL)+TZ(KK)*TZ(LL))
98 1 +DG(18)*TX(KK)*TX(LL)*(TY(MM)*TY(NN)+TZ(MM)*TZ(NN))
100 3 *(TY(MM)*TY(NN)+TZ(MM)*TZ(NN))
101 4 +TX(KK)*TX(LL)*(TDY(MM)*TY(NN)+TY(MM)*TDY(NN)
104 1 +DG(19)*(TY(KK)*TY(LL)*TY(MM)*TY(NN)
106 3 +G(19)*(TDY(KK)*TY(LL)*TY(MM)*TY(NN)
107 4 +TY(KK)*TDY(LL)*TY(MM)*TY(NN)
108 5 +TY(KK)*TY(LL)*TDY(MM)*TY(NN)
109 6 +TY(KK)*TY(LL)*TY(MM)*TDY(NN)
114 2 +DG(20)*(TX(KK)*(TX(MM)*(TY(LL)*TY(NN)+TZ(LL)*TZ(NN))
115 3 +TX(NN)*(TY(LL)*TY(MM)+TZ(LL)*TZ(MM)))
116 4 +TX(LL)*(TX(MM)*(TY(KK)*TY(NN)+TZ(KK)*TZ(NN))
117 5 +TX(NN)*(TY(KK)*TY(MM)+TZ(KK)*TZ(MM))))
119 TEMP1= TDX(KK)*(TX(MM)*(TY(LL)*TY(NN)+TZ(LL
120 1)*TZ(NN)) +TX(NN)*(TY(LL)*TY(MM)+TZ(LL)*T
121 2Z(MM))) +TDX(LL)*(TX(MM)*(TY(KK)*TY(NN)+TZ(KK)*TZ(
122 3NN)) +TX(NN)*(TY(KK)*TY(MM)+TZ(KK)*TZ(MM)
123 4)) +TX(KK)*(TDX(MM)*(TY(LL)*TY(NN)+TZ(LL)*TZ(NN))
124 5 +TDX(NN)*(TY(LL)*TY(MM)+TZ(LL)*TZ(MM)))
125 6 +TX(LL)*(TDX(MM)*(TY(KK)*TY(NN)+TZ(KK)*TZ(NN))
126 7 +TDX(NN)*(TY(KK)*TY(MM)+TZ(KK)*TZ(MM)))
127 TEMP2= TX(KK)*(TX(MM)*(TDY(LL)*TY(NN)+TY
129 2)*TDZ(NN)) +TX(NN)*(TDY(LL)*TY(MM)+TY(LL)*
131 4(MM))) +TX(LL)*(TX(MM)*(TDY(KK)*TY(NN)+TY(KK)*TDY(
133 6) +TX(NN)*(TDY(KK)*TY(MM)+TY(KK)*TDY(MM)
137 1 +DG(21)*(TY(KK)*TY(LL)*TZ(MM)*TZ(NN)
138 2 +TZ(KK)*TZ(LL)*TY(MM)*TY(NN))
139 3 +G(21)*(TDY(KK)*TY(LL)*TZ(MM)*TZ(NN)
140 4 +TY(KK)*TDY(LL)*TZ(MM)*TZ(NN)
141 5 +TY(KK)*TY(LL)*TDZ(MM)*TZ(NN)
142 6 +TY(KK)*TY(LL)*TZ(MM)*TDZ(NN)
143 7 +TDZ(KK)*TZ(LL)*TY(MM)*TY(NN)
144 8 +TZ(KK)*TDZ(LL)*TY(MM)*TY(NN)
145 9 +TZ(KK)*TZ(LL)*TDY(MM)*TY(NN)
146 1 +TZ(KK)*TZ(LL)*TY(MM)*TDY(NN))
148 1 +DG(22)*(TY(KK)*TZ(LL)+TZ(KK)*TY(LL))
149 2 *(TY(MM)*TZ(NN)+TZ(MM)*TY(NN))
150 3 +G(22)*((TDY(KK)*TZ(LL)+TY(KK)*TDZ(LL)
151 4 +TDZ(KK)*TY(LL)+TZ(KK)*TDY(LL))
152 5 *(TY(MM)*TZ(NN)+TZ(MM)*TY(NN))
153 6 +(TY(KK)*TZ(LL)+TZ(KK)*TY(LL))
154 7 *(TDY(MM)*TZ(NN)+TY(MM)*TDZ(NN)
155 8 +TDZ(MM)*TY(NN)+TZ(MM)*TDY(NN)))