Searched refs:tkxz (Results 1 – 2 of 2) sorted by relevance
248 real*8 tkxy,tkxz,tkyz local803 tkxz = -ck*term1 - dkz*term2 - dkx*term3933 tkxz = -valk*term1k - corek*term1core1056 tkxz = ukx*term1 + ukz*term2 - ukr*term31095 tkxz = ukx*term1 + ukz*term2 - ukr*term31262 & + tkxz*uazp(j)1308 & + tkxz*ubzp(j)1864 tkxz = -ck*term1 - dkz*term2 - dkx*term31994 tkxz = -valk*term1k - corek*term1core2323 & + tkxz*uazp(j)[all …]
128 real*8 tkxy,tkxz,tkyz local1141 & + tkxz*uazp(j)1187 & + tkxz*ubzp(j)2218 & + tkxz*uazp(j)2264 & + tkxz*ubzp(j)2576 real*8 tkxy,tkxz,tkyz local3605 & + tkxz*uazp(j)3651 & + tkxz*ubzp(j)4200 real*8 tkxy,tkxz,tkyz local5285 & + tkxz*uazp(j)[all …]