Searched refs:dsr5 (Results 1 – 12 of 12) sorted by relevance
234 double dsr5; member317 double dsr5; member337 double dsr5; member
98 real*8 dsr3,dsr5,dsr7 local515 dsr5 = sr5 * dscale(k)559 tuir = -psr5*ukr - dsr5*ukrp560 tukr = -psr5*uir - dsr5*uirp1592 dsr5 = sr5 * dscale(k)2287 dsr5 = 0.5d0 * dsr52546 real*8 dsr3,dsr5,dsr7 local2979 dsr5 = sr5 * dscale(k)4165 real*8 dsr3,dsr5,dsr7 local6534 dsr5 = 0.5d0 * dsr5[all …]
218 real*8 dsr3,dsr5,dsr7 local636 dsr5 = sr5 * dscale(k)680 tuir = -psr5*ukr - dsr5*ukrp681 tukr = -psr5*uir - dsr5*uirp702 tix5 = 2.0d0 * (psr5*ukx+dsr5*ukxp)703 tiy5 = 2.0d0 * (psr5*uky+dsr5*ukyp)704 tiz5 = 2.0d0 * (psr5*ukz+dsr5*ukzp)1697 dsr5 = sr5 * dscale(k)1741 tuir = -psr5*ukr - dsr5*ukrp1742 tukr = -psr5*uir - dsr5*uirp[all …]