/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/tce/ccsd_alpha/ |
H A D | alpha_2_5_14_1_1.F | 33 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h4b,h8b,p5b,p7b,h4b_2,h8b_2,p5b_2,p7b_2) 98 &+nvab) * (h8b_2 - 1))))) 103 &+nvab) * (h8b_2 - 1)))),p5b_2,p7b_2,h4b_2,h8b_2) 113 &+nvab) * (h8b_2 - 1))))) 118 &+nvab) * (h8b_2 - 1)))),p7b_2,p5b_2,h4b_2,h8b_2) 127 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 132 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 133 &+nvab) * (h4b_2 - 1)))),p5b_2,p7b_2,h8b_2,h4b_2) 142 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|
H A D | alpha_2_5_10_4_1.F | 33 INTEGER h8b_2 local 73 CALL TCE_RESTRICTED_4(h2b,h8b,p4b,p7b,h2b_2,h8b_2,p4b_2,p7b_2) 98 &+nvab) * (h8b_2 - 1))))) 103 &+nvab) * (h8b_2 - 1)))),p4b_2,p7b_2,h2b_2,h8b_2) 113 &+nvab) * (h8b_2 - 1))))) 118 &+nvab) * (h8b_2 - 1)))),p7b_2,p4b_2,h2b_2,h8b_2) 127 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 132 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 133 &+nvab) * (h2b_2 - 1)))),p4b_2,p7b_2,h8b_2,h2b_2) 142 & - 1 + (noab+nvab) * (p4b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|
H A D | alpha_2_5_13_2_1.F | 32 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h8b,h6b,p2b,p5b,h8b_2,h6b_2,p2b_2,p5b_2) 97 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 102 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 103 &+nvab) * (h6b_2 - 1)))),p2b_2,p5b_2,h8b_2,h6b_2) 112 & - 1 + (noab+nvab) * (p2b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 118 &+nvab) * (h6b_2 - 1)))),p5b_2,p2b_2,h8b_2,h6b_2) 128 &+nvab) * (h8b_2 - 1))))) 133 &+nvab) * (h8b_2 - 1)))),p2b_2,p5b_2,h6b_2,h8b_2) 143 &+nvab) * (h8b_2 - 1))))) [all …]
|
H A D | alpha_2_5_11_1_1.F | 32 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h8b,h4b,p1b,p3b,h8b_2,h4b_2,p1b_2,p3b_2) 97 & - 1 + (noab+nvab) * (p3b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 102 & - 1 + (noab+nvab) * (p3b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 103 &+nvab) * (h4b_2 - 1)))),p1b_2,p3b_2,h8b_2,h4b_2) 112 & - 1 + (noab+nvab) * (p1b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 118 &+nvab) * (h4b_2 - 1)))),p3b_2,p1b_2,h8b_2,h4b_2) 128 &+nvab) * (h8b_2 - 1))))) 133 &+nvab) * (h8b_2 - 1)))),p1b_2,p3b_2,h4b_2,h8b_2) 143 &+nvab) * (h8b_2 - 1))))) [all …]
|
H A D | alpha_2_5_3_2.F | 37 INTEGER h8b_2 83 CALL TCE_RESTRICTED_4(h4b,h8b,p2b,p6b,h4b_2,h8b_2,p2b_2,p6b_2) 135 &+nvab) * (h8b_2 - 1))))) 140 &+nvab) * (h8b_2 - 1)))),p2b_2,p6b_2,h4b_2,h8b_2) 150 &+nvab) * (h8b_2 - 1))))) 155 &+nvab) * (h8b_2 - 1)))),p6b_2,p2b_2,h4b_2,h8b_2) 164 & - 1 + (noab+nvab) * (p6b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 169 & - 1 + (noab+nvab) * (p6b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 170 &+nvab) * (h4b_2 - 1)))),p2b_2,p6b_2,h8b_2,h4b_2) 179 & - 1 + (noab+nvab) * (p2b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/tce/ccsd_beta/ |
H A D | beta_3_4_13_2_1.F | 32 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h8b,h6b,p2b,p5b,h8b_2,h6b_2,p2b_2,p5b_2) 97 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 102 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 103 &+nvab) * (h6b_2 - 1)))),p2b_2,p5b_2,h8b_2,h6b_2) 112 & - 1 + (noab+nvab) * (p2b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 118 &+nvab) * (h6b_2 - 1)))),p5b_2,p2b_2,h8b_2,h6b_2) 128 &+nvab) * (h8b_2 - 1))))) 133 &+nvab) * (h8b_2 - 1)))),p2b_2,p5b_2,h6b_2,h8b_2) 143 &+nvab) * (h8b_2 - 1))))) [all …]
|
H A D | beta_3_4_14_1_1.F | 33 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h4b,h8b,p5b,p7b,h4b_2,h8b_2,p5b_2,p7b_2) 98 &+nvab) * (h8b_2 - 1))))) 103 &+nvab) * (h8b_2 - 1)))),p5b_2,p7b_2,h4b_2,h8b_2) 113 &+nvab) * (h8b_2 - 1))))) 118 &+nvab) * (h8b_2 - 1)))),p7b_2,p5b_2,h4b_2,h8b_2) 127 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 132 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 133 &+nvab) * (h4b_2 - 1)))),p5b_2,p7b_2,h8b_2,h4b_2) 142 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|
H A D | beta_1_3_1_4_1.F | 33 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h2b,h8b,p4b,p7b,h2b_2,h8b_2,p4b_2,p7b_2) 98 &+nvab) * (h8b_2 - 1))))) 103 &+nvab) * (h8b_2 - 1)))),p4b_2,p7b_2,h2b_2,h8b_2) 113 &+nvab) * (h8b_2 - 1))))) 118 &+nvab) * (h8b_2 - 1)))),p7b_2,p4b_2,h2b_2,h8b_2) 127 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 132 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 133 &+nvab) * (h2b_2 - 1)))),p4b_2,p7b_2,h8b_2,h2b_2) 142 & - 1 + (noab+nvab) * (p4b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|
H A D | beta_1_3_4_1_1.F | 32 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h8b,h4b,p1b,p3b,h8b_2,h4b_2,p1b_2,p3b_2) 97 & - 1 + (noab+nvab) * (p3b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 102 & - 1 + (noab+nvab) * (p3b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 103 &+nvab) * (h4b_2 - 1)))),p1b_2,p3b_2,h8b_2,h4b_2) 112 & - 1 + (noab+nvab) * (p1b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 118 &+nvab) * (h4b_2 - 1)))),p3b_2,p1b_2,h8b_2,h4b_2) 128 &+nvab) * (h8b_2 - 1))))) 133 &+nvab) * (h8b_2 - 1)))),p1b_2,p3b_2,h4b_2,h8b_2) 143 &+nvab) * (h8b_2 - 1))))) [all …]
|
H A D | beta_1_3_6_2_1.F | 32 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h8b,h6b,p2b,p5b,h8b_2,h6b_2,p2b_2,p5b_2) 97 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 102 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 103 &+nvab) * (h6b_2 - 1)))),p2b_2,p5b_2,h8b_2,h6b_2) 112 & - 1 + (noab+nvab) * (p2b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 118 &+nvab) * (h6b_2 - 1)))),p5b_2,p2b_2,h8b_2,h6b_2) 128 &+nvab) * (h8b_2 - 1))))) 133 &+nvab) * (h8b_2 - 1)))),p2b_2,p5b_2,h6b_2,h8b_2) 143 &+nvab) * (h8b_2 - 1))))) [all …]
|
H A D | beta_1_3_7_1_1.F | 33 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h4b,h8b,p5b,p7b,h4b_2,h8b_2,p5b_2,p7b_2) 98 &+nvab) * (h8b_2 - 1))))) 103 &+nvab) * (h8b_2 - 1)))),p5b_2,p7b_2,h4b_2,h8b_2) 113 &+nvab) * (h8b_2 - 1))))) 118 &+nvab) * (h8b_2 - 1)))),p7b_2,p5b_2,h4b_2,h8b_2) 127 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 132 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 133 &+nvab) * (h4b_2 - 1)))),p5b_2,p7b_2,h8b_2,h4b_2) 142 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|
H A D | beta_3_4_10_4_1.F | 34 INTEGER h8b_2 74 CALL TCE_RESTRICTED_4(h2b,h8b,p4b,p7b,h2b_2,h8b_2,p4b_2,p7b_2) 99 &+nvab) * (h8b_2 - 1))))) 104 &+nvab) * (h8b_2 - 1)))),p4b_2,p7b_2,h2b_2,h8b_2) 114 &+nvab) * (h8b_2 - 1))))) 119 &+nvab) * (h8b_2 - 1)))),p7b_2,p4b_2,h2b_2,h8b_2) 128 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 133 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 134 &+nvab) * (h2b_2 - 1)))),p4b_2,p7b_2,h8b_2,h2b_2) 143 & - 1 + (noab+nvab) * (p4b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|
H A D | beta_3_4_11_1_1.F | 32 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h8b,h4b,p1b,p3b,h8b_2,h4b_2,p1b_2,p3b_2) 97 & - 1 + (noab+nvab) * (p3b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 102 & - 1 + (noab+nvab) * (p3b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 103 &+nvab) * (h4b_2 - 1)))),p1b_2,p3b_2,h8b_2,h4b_2) 112 & - 1 + (noab+nvab) * (p1b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 118 &+nvab) * (h4b_2 - 1)))),p3b_2,p1b_2,h8b_2,h4b_2) 128 &+nvab) * (h8b_2 - 1))))) 133 &+nvab) * (h8b_2 - 1)))),p1b_2,p3b_2,h4b_2,h8b_2) 143 &+nvab) * (h8b_2 - 1))))) [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/tce/ccsd_beta/ |
H A D | beta_3_4_10_4_1.F | 34 INTEGER h8b_2 74 CALL TCE_RESTRICTED_4(h2b,h8b,p4b,p7b,h2b_2,h8b_2,p4b_2,p7b_2) 99 &+nvab) * (h8b_2 - 1))))) 104 &+nvab) * (h8b_2 - 1)))),p4b_2,p7b_2,h2b_2,h8b_2) 114 &+nvab) * (h8b_2 - 1))))) 119 &+nvab) * (h8b_2 - 1)))),p7b_2,p4b_2,h2b_2,h8b_2) 128 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 133 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 134 &+nvab) * (h2b_2 - 1)))),p4b_2,p7b_2,h8b_2,h2b_2) 143 & - 1 + (noab+nvab) * (p4b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|
H A D | beta_3_4_11_1_1.F | 32 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h8b,h4b,p1b,p3b,h8b_2,h4b_2,p1b_2,p3b_2) 97 & - 1 + (noab+nvab) * (p3b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 102 & - 1 + (noab+nvab) * (p3b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 103 &+nvab) * (h4b_2 - 1)))),p1b_2,p3b_2,h8b_2,h4b_2) 112 & - 1 + (noab+nvab) * (p1b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 118 &+nvab) * (h4b_2 - 1)))),p3b_2,p1b_2,h8b_2,h4b_2) 128 &+nvab) * (h8b_2 - 1))))) 133 &+nvab) * (h8b_2 - 1)))),p1b_2,p3b_2,h4b_2,h8b_2) 143 &+nvab) * (h8b_2 - 1))))) [all …]
|
H A D | beta_1_3_7_1_1.F | 33 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h4b,h8b,p5b,p7b,h4b_2,h8b_2,p5b_2,p7b_2) 98 &+nvab) * (h8b_2 - 1))))) 103 &+nvab) * (h8b_2 - 1)))),p5b_2,p7b_2,h4b_2,h8b_2) 113 &+nvab) * (h8b_2 - 1))))) 118 &+nvab) * (h8b_2 - 1)))),p7b_2,p5b_2,h4b_2,h8b_2) 127 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 132 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 133 &+nvab) * (h4b_2 - 1)))),p5b_2,p7b_2,h8b_2,h4b_2) 142 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|
H A D | beta_3_4_13_2_1.F | 32 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h8b,h6b,p2b,p5b,h8b_2,h6b_2,p2b_2,p5b_2) 97 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 102 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 103 &+nvab) * (h6b_2 - 1)))),p2b_2,p5b_2,h8b_2,h6b_2) 112 & - 1 + (noab+nvab) * (p2b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 118 &+nvab) * (h6b_2 - 1)))),p5b_2,p2b_2,h8b_2,h6b_2) 128 &+nvab) * (h8b_2 - 1))))) 133 &+nvab) * (h8b_2 - 1)))),p2b_2,p5b_2,h6b_2,h8b_2) 143 &+nvab) * (h8b_2 - 1))))) [all …]
|
H A D | beta_3_4_14_1_1.F | 33 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h4b,h8b,p5b,p7b,h4b_2,h8b_2,p5b_2,p7b_2) 98 &+nvab) * (h8b_2 - 1))))) 103 &+nvab) * (h8b_2 - 1)))),p5b_2,p7b_2,h4b_2,h8b_2) 113 &+nvab) * (h8b_2 - 1))))) 118 &+nvab) * (h8b_2 - 1)))),p7b_2,p5b_2,h4b_2,h8b_2) 127 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 132 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 133 &+nvab) * (h4b_2 - 1)))),p5b_2,p7b_2,h8b_2,h4b_2) 142 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|
H A D | beta_1_3_6_2_1.F | 32 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h8b,h6b,p2b,p5b,h8b_2,h6b_2,p2b_2,p5b_2) 97 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 102 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 103 &+nvab) * (h6b_2 - 1)))),p2b_2,p5b_2,h8b_2,h6b_2) 112 & - 1 + (noab+nvab) * (p2b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 118 &+nvab) * (h6b_2 - 1)))),p5b_2,p2b_2,h8b_2,h6b_2) 128 &+nvab) * (h8b_2 - 1))))) 133 &+nvab) * (h8b_2 - 1)))),p2b_2,p5b_2,h6b_2,h8b_2) 143 &+nvab) * (h8b_2 - 1))))) [all …]
|
H A D | beta_1_3_1_4_1.F | 33 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h2b,h8b,p4b,p7b,h2b_2,h8b_2,p4b_2,p7b_2) 98 &+nvab) * (h8b_2 - 1))))) 103 &+nvab) * (h8b_2 - 1)))),p4b_2,p7b_2,h2b_2,h8b_2) 113 &+nvab) * (h8b_2 - 1))))) 118 &+nvab) * (h8b_2 - 1)))),p7b_2,p4b_2,h2b_2,h8b_2) 127 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 132 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 133 &+nvab) * (h2b_2 - 1)))),p4b_2,p7b_2,h8b_2,h2b_2) 142 & - 1 + (noab+nvab) * (p4b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|
H A D | beta_1_3_4_1_1.F | 32 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h8b,h4b,p1b,p3b,h8b_2,h4b_2,p1b_2,p3b_2) 97 & - 1 + (noab+nvab) * (p3b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 102 & - 1 + (noab+nvab) * (p3b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 103 &+nvab) * (h4b_2 - 1)))),p1b_2,p3b_2,h8b_2,h4b_2) 112 & - 1 + (noab+nvab) * (p1b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 118 &+nvab) * (h4b_2 - 1)))),p3b_2,p1b_2,h8b_2,h4b_2) 128 &+nvab) * (h8b_2 - 1))))) 133 &+nvab) * (h8b_2 - 1)))),p1b_2,p3b_2,h4b_2,h8b_2) 143 &+nvab) * (h8b_2 - 1))))) [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/tce/ccsd_alpha/ |
H A D | alpha_2_5_13_2_1.F | 32 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h8b,h6b,p2b,p5b,h8b_2,h6b_2,p2b_2,p5b_2) 97 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 102 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 103 &+nvab) * (h6b_2 - 1)))),p2b_2,p5b_2,h8b_2,h6b_2) 112 & - 1 + (noab+nvab) * (p2b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 118 &+nvab) * (h6b_2 - 1)))),p5b_2,p2b_2,h8b_2,h6b_2) 128 &+nvab) * (h8b_2 - 1))))) 133 &+nvab) * (h8b_2 - 1)))),p2b_2,p5b_2,h6b_2,h8b_2) 143 &+nvab) * (h8b_2 - 1))))) [all …]
|
H A D | alpha_2_5_10_4_1.F | 33 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h2b,h8b,p4b,p7b,h2b_2,h8b_2,p4b_2,p7b_2) 98 &+nvab) * (h8b_2 - 1))))) 103 &+nvab) * (h8b_2 - 1)))),p4b_2,p7b_2,h2b_2,h8b_2) 113 &+nvab) * (h8b_2 - 1))))) 118 &+nvab) * (h8b_2 - 1)))),p7b_2,p4b_2,h2b_2,h8b_2) 127 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 132 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 133 &+nvab) * (h2b_2 - 1)))),p4b_2,p7b_2,h8b_2,h2b_2) 142 & - 1 + (noab+nvab) * (p4b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|
H A D | alpha_2_5_11_1_1.F | 32 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h8b,h4b,p1b,p3b,h8b_2,h4b_2,p1b_2,p3b_2) 97 & - 1 + (noab+nvab) * (p3b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 102 & - 1 + (noab+nvab) * (p3b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 103 &+nvab) * (h4b_2 - 1)))),p1b_2,p3b_2,h8b_2,h4b_2) 112 & - 1 + (noab+nvab) * (p1b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 118 &+nvab) * (h4b_2 - 1)))),p3b_2,p1b_2,h8b_2,h4b_2) 128 &+nvab) * (h8b_2 - 1))))) 133 &+nvab) * (h8b_2 - 1)))),p1b_2,p3b_2,h4b_2,h8b_2) 143 &+nvab) * (h8b_2 - 1))))) [all …]
|
H A D | alpha_2_5_14_1_1.F | 33 INTEGER h8b_2 73 CALL TCE_RESTRICTED_4(h4b,h8b,p5b,p7b,h4b_2,h8b_2,p5b_2,p7b_2) 98 &+nvab) * (h8b_2 - 1))))) 103 &+nvab) * (h8b_2 - 1)))),p5b_2,p7b_2,h4b_2,h8b_2) 113 &+nvab) * (h8b_2 - 1))))) 118 &+nvab) * (h8b_2 - 1)))),p7b_2,p5b_2,h4b_2,h8b_2) 127 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 132 & - 1 + (noab+nvab) * (p7b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab 133 &+nvab) * (h4b_2 - 1)))),p5b_2,p7b_2,h8b_2,h4b_2) 142 & - 1 + (noab+nvab) * (p5b_2 - 1 + (noab+nvab) * (h8b_2 - 1 + (noab [all …]
|