1C> \ingroup nwxc 2C> @{ 3C> 4C> \file nwxcm_x_m11.F 5C> The nwxcm_x_m11 functional 6C> 7C> @} 8C> 9C> \ingroup nwxc_priv 10C> @{ 11C> 12C> \brief Evaluate the nwxcm_x_m11 functional [1] 13C> 14C> \f{eqnarray*}{ 15C> {\it t_1} &=& \rho_\alpha^{{{4}\over{3}}}\\\\ 16C> {\it t_2} &=& \rho_\alpha^{{{1}\over{3}}}\\\\ 17C> {\it t_3} &=& {{1}\over{{\it t_2}}}\\\\ 18C> {\it t_4} &=& {{1}\over{\rho_\alpha}}\\\\ 19C> {\it t_5} &=& 1.0-0.04275941461768073\,{\it t_3}\, 20C> \left({{0.1282782438530422\,{\it t_3} 21C> -2.63857249068588 \times 10^{-4}\,{\it t_4}} 22C> \over{e^{243.0826598584318\,\rho_\alpha^{{{2}\over{3}}}}}} 23C> -0.1924173657795633\,{\it t_3}+2.63857249068588 \times 10^{-4} 24C> \,{\it t_4}+3.544907701811032\,\mathrm{erf} 25C> \left(15.59110835888301\,{\it t_2}\right)\right)\\\\ 26C> {\it t_6} &=& {{1}\over{\rho_\alpha^{{{8}\over{3}}}}}\\\\ 27C> {\it t_7} &=& 0.804\,\left(1.0-{{1.0}\over{0.004492667444378077 28C> \,{\it t_6}\,\sigma_{\alpha\alpha}+1.0}}\right)+1.0\\\\ 29C> {\it t_8} &=& {\it param}\left(1\right)\\\\ 30C> {\it t_9} &=& {\it param}\left(12\right)\\\\ 31C> {\it t_{10}} &=& 9.115599744691192\,\rho_\alpha^{{{5} 32C> \over{3}}}\\\\ 33C> {\it t_{11}} &=& {\it t_{10}}-2.0\,\tau_\alpha\\\\ 34C> {\it t_{12}} &=& {\it t_{11}}^{11}\\\\ 35C> {\it t_{13}} &=& 2.0\,\tau_\alpha+{\it t_{10}}\\\\ 36C> {\it t_{14}} &=& {{1}\over{{\it t_{13}}^{11}}}\\\\ 37C> {\it t_{15}} &=& {\it param}\left(11\right)\\\\ 38C> {\it t_{16}} &=& {\it t_{11}}^{10}\\\\ 39C> {\it t_{17}} &=& {{1}\over{{\it t_{13}}^{10}}}\\\\ 40C> {\it t_{18}} &=& {\it param}\left(10\right)\\\\ 41C> {\it t_{19}} &=& {\it t_{11}}^9\\\\ 42C> {\it t_{20}} &=& {{1}\over{{\it t_{13}}^9}}\\\\ 43C> {\it t_{21}} &=& {\it param}\left(9\right)\\\\ 44C> {\it t_{22}} &=& {\it t_{11}}^8\\\\ 45C> {\it t_{23}} &=& {{1}\over{{\it t_{13}}^8}}\\\\ 46C> {\it t_{24}} &=& {\it param}\left(8\right)\\\\ 47C> {\it t_{25}} &=& {\it t_{11}}^7\\\\ 48C> {\it t_{26}} &=& {{1}\over{{\it t_{13}}^7}}\\\\ 49C> {\it t_{27}} &=& {\it param}\left(7\right)\\\\ 50C> {\it t_{28}} &=& {\it t_{11}}^6\\\\ 51C> {\it t_{29}} &=& {{1}\over{{\it t_{13}}^6}}\\\\ 52C> {\it t_{30}} &=& {\it param}\left(6\right)\\\\ 53C> {\it t_{31}} &=& {\it t_{11}}^5\\\\ 54C> {\it t_{32}} &=& {{1}\over{{\it t_{13}}^5}}\\\\ 55C> {\it t_{33}} &=& {\it param}\left(5\right)\\\\ 56C> {\it t_{34}} &=& {\it t_{11}}^4\\\\ 57C> {\it t_{35}} &=& {{1}\over{{\it t_{13}}^4}}\\\\ 58C> {\it t_{36}} &=& {\it param}\left(4\right)\\\\ 59C> {\it t_{37}} &=& {\it t_{11}}^3\\\\ 60C> {\it t_{38}} &=& {{1}\over{{\it t_{13}}^3}}\\\\ 61C> {\it t_{39}} &=& {\it param}\left(3\right)\\\\ 62C> {\it t_{40}} &=& {\it t_{11}}^2\\\\ 63C> {\it t_{41}} &=& {{1}\over{{\it t_{13}}^2}}\\\\ 64C> {\it t_{42}} &=& {\it param}\left(2\right)\\\\ 65C> {\it t_{43}} &=& {{1}\over{{\it t_{13}}}}\\\\ 66C> {\it t_{44}} &=& 0.552\,\left(1.0-{{1} 67C> \over{e^{0.003680288926019986\,{\it t_6}\, 68C> \sigma_{\alpha\alpha}}}}\right)+1.0\\\\ 69C> {\it t_{45}} &=& {\it param}\left(13\right)\\\\ 70C> {\it t_{46}} &=& {\it param}\left(24\right)\\\\ 71C> {\it t_{47}} &=& {\it param}\left(23\right)\\\\ 72C> {\it t_{48}} &=& {\it param}\left(22\right)\\\\ 73C> {\it t_{49}} &=& {\it param}\left(21\right)\\\\ 74C> {\it t_{50}} &=& {\it param}\left(20\right)\\\\ 75C> {\it t_{51}} &=& {\it param}\left(19\right)\\\\ 76C> {\it t_{52}} &=& {\it param}\left(18\right)\\\\ 77C> {\it t_{53}} &=& {\it param}\left(17\right)\\\\ 78C> {\it t_{54}} &=& {\it param}\left(16\right)\\\\ 79C> {\it t_{55}} &=& {\it param}\left(15\right)\\\\ 80C> {\it t_{56}} &=& {\it param}\left(14\right)\\\\ 81C> {\it t_{57}} &=& 0.9305257363491002\,{\it t_1}\,{\it t_5} 82C> -0.9305257363491002\,{\it t_1}\\\\ 83C> {\it t_{58}} &=& {\it param}\left(25\right)\\\\ 84C> {\it t_{59}} &=& {\it param}\left(36\right)\\\\ 85C> {\it t_{60}} &=& {\it param}\left(35\right)\\\\ 86C> {\it t_{61}} &=& {\it param}\left(34\right)\\\\ 87C> {\it t_{62}} &=& {\it param}\left(33\right)\\\\ 88C> {\it t_{63}} &=& {\it param}\left(32\right)\\\\ 89C> {\it t_{64}} &=& {\it param}\left(31\right)\\\\ 90C> {\it t_{65}} &=& {\it param}\left(30\right)\\\\ 91C> {\it t_{66}} &=& {\it param}\left(29\right)\\\\ 92C> {\it t_{67}} &=& {\it param}\left(28\right)\\\\ 93C> {\it t_{68}} &=& {\it param}\left(27\right)\\\\ 94C> {\it t_{69}} &=& {\it param}\left(26\right)\\\\ 95C> {\it t_{70}} &=& {\it param}\left(37\right)\\\\ 96C> {\it t_{71}} &=& {\it param}\left(48\right)\\\\ 97C> {\it t_{72}} &=& {\it param}\left(47\right)\\\\ 98C> {\it t_{73}} &=& {\it param}\left(46\right)\\\\ 99C> {\it t_{74}} &=& {\it param}\left(45\right)\\\\ 100C> {\it t_{75}} &=& {\it param}\left(44\right)\\\\ 101C> {\it t_{76}} &=& {\it param}\left(43\right)\\\\ 102C> {\it t_{77}} &=& {\it param}\left(42\right)\\\\ 103C> {\it t_{78}} &=& {\it param}\left(41\right)\\\\ 104C> {\it t_{79}} &=& {\it param}\left(40\right)\\\\ 105C> {\it t_{80}} &=& {\it param}\left(39\right)\\\\ 106C> {\it t_{81}} &=& {\it param}\left(38\right)\\\\ 107C> {\it t_{82}} &=& \rho_\beta^{{{4}\over{3}}}\\\\ 108C> {\it t_{83}} &=& \rho_\beta^{{{1}\over{3}}}\\\\ 109C> {\it t_{84}} &=& {{1}\over{{\it t_{83}}}}\\\\ 110C> {\it t_{85}} &=& {{1}\over{\rho_\beta}}\\\\ 111C> {\it t_{86}} &=& 1.0-0.04275941461768073\,{\it t_{84}}\, 112C> \left({{0.1282782438530422\,{\it t_{84}} 113C> -2.63857249068588 \times 10^{-4}\,{\it t_{85}}} 114C> \over{e^{243.0826598584318\,\rho_\beta^{{{2}\over{3}}}}}} 115C> -0.1924173657795633\,{\it t_{84}}+2.63857249068588 \times 10^{ 116C> -4}\,{\it t_{85}}+3.544907701811032\,\mathrm{erf} 117C> \left(15.59110835888301\,{\it t_{83}}\right)\right)\\\\ 118C> {\it t_{87}} &=& {{1}\over{\rho_\beta^{{{8}\over{3}}}}}\\\\ 119C> {\it t_{88}} &=& 0.804\,\left(1.0-{{1.0} 120C> \over{0.004492667444378077\,{\it t_{87}}\,\sigma_{\beta\beta} 121C> +1.0}}\right)+1.0\\\\ 122C> {\it t_{89}} &=& 9.115599744691192\,\rho_\beta^{{{5}\over{3}}}\\\\ 123C> {\it t_{90}} &=& {\it t_{89}}-2.0\,\tau_\beta\\\\ 124C> {\it t_{91}} &=& {\it t_{90}}^{11}\\\\ 125C> {\it t_{92}} &=& 2.0\,\tau_\beta+{\it t_{89}}\\\\ 126C> {\it t_{93}} &=& {{1}\over{{\it t_{92}}^{11}}}\\\\ 127C> {\it t_{94}} &=& {\it t_{90}}^{10}\\\\ 128C> {\it t_{95}} &=& {{1}\over{{\it t_{92}}^{10}}}\\\\ 129C> {\it t_{96}} &=& {\it t_{90}}^9\\\\ 130C> {\it t_{97}} &=& {{1}\over{{\it t_{92}}^9}}\\\\ 131C> {\it t_{98}} &=& {\it t_{90}}^8\\\\ 132C> {\it t_{99}} &=& {{1}\over{{\it t_{92}}^8}}\\\\ 133C> {\it t_{100}} &=& {\it t_{90}}^7\\\\ 134C> {\it t_{101}} &=& {{1}\over{{\it t_{92}}^7}}\\\\ 135C> {\it t_{102}} &=& {\it t_{90}}^6\\\\ 136C> {\it t_{103}} &=& {{1}\over{{\it t_{92}}^6}}\\\\ 137C> {\it t_{104}} &=& {\it t_{90}}^5\\\\ 138C> {\it t_{105}} &=& {{1}\over{{\it t_{92}}^5}}\\\\ 139C> {\it t_{106}} &=& {\it t_{90}}^4\\\\ 140C> {\it t_{107}} &=& {{1}\over{{\it t_{92}}^4}}\\\\ 141C> {\it t_{108}} &=& {\it t_{90}}^3\\\\ 142C> {\it t_{109}} &=& {{1}\over{{\it t_{92}}^3}}\\\\ 143C> {\it t_{110}} &=& {\it t_{90}}^2\\\\ 144C> {\it t_{111}} &=& {{1}\over{{\it t_{92}}^2}}\\\\ 145C> {\it t_{112}} &=& {{1}\over{{\it t_{92}}}}\\\\ 146C> {\it t_{113}} &=& 0.552\,\left(1.0-{{1} 147C> \over{e^{0.003680288926019986\,{\it t_{87}}\, 148C> \sigma_{\beta\beta}}}}\right)+1.0\\\\ 149C> {\it t_{114}} &=& 0.9305257363491002\,{\it t_{82}}\,{\it t_{86}} 150C> -0.9305257363491002\,{\it t_{82}}\\\\ 151C> {\it t_{115}} &=& \rho_s^{{{4}\over{3}}}\\\\ 152C> {\it t_{116}} &=& \rho_s^{{{1}\over{3}}}\\\\ 153C> {\it t_{117}} &=& {{1}\over{{\it t_{116}}}}\\\\ 154C> {\it t_{118}} &=& {{1}\over{\rho_s}}\\\\ 155C> {\it t_{119}} &=& 1.0-0.04275941461768073\,{\it t_{117}} 156C> \,\left({{0.1282782438530422\,{\it t_{117}} 157C> -2.63857249068588 \times 10^{-4}\,{\it t_{118}}} 158C> \over{e^{243.0826598584318\,\rho_s^{{{2}\over{3}}}}}} 159C> -0.1924173657795633\,{\it t_{117}}+2.63857249068588 \times 10^{ 160C> -4}\,{\it t_{118}}+3.544907701811032\,\mathrm{erf} 161C> \left(15.59110835888301\,{\it t_{116}}\right)\right)\\\\ 162C> {\it t_{120}} &=& {{1}\over{\rho_s^{{{8}\over{3}}}}}\\\\ 163C> {\it t_{121}} &=& 0.804\,\left(1.0-{{1.0} 164C> \over{0.004492667444378077\,{\it t_{120}}\,\sigma_{ss} 165C> +1.0}}\right)+1.0\\\\ 166C> {\it t_{122}} &=& 9.115599744691192\,\rho_s^{{{5}\over{3}}}\\\\ 167C> {\it t_{123}} &=& {\it t_{122}}-2.0\,\tau_s\\\\ 168C> {\it t_{124}} &=& {\it t_{123}}^{11}\\\\ 169C> {\it t_{125}} &=& 2.0\,\tau_s+{\it t_{122}}\\\\ 170C> {\it t_{126}} &=& {{1}\over{{\it t_{125}}^{11}}}\\\\ 171C> {\it t_{127}} &=& {\it t_{123}}^{10}\\\\ 172C> {\it t_{128}} &=& {{1}\over{{\it t_{125}}^{10}}}\\\\ 173C> {\it t_{129}} &=& {\it t_{123}}^9\\\\ 174C> {\it t_{130}} &=& {{1}\over{{\it t_{125}}^9}}\\\\ 175C> {\it t_{131}} &=& {\it t_{123}}^8\\\\ 176C> {\it t_{132}} &=& {{1}\over{{\it t_{125}}^8}}\\\\ 177C> {\it t_{133}} &=& {\it t_{123}}^7\\\\ 178C> {\it t_{134}} &=& {{1}\over{{\it t_{125}}^7}}\\\\ 179C> {\it t_{135}} &=& {\it t_{123}}^6\\\\ 180C> {\it t_{136}} &=& {{1}\over{{\it t_{125}}^6}}\\\\ 181C> {\it t_{137}} &=& {\it t_{123}}^5\\\\ 182C> {\it t_{138}} &=& {{1}\over{{\it t_{125}}^5}}\\\\ 183C> {\it t_{139}} &=& {\it t_{123}}^4\\\\ 184C> {\it t_{140}} &=& {{1}\over{{\it t_{125}}^4}}\\\\ 185C> {\it t_{141}} &=& {\it t_{123}}^3\\\\ 186C> {\it t_{142}} &=& {{1}\over{{\it t_{125}}^3}}\\\\ 187C> {\it t_{143}} &=& {\it t_{123}}^2\\\\ 188C> {\it t_{144}} &=& {{1}\over{{\it t_{125}}^2}}\\\\ 189C> {\it t_{145}} &=& {{1}\over{{\it t_{125}}}}\\\\ 190C> {\it t_{146}} &=& 0.552\,\left(1.0-{{1} 191C> \over{e^{0.003680288926019986\,{\it t_{120}}\, 192C> \sigma_{ss}}}}\right)+1.0\\\\ 193C> {\it t_{147}} &=& 0.9305257363491002\,{\it t_{115}}\,{ 194C> \it t_{119}}-0.9305257363491002\,{\it t_{115}}\\\\ 195C> f &=& 1.0\,\left({\it t_{114}}\,{\it t_{113}}\,\left({ 196C> \it t_{81}}\,{\it t_{90}}\,{\it t_{112}}+{\it t_{80}}\,{ 197C> \it t_{110}}\,{\it t_{111}}+{\it t_{79}}\,{\it t_{108}}\,{ 198C> \it t_{109}}+{\it t_{78}}\,{\it t_{106}}\,{\it t_{107}}+{ 199C> \it t_{77}}\,{\it t_{104}}\,{\it t_{105}}+{\it t_{76}}\,{ 200C> \it t_{102}}\,{\it t_{103}}+{\it t_{75}}\,{\it t_{100}}\,{ 201C> \it t_{101}}+{\it t_{74}}\,{\it t_{98}}\,{\it t_{99}}+{ 202C> \it t_{73}}\,{\it t_{96}}\,{\it t_{97}}+{\it t_{72}}\,{ 203C> \it t_{94}}\,{\it t_{95}}+{\it t_{71}}\,{\it t_{91}}\,{ 204C> \it t_{93}}+{\it t_{70}}\right)+{\it t_{114}}\,{\it t_{88}} 205C> \,\left({\it t_{69}}\,{\it t_{90}}\,{\it t_{112}}+{\it t_{68}} 206C> \,{\it t_{110}}\,{\it t_{111}}+{\it t_{67}}\,{\it t_{108}} 207C> \,{\it t_{109}}+{\it t_{66}}\,{\it t_{106}}\,{\it t_{107}}+{ 208C> \it t_{65}}\,{\it t_{104}}\,{\it t_{105}}+{\it t_{64}}\,{ 209C> \it t_{102}}\,{\it t_{103}}+{\it t_{63}}\,{\it t_{100}}\,{ 210C> \it t_{101}}+{\it t_{62}}\,{\it t_{98}}\,{\it t_{99}}+{ 211C> \it t_{61}}\,{\it t_{96}}\,{\it t_{97}}+{\it t_{60}}\,{ 212C> \it t_{94}}\,{\it t_{95}}+{\it t_{59}}\,{\it t_{91}}\,{ 213C> \it t_{93}}+{\it t_{58}}\right)-0.9305257363491002\,{ 214C> \it t_{82}}\,{\it t_{86}}\,{\it t_{113}}\,\left({\it t_{56}} 215C> \,{\it t_{90}}\,{\it t_{112}}+{\it t_{55}}\,{\it t_{110}}\,{ 216C> \it t_{111}}+{\it t_{54}}\,{\it t_{108}}\,{\it t_{109}}+{ 217C> \it t_{53}}\,{\it t_{106}}\,{\it t_{107}}+{\it t_{52}}\,{ 218C> \it t_{104}}\,{\it t_{105}}+{\it t_{51}}\,{\it t_{102}}\,{ 219C> \it t_{103}}+{\it t_{50}}\,{\it t_{100}}\,{\it t_{101}}+{ 220C> \it t_{49}}\,{\it t_{98}}\,{\it t_{99}}+{\it t_{48}}\,{ 221C> \it t_{96}}\,{\it t_{97}}+{\it t_{47}}\,{\it t_{94}}\,{ 222C> \it t_{95}}+{\it t_{46}}\,{\it t_{91}}\,{\it t_{93}}+{ 223C> \it t_{45}}\right)-0.9305257363491002\,{\it t_{82}}\,{ 224C> \it t_{86}}\,{\it t_{88}}\,\left({\it t_{42}}\,{\it t_{90}} 225C> \,{\it t_{112}}+{\it t_{39}}\,{\it t_{110}}\,{\it t_{111}}+{ 226C> \it t_{36}}\,{\it t_{108}}\,{\it t_{109}}+{\it t_{33}}\,{ 227C> \it t_{106}}\,{\it t_{107}}+{\it t_{30}}\,{\it t_{104}}\,{ 228C> \it t_{105}}+{\it t_{27}}\,{\it t_{102}}\,{\it t_{103}}+{ 229C> \it t_{24}}\,{\it t_{100}}\,{\it t_{101}}+{\it t_{21}}\,{ 230C> \it t_{98}}\,{\it t_{99}}+{\it t_{18}}\,{\it t_{96}}\,{ 231C> \it t_{97}}+{\it t_{15}}\,{\it t_{94}}\,{\it t_{95}}+{\it t_9} 232C> \,{\it t_{91}}\,{\it t_{93}}+{\it t_8}\right)\right)+1.0 233C> \,\left({\it t_{57}}\,{\it t_{44}}\,\left({\it t_{81}}\,{ 234C> \it t_{11}}\,{\it t_{43}}+{\it t_{80}}\,{\it t_{40}}\,{ 235C> \it t_{41}}+{\it t_{79}}\,{\it t_{37}}\,{\it t_{38}}+{ 236C> \it t_{78}}\,{\it t_{34}}\,{\it t_{35}}+{\it t_{77}}\,{ 237C> \it t_{31}}\,{\it t_{32}}+{\it t_{76}}\,{\it t_{28}}\,{ 238C> \it t_{29}}+{\it t_{75}}\,{\it t_{25}}\,{\it t_{26}}+{ 239C> \it t_{74}}\,{\it t_{22}}\,{\it t_{23}}+{\it t_{73}}\,{ 240C> \it t_{19}}\,{\it t_{20}}+{\it t_{72}}\,{\it t_{16}}\,{ 241C> \it t_{17}}+{\it t_{71}}\,{\it t_{12}}\,{\it t_{14}}+{ 242C> \it t_{70}}\right)+{\it t_{57}}\,{\it t_7}\,\left({\it t_{69}} 243C> \,{\it t_{11}}\,{\it t_{43}}+{\it t_{68}}\,{\it t_{40}}\,{ 244C> \it t_{41}}+{\it t_{67}}\,{\it t_{37}}\,{\it t_{38}}+{ 245C> \it t_{66}}\,{\it t_{34}}\,{\it t_{35}}+{\it t_{65}}\,{ 246C> \it t_{31}}\,{\it t_{32}}+{\it t_{64}}\,{\it t_{28}}\,{ 247C> \it t_{29}}+{\it t_{63}}\,{\it t_{25}}\,{\it t_{26}}+{ 248C> \it t_{62}}\,{\it t_{22}}\,{\it t_{23}}+{\it t_{61}}\,{ 249C> \it t_{19}}\,{\it t_{20}}+{\it t_{60}}\,{\it t_{16}}\,{ 250C> \it t_{17}}+{\it t_{59}}\,{\it t_{12}}\,{\it t_{14}}+{ 251C> \it t_{58}}\right)-0.9305257363491002\,{\it t_1}\,{\it t_5} 252C> \,{\it t_{44}}\,\left({\it t_{56}}\,{\it t_{11}}\,{\it t_{43}} 253C> +{\it t_{55}}\,{\it t_{40}}\,{\it t_{41}}+{\it t_{54}}\,{ 254C> \it t_{37}}\,{\it t_{38}}+{\it t_{53}}\,{\it t_{34}}\,{ 255C> \it t_{35}}+{\it t_{52}}\,{\it t_{31}}\,{\it t_{32}}+{ 256C> \it t_{51}}\,{\it t_{28}}\,{\it t_{29}}+{\it t_{50}}\,{ 257C> \it t_{25}}\,{\it t_{26}}+{\it t_{49}}\,{\it t_{22}}\,{ 258C> \it t_{23}}+{\it t_{48}}\,{\it t_{19}}\,{\it t_{20}}+{ 259C> \it t_{47}}\,{\it t_{16}}\,{\it t_{17}}+{\it t_{46}}\,{ 260C> \it t_{12}}\,{\it t_{14}}+{\it t_{45}}\right) 261C> -0.9305257363491002\,{\it t_1}\,{\it t_5}\,{\it t_7}\, 262C> \left({\it t_{42}}\,{\it t_{11}}\,{\it t_{43}}+{\it t_{39}} 263C> \,{\it t_{40}}\,{\it t_{41}}+{\it t_{36}}\,{\it t_{37}}\,{ 264C> \it t_{38}}+{\it t_{33}}\,{\it t_{34}}\,{\it t_{35}}+{ 265C> \it t_{30}}\,{\it t_{31}}\,{\it t_{32}}+{\it t_{27}}\,{ 266C> \it t_{28}}\,{\it t_{29}}+{\it t_{24}}\,{\it t_{25}}\,{ 267C> \it t_{26}}+{\it t_{21}}\,{\it t_{22}}\,{\it t_{23}}+{ 268C> \it t_{18}}\,{\it t_{19}}\,{\it t_{20}}+{\it t_{15}}\,{ 269C> \it t_{16}}\,{\it t_{17}}+{\it t_9}\,{\it t_{12}}\,{\it t_{14}} 270C> +{\it t_8}\right)\right)\\\\ 271C> g &=& 0\\\\ 272C> G &=& 1.0\,\left({\it t_{147}}\,{\it t_{146}}\,\left({ 273C> \it t_{81}}\,{\it t_{123}}\,{\it t_{145}}+{\it t_{80}}\,{ 274C> \it t_{143}}\,{\it t_{144}}+{\it t_{79}}\,{\it t_{141}}\,{ 275C> \it t_{142}}+{\it t_{78}}\,{\it t_{139}}\,{\it t_{140}}+{ 276C> \it t_{77}}\,{\it t_{137}}\,{\it t_{138}}+{\it t_{76}}\,{ 277C> \it t_{135}}\,{\it t_{136}}+{\it t_{75}}\,{\it t_{133}}\,{ 278C> \it t_{134}}+{\it t_{74}}\,{\it t_{131}}\,{\it t_{132}}+{ 279C> \it t_{73}}\,{\it t_{129}}\,{\it t_{130}}+{\it t_{72}}\,{ 280C> \it t_{127}}\,{\it t_{128}}+{\it t_{71}}\,{\it t_{124}}\,{ 281C> \it t_{126}}+{\it t_{70}}\right)+{\it t_{147}}\,{\it t_{121}} 282C> \,\left({\it t_{69}}\,{\it t_{123}}\,{\it t_{145}}+{ 283C> \it t_{68}}\,{\it t_{143}}\,{\it t_{144}}+{\it t_{67}}\,{ 284C> \it t_{141}}\,{\it t_{142}}+{\it t_{66}}\,{\it t_{139}}\,{ 285C> \it t_{140}}+{\it t_{65}}\,{\it t_{137}}\,{\it t_{138}}+{ 286C> \it t_{64}}\,{\it t_{135}}\,{\it t_{136}}+{\it t_{63}}\,{ 287C> \it t_{133}}\,{\it t_{134}}+{\it t_{62}}\,{\it t_{131}}\,{ 288C> \it t_{132}}+{\it t_{61}}\,{\it t_{129}}\,{\it t_{130}}+{ 289C> \it t_{60}}\,{\it t_{127}}\,{\it t_{128}}+{\it t_{59}}\,{ 290C> \it t_{124}}\,{\it t_{126}}+{\it t_{58}}\right) 291C> -0.9305257363491002\,{\it t_{115}}\,{\it t_{119}}\,{ 292C> \it t_{146}}\,\left({\it t_{56}}\,{\it t_{123}}\,{\it t_{145}} 293C> +{\it t_{55}}\,{\it t_{143}}\,{\it t_{144}}+{\it t_{54}}\,{ 294C> \it t_{141}}\,{\it t_{142}}+{\it t_{53}}\,{\it t_{139}}\,{ 295C> \it t_{140}}+{\it t_{52}}\,{\it t_{137}}\,{\it t_{138}}+{ 296C> \it t_{51}}\,{\it t_{135}}\,{\it t_{136}}+{\it t_{50}}\,{ 297C> \it t_{133}}\,{\it t_{134}}+{\it t_{49}}\,{\it t_{131}}\,{ 298C> \it t_{132}}+{\it t_{48}}\,{\it t_{129}}\,{\it t_{130}}+{ 299C> \it t_{47}}\,{\it t_{127}}\,{\it t_{128}}+{\it t_{46}}\,{ 300C> \it t_{124}}\,{\it t_{126}}+{\it t_{45}}\right) 301C> -0.9305257363491002\,{\it t_{115}}\,{\it t_{119}}\,{ 302C> \it t_{121}}\,\left({\it t_{42}}\,{\it t_{123}}\,{\it t_{145}} 303C> +{\it t_{39}}\,{\it t_{143}}\,{\it t_{144}}+{\it t_{36}}\,{ 304C> \it t_{141}}\,{\it t_{142}}+{\it t_{33}}\,{\it t_{139}}\,{ 305C> \it t_{140}}+{\it t_{30}}\,{\it t_{137}}\,{\it t_{138}}+{ 306C> \it t_{27}}\,{\it t_{135}}\,{\it t_{136}}+{\it t_{24}}\,{ 307C> \it t_{133}}\,{\it t_{134}}+{\it t_{21}}\,{\it t_{131}}\,{ 308C> \it t_{132}}+{\it t_{18}}\,{\it t_{129}}\,{\it t_{130}}+{ 309C> \it t_{15}}\,{\it t_{127}}\,{\it t_{128}}+{\it t_9}\,{ 310C> \it t_{124}}\,{\it t_{126}}+{\it t_8}\right)\right)\\\\ 311C> \f} 312C> 313C> Code generated with Maxima 5.34.0 [2] 314C> driven by autoxc [3]. 315C> 316C> ### References ### 317C> 318C> [1] R Peverati, DG Truhlar, J.Phys.Chem.Lett. 2, 2810 (2011) , DOI: 319C> <a href="https://doi.org/10.1021/jz201170d "> 320C> 10.1021/jz201170d </a> 321C> 322C> [2] Maxima, a computer algebra system, 323C> <a href="http://maxima.sourceforge.net/"> 324C> http://maxima.sourceforge.net/</a> 325C> 326C> [3] autoxc, revision 27097 2015-05-08 327C> 328 subroutine nwxcm_x_m11(param,tol_rho,ipol,nq,wght, 329 +rho,rgamma,tau,fnc,Amat,Cmat,Mmat) 330c $Id: $ 331#ifdef NWXC_QUAD_PREC 332 implicit real(kind=selected_real_kind(30))(a-h,o-z),integer(i-n) 333 integer, parameter :: rk=selected_real_kind(30) 334#else 335 implicit real(kind=selected_real_kind(15))(a-h,o-z),integer(i-n) 336 integer, parameter :: rk=selected_real_kind(15) 337#endif 338#include "nwxc_param.fh" 339 double precision param(*) !< [Input] Parameters of functional 340 double precision tol_rho !< [Input] The lower limit on the density 341 integer ipol !< [Input] The number of spin channels 342 integer nq !< [Input] The number of points 343 double precision wght !< [Input] The weight of the functional 344 double precision rho(nq,NCOL_RHO) !< [Input] The density 345 double precision rgamma(nq,NCOL_GAMMA) !< [Input] The norm of the density 346 !< gradients 347 double precision tau(nq,NCOL_TAU) !< [Input] The kinetic energy density 348 double precision fnc(nq) !< [Output] The value of the functional 349c 350c Sampling Matrices for the XC Kernel 351c 352 double precision Amat(nq,NCOL_AMAT) !< [Output] The derivative wrt rho 353 double precision Cmat(nq,NCOL_CMAT) !< [Output] The derivative wrt rgamma 354 double precision Mmat(nq,NCOL_MMAT) !< [Output] The derivative wrt tau 355 integer iq 356 double precision tmp 357 double precision rhoa,rhob 358 double precision gammaaa,gammaab,gammabb 359 double precision taua,taub 360 double precision nwxcm_heaviside 361 external nwxcm_heaviside 362CDIR$ NOVECTOR 363 do iq = 1, nq 364 if (ipol.eq.1) then 365 rhoa = 0.5d0*rho(iq,R_T) 366 gammaaa = 0.25d0*rgamma(iq,G_TT) 367 taua = 0.5d0*tau(iq,T_T) 368 if (rhoa.gt.tol_rho) then 369 t1 = 1/rhoa**2.6666666666666666d+0 370 t2 = 4.492667444378077d-3*gammaaa*t1+1.0d+0 371 t3 = 8.04d-1*(1.0d+0-1.0d+0/t2)+1.0d+0 372 t4 = rhoa**1.3333333333333333d+0 373 t5 = rhoa**3.333333333333333d-1 374 t6 = 1/t5 375 t7 = 1/rhoa 376 t8 = 1.282782438530422d-1*t6-2.63857249068588d-4*t7 377 t9 = rhoa**6.666666666666666d-1 378 t10 = exp(-2.4308265985843178d+2*t9) 379 t11 = t10*t8+2.63857249068588d-4*t7-1.924173657795633d-1*t6+ 380 1 3.544907701811032d+0*erf(1.5591108358883013d+1*t5) 381 t12 = 1.0d+0-4.275941461768073d-2*t11*t6 382 t13 = param(12) 383 t14 = 9.115599744691192d+0*rhoa**1.6666666666666669d+0 384 t15 = t14-2.0d+0*taua 385 t16 = t15**11 386 t17 = 2.0d+0*taua+t14 387 t18 = 1/t17**11 388 t19 = param(11) 389 t20 = t15**10 390 t21 = 1/t17**10 391 t22 = param(10) 392 t23 = t15**9 393 t24 = 1/t17**9 394 t25 = param(9) 395 t26 = t15**8 396 t27 = 1/t17**8 397 t28 = param(8) 398 t29 = t15**7 399 t30 = 1/t17**7 400 t31 = param(7) 401 t32 = t15**6 402 t33 = 1/t17**6 403 t34 = param(6) 404 t35 = t15**5 405 t36 = 1/t17**5 406 t37 = param(5) 407 t38 = t15**4 408 t39 = 1/t17**4 409 t40 = param(4) 410 t41 = t15**3 411 t42 = 1/t17**3 412 t43 = param(3) 413 t44 = t15**2 414 t45 = 1/t17**2 415 t46 = param(2) 416 t47 = 1/t17 417 t48 = t15*t46*t47+t43*t44*t45+t40*t41*t42+t37*t38*t39+t34*t3 418 1 5*t36+t31*t32*t33+t28*t29*t30+t25*t26*t27+t22*t23*t24+t19 419 2 *t20*t21+t13*t16*t18+param(1) 420 t49 = exp(-3.6802889260199856d-3*gammaaa*t1) 421 t50 = 5.52d-1*(1.0d+0-t49)+1.0d+0 422 t51 = param(24) 423 t52 = param(23) 424 t53 = param(22) 425 t54 = param(21) 426 t55 = param(20) 427 t56 = param(19) 428 t57 = param(18) 429 t58 = param(17) 430 t59 = param(16) 431 t60 = param(15) 432 t61 = param(14) 433 t62 = t15*t47*t61+t44*t45*t60+t41*t42*t59+t38*t39*t58+t35*t3 434 1 6*t57+t32*t33*t56+t29*t30*t55+t26*t27*t54+t23*t24*t53+t20 435 2 *t21*t52+t16*t18*t51+param(13) 436 t63 = 9.305257363491002d-1*t12*t4-9.305257363491002d-1*t4 437 t64 = param(36) 438 t65 = param(35) 439 t66 = param(34) 440 t67 = param(33) 441 t68 = param(32) 442 t69 = param(31) 443 t70 = param(30) 444 t71 = param(29) 445 t72 = param(28) 446 t73 = param(27) 447 t74 = param(26) 448 t75 = t15*t47*t74+t44*t45*t73+t41*t42*t72+t38*t39*t71+t35*t3 449 1 6*t70+t32*t33*t69+t29*t30*t68+t26*t27*t67+t23*t24*t66+t20 450 2 *t21*t65+t16*t18*t64+param(25) 451 t76 = param(48) 452 t77 = param(47) 453 t78 = param(46) 454 t79 = param(45) 455 t80 = param(44) 456 t81 = param(43) 457 t82 = param(42) 458 t83 = param(41) 459 t84 = param(40) 460 t85 = param(39) 461 t86 = param(38) 462 t87 = t15*t47*t86+t44*t45*t85+t41*t42*t84+t38*t39*t83+t35*t3 463 1 6*t82+t32*t33*t81+t29*t30*t80+t26*t27*t79+t23*t24*t78+t20 464 2 *t21*t77+t16*t18*t76+param(37) 465 t88 = 1/t17**12 466 t89 = 1/t2**2 467 t90 = 1/rhoa**2.3333333333333334d+0 468 t91 = 1/t4 469 t92 = 1/rhoa**2 470 t93 = 1.4253138205893576d-2*t11*t91-4.275941461768073d-2*t6* 471 1 (-2.63857249068588d-4*t92+t10*(2.63857249068588d-4*t92-4. 472 2 2759414617680735d-2*t91)+6.41391219265211d-2*t91+2.078814 473 3 4478510684d+1*t10/t9-1.6205510657228786d+2*t10*t6*t8) 474 t94 = 1/rhoa**3.6666666666666664d+0 475 t95 = 9.305257363491002d-1*t4*t93+1.2407009817988002d+0*t12* 476 1 t5-1.2407009817988002d+0*t5 477 fnc(iq) = 2.0d+0*(t50*t63*t87+t3*t63*t75-9.305257363491002d- 478 1 1*t12*t4*t50*t62-9.305257363491002d-1*t12*t3*t4*t48)*wght 479 2 +fnc(iq) 480 Amat(iq,D1_RA) = 1.0d+0*(t50*t87*t95+t3*t75*t95-9.6322790007 481 1 46596d-3*gammaaa*t63*t75*t89*t94-5.417385299101419d-3*gam 482 2 maaa*t49*t63*t87*t94-9.305257363491002d-1*t4*t50*t62*t93- 483 3 9.305257363491002d-1*t3*t4*t48*t93+8.963083509889702d-3*g 484 4 ammaaa*t12*t48*t89*t90+5.041016444533138d-3*gammaaa*t12*t 485 5 49*t62*t90+t50*t63*(-1.6711932865267184d+2*t16*t76*t88*t9 486 6 +1.5192666241151986d+1*t47*t86*t9-1.5192666241151986d+1*t 487 7 15*t45*t86*t9+3.038533248230397d+1*t15*t45*t85*t9-3.03853 488 8 3248230397d+1*t42*t44*t85*t9+4.5577998723455965d+1*t42*t4 489 9 4*t84*t9-4.5577998723455965d+1*t39*t41*t84*t9+6.077066496 490 : 460795d+1*t39*t41*t83*t9-6.077066496460795d+1*t36*t38*t83 491 ; *t9+7.596333120575993d+1*t36*t38*t82*t9-7.596333120575993 492 < d+1*t33*t35*t82*t9+9.115599744691193d+1*t33*t35*t81*t9-9. 493 = 115599744691193d+1*t30*t32*t81*t9+1.0634866368806391d+2*t 494 > 30*t32*t80*t9-1.0634866368806391d+2*t27*t29*t80*t9+1.2154 495 ? 132992921589d+2*t27*t29*t79*t9-1.2154132992921589d+2*t24* 496 @ t26*t79*t9+1.3673399617036788d+2*t24*t26*t78*t9-1.3673399 497 1 617036788d+2*t21*t23*t78*t9+1.5192666241151986d+2*t21*t23 498 2 *t77*t9-1.5192666241151986d+2*t18*t20*t77*t9+1.6711932865 499 3 267184d+2*t18*t20*t76*t9)+t3*t63*(-1.6711932865267184d+2* 500 4 t16*t64*t88*t9+1.5192666241151986d+1*t47*t74*t9-1.5192666 501 5 241151986d+1*t15*t45*t74*t9+3.038533248230397d+1*t15*t45* 502 6 t73*t9-3.038533248230397d+1*t42*t44*t73*t9+4.557799872345 503 7 5965d+1*t42*t44*t72*t9-4.5577998723455965d+1*t39*t41*t72* 504 8 t9+6.077066496460795d+1*t39*t41*t71*t9-6.077066496460795d 505 9 +1*t36*t38*t71*t9+7.596333120575993d+1*t36*t38*t70*t9-7.5 506 : 96333120575993d+1*t33*t35*t70*t9+9.115599744691193d+1*t33 507 ; *t35*t69*t9-9.115599744691193d+1*t30*t32*t69*t9+1.0634866 508 < 368806391d+2*t30*t32*t68*t9-1.0634866368806391d+2*t27*t29 509 = *t68*t9+1.2154132992921589d+2*t27*t29*t67*t9-1.2154132992 510 > 921589d+2*t24*t26*t67*t9+1.3673399617036788d+2*t24*t26*t6 511 ? 6*t9-1.3673399617036788d+2*t21*t23*t66*t9+1.5192666241151 512 @ 986d+2*t21*t23*t65*t9-1.5192666241151986d+2*t18*t20*t65*t 513 1 9+1.6711932865267184d+2*t18*t20*t64*t9)-9.305257363491002 514 2 d-1*t12*t4*t50*(-1.6711932865267184d+2*t16*t51*t88*t9+1.5 515 3 192666241151986d+1*t47*t61*t9-1.5192666241151986d+1*t15*t 516 4 45*t61*t9+3.038533248230397d+1*t15*t45*t60*t9-3.038533248 517 5 230397d+1*t42*t44*t60*t9+4.5577998723455965d+1*t42*t44*t5 518 6 9*t9-4.5577998723455965d+1*t39*t41*t59*t9+6.0770664964607 519 7 95d+1*t39*t41*t58*t9-6.077066496460795d+1*t36*t38*t58*t9+ 520 8 7.596333120575993d+1*t36*t38*t57*t9-7.596333120575993d+1* 521 9 t33*t35*t57*t9+9.115599744691193d+1*t33*t35*t56*t9-9.1155 522 : 99744691193d+1*t30*t32*t56*t9+1.0634866368806391d+2*t30*t 523 ; 32*t55*t9-1.0634866368806391d+2*t27*t29*t55*t9+1.21541329 524 < 92921589d+2*t27*t29*t54*t9-1.2154132992921589d+2*t24*t26* 525 = t54*t9+1.3673399617036788d+2*t24*t26*t53*t9-1.36733996170 526 > 36788d+2*t21*t23*t53*t9+1.5192666241151986d+2*t21*t23*t52 527 ? *t9-1.5192666241151986d+2*t18*t20*t52*t9+1.67119328652671 528 @ 84d+2*t18*t20*t51*t9)-9.305257363491002d-1*t12*t3*t4*(-1. 529 1 6711932865267184d+2*t13*t16*t88*t9+1.5192666241151986d+1* 530 2 t46*t47*t9-1.5192666241151986d+1*t15*t45*t46*t9+3.0385332 531 3 48230397d+1*t15*t43*t45*t9-3.038533248230397d+1*t42*t43*t 532 4 44*t9+4.5577998723455965d+1*t40*t42*t44*t9-4.557799872345 533 5 5965d+1*t39*t40*t41*t9+6.077066496460795d+1*t37*t39*t41*t 534 6 9-6.077066496460795d+1*t36*t37*t38*t9+7.596333120575993d+ 535 7 1*t34*t36*t38*t9-7.596333120575993d+1*t33*t34*t35*t9+9.11 536 8 5599744691193d+1*t31*t33*t35*t9-9.115599744691193d+1*t30* 537 9 t31*t32*t9+1.0634866368806391d+2*t28*t30*t32*t9-1.0634866 538 : 368806391d+2*t27*t28*t29*t9+1.2154132992921589d+2*t25*t27 539 ; *t29*t9-1.2154132992921589d+2*t24*t25*t26*t9+1.3673399617 540 < 036788d+2*t22*t24*t26*t9-1.3673399617036788d+2*t21*t22*t2 541 = 3*t9+1.5192666241151986d+2*t19*t21*t23*t9-1.5192666241151 542 > 986d+2*t18*t19*t20*t9+1.6711932865267184d+2*t13*t18*t20*t 543 ? 9)-1.2407009817988002d+0*t12*t5*t50*t62-1.240700981798800 544 @ 2d+0*t12*t3*t48*t5)*wght+Amat(iq,D1_RA) 545 Cmat(iq,D1_GAA) = 1.0d+0*(-3.361156316208638d-3*t12*t48*t89* 546 1 t91-1.890381166699927d-3*t12*t49*t62*t91+3.61210462527997 547 2 4d-3*t1*t63*t75*t89+2.0315194871630324d-3*t1*t49*t63*t87) 548 3 *wght+Cmat(iq,D1_GAA) 549 Cmat(iq,D1_GAB) = Cmat(iq,D1_GAB) 550 Mmat(iq,D1_TA) = 1.0d+0*(t50*t63*(-2.2d+1*t16*t76*t88-2.0d+0 551 1 *t47*t86-2.0d+0*t15*t45*t86-4.0d+0*t15*t45*t85-4.0d+0*t42 552 2 *t44*t85-6.0d+0*t42*t44*t84-6.0d+0*t39*t41*t84-8.0d+0*t39 553 3 *t41*t83-8.0d+0*t36*t38*t83-1.0d+1*t36*t38*t82-1.0d+1*t33 554 4 *t35*t82-1.2d+1*t33*t35*t81-1.2d+1*t30*t32*t81-1.4d+1*t30 555 5 *t32*t80-1.4d+1*t27*t29*t80-1.6d+1*t27*t29*t79-1.6d+1*t24 556 6 *t26*t79-1.8d+1*t24*t26*t78-1.8d+1*t21*t23*t78-2.0d+1*t21 557 7 *t23*t77-2.0d+1*t18*t20*t77-2.2d+1*t18*t20*t76)+t3*t63*(- 558 8 2.2d+1*t16*t64*t88-2.0d+0*t47*t74-2.0d+0*t15*t45*t74-4.0d 559 9 +0*t15*t45*t73-4.0d+0*t42*t44*t73-6.0d+0*t42*t44*t72-6.0d 560 : +0*t39*t41*t72-8.0d+0*t39*t41*t71-8.0d+0*t36*t38*t71-1.0d 561 ; +1*t36*t38*t70-1.0d+1*t33*t35*t70-1.2d+1*t33*t35*t69-1.2d 562 < +1*t30*t32*t69-1.4d+1*t30*t32*t68-1.4d+1*t27*t29*t68-1.6d 563 = +1*t27*t29*t67-1.6d+1*t24*t26*t67-1.8d+1*t24*t26*t66-1.8d 564 > +1*t21*t23*t66-2.0d+1*t21*t23*t65-2.0d+1*t18*t20*t65-2.2d 565 ? +1*t18*t20*t64)-9.305257363491002d-1*t12*t4*t50*(-2.2d+1* 566 @ t16*t51*t88-2.0d+0*t47*t61-2.0d+0*t15*t45*t61-4.0d+0*t15* 567 1 t45*t60-4.0d+0*t42*t44*t60-6.0d+0*t42*t44*t59-6.0d+0*t39* 568 2 t41*t59-8.0d+0*t39*t41*t58-8.0d+0*t36*t38*t58-1.0d+1*t36* 569 3 t38*t57-1.0d+1*t33*t35*t57-1.2d+1*t33*t35*t56-1.2d+1*t30* 570 4 t32*t56-1.4d+1*t30*t32*t55-1.4d+1*t27*t29*t55-1.6d+1*t27* 571 5 t29*t54-1.6d+1*t24*t26*t54-1.8d+1*t24*t26*t53-1.8d+1*t21* 572 6 t23*t53-2.0d+1*t21*t23*t52-2.0d+1*t18*t20*t52-2.2d+1*t18* 573 7 t20*t51)-9.305257363491002d-1*t12*t3*t4*(-2.2d+1*t13*t16* 574 8 t88-2.0d+0*t46*t47-2.0d+0*t15*t45*t46-4.0d+0*t15*t43*t45- 575 9 4.0d+0*t42*t43*t44-6.0d+0*t40*t42*t44-6.0d+0*t39*t40*t41- 576 : 8.0d+0*t37*t39*t41-8.0d+0*t36*t37*t38-1.0d+1*t34*t36*t38- 577 ; 1.0d+1*t33*t34*t35-1.2d+1*t31*t33*t35-1.2d+1*t30*t31*t32- 578 < 1.4d+1*t28*t30*t32-1.4d+1*t27*t28*t29-1.6d+1*t25*t27*t29- 579 = 1.6d+1*t24*t25*t26-1.8d+1*t22*t24*t26-1.8d+1*t21*t22*t23- 580 > 2.0d+1*t19*t21*t23-2.0d+1*t18*t19*t20-2.2d+1*t13*t18*t20) 581 ? )*wght+Mmat(iq,D1_TA) 582 endif ! rhoa.gt.tol_rho 583 else ! ipol.eq.1 584 rhoa = rho(iq,R_A) 585 rhob = rho(iq,R_B) 586 gammaaa = rgamma(iq,G_AA) 587 gammaab = rgamma(iq,G_AB) 588 gammabb = rgamma(iq,G_BB) 589 taua = tau(iq,T_A) 590 taub = tau(iq,T_B) 591 if (rhoa.gt.tol_rho.and.rhob.gt.tol_rho) then 592 t1 = 1/rhoa**2.6666666666666666d+0 593 t2 = 4.492667444378077d-3*gammaaa*t1+1.0d+0 594 t3 = 8.04d-1*(1.0d+0-1.0d+0/t2)+1.0d+0 595 t4 = rhoa**1.3333333333333333d+0 596 t5 = rhoa**3.333333333333333d-1 597 t6 = 1/t5 598 t7 = 1/rhoa 599 t8 = 1.282782438530422d-1*t6-2.63857249068588d-4*t7 600 t9 = rhoa**6.666666666666666d-1 601 t10 = exp(-2.4308265985843178d+2*t9) 602 t11 = t10*t8+2.63857249068588d-4*t7-1.924173657795633d-1*t6+ 603 1 3.544907701811032d+0*erf(1.5591108358883013d+1*t5) 604 t12 = 1.0d+0-4.275941461768073d-2*t11*t6 605 t13 = param(1) 606 t14 = param(12) 607 t15 = 9.115599744691192d+0*rhoa**1.6666666666666669d+0 608 t16 = t15-2.0d+0*taua 609 t17 = t16**11 610 t18 = 2.0d+0*taua+t15 611 t19 = 1/t18**11 612 t20 = param(11) 613 t21 = t16**10 614 t22 = 1/t18**10 615 t23 = param(10) 616 t24 = t16**9 617 t25 = 1/t18**9 618 t26 = param(9) 619 t27 = t16**8 620 t28 = 1/t18**8 621 t29 = param(8) 622 t30 = t16**7 623 t31 = 1/t18**7 624 t32 = param(7) 625 t33 = t16**6 626 t34 = 1/t18**6 627 t35 = param(6) 628 t36 = t16**5 629 t37 = 1/t18**5 630 t38 = param(5) 631 t39 = t16**4 632 t40 = 1/t18**4 633 t41 = param(4) 634 t42 = t16**3 635 t43 = 1/t18**3 636 t44 = param(3) 637 t45 = t16**2 638 t46 = 1/t18**2 639 t47 = param(2) 640 t48 = 1/t18 641 t49 = t16*t47*t48+t44*t45*t46+t41*t42*t43+t38*t39*t40+t35*t3 642 1 6*t37+t32*t33*t34+t29*t30*t31+t26*t27*t28+t23*t24*t25+t20 643 2 *t21*t22+t14*t17*t19+t13 644 t50 = exp(-3.6802889260199856d-3*gammaaa*t1) 645 t51 = 5.52d-1*(1.0d+0-t50)+1.0d+0 646 t52 = param(13) 647 t53 = param(24) 648 t54 = param(23) 649 t55 = param(22) 650 t56 = param(21) 651 t57 = param(20) 652 t58 = param(19) 653 t59 = param(18) 654 t60 = param(17) 655 t61 = param(16) 656 t62 = param(15) 657 t63 = param(14) 658 t64 = t16*t48*t63+t45*t46*t62+t42*t43*t61+t39*t40*t60+t36*t3 659 1 7*t59+t33*t34*t58+t30*t31*t57+t27*t28*t56+t24*t25*t55+t21 660 2 *t22*t54+t17*t19*t53+t52 661 t65 = 9.305257363491002d-1*t12*t4-9.305257363491002d-1*t4 662 t66 = param(25) 663 t67 = param(36) 664 t68 = param(35) 665 t69 = param(34) 666 t70 = param(33) 667 t71 = param(32) 668 t72 = param(31) 669 t73 = param(30) 670 t74 = param(29) 671 t75 = param(28) 672 t76 = param(27) 673 t77 = param(26) 674 t78 = t16*t48*t77+t45*t46*t76+t42*t43*t75+t39*t40*t74+t36*t3 675 1 7*t73+t33*t34*t72+t30*t31*t71+t27*t28*t70+t24*t25*t69+t21 676 2 *t22*t68+t17*t19*t67+t66 677 t79 = param(37) 678 t80 = param(48) 679 t81 = param(47) 680 t82 = param(46) 681 t83 = param(45) 682 t84 = param(44) 683 t85 = param(43) 684 t86 = param(42) 685 t87 = param(41) 686 t88 = param(40) 687 t89 = param(39) 688 t90 = param(38) 689 t91 = t16*t48*t90+t45*t46*t89+t42*t43*t88+t39*t40*t87+t36*t3 690 1 7*t86+t33*t34*t85+t30*t31*t84+t27*t28*t83+t24*t25*t82+t21 691 2 *t22*t81+t17*t19*t80+t79 692 t92 = 1/rhob**2.6666666666666666d+0 693 t93 = 4.492667444378077d-3*gammabb*t92+1.0d+0 694 t94 = 8.04d-1*(1.0d+0-1.0d+0/t93)+1.0d+0 695 t95 = rhob**1.3333333333333333d+0 696 t96 = rhob**3.333333333333333d-1 697 t97 = 1/t96 698 t98 = 1/rhob 699 t99 = 1.282782438530422d-1*t97-2.63857249068588d-4*t98 700 t100 = rhob**6.666666666666666d-1 701 t101 = exp(-2.4308265985843178d+2*t100) 702 t102 = t101*t99+2.63857249068588d-4*t98-1.924173657795633d-1 703 1 *t97+3.544907701811032d+0*erf(1.5591108358883013d+1*t96) 704 t103 = 1.0d+0-4.275941461768073d-2*t102*t97 705 t104 = 9.115599744691192d+0*rhob**1.6666666666666669d+0 706 t105 = t104-2.0d+0*taub 707 t106 = t105**11 708 t107 = 2.0d+0*taub+t104 709 t108 = 1/t107**11 710 t109 = t105**10 711 t110 = 1/t107**10 712 t111 = t105**9 713 t112 = 1/t107**9 714 t113 = t105**8 715 t114 = 1/t107**8 716 t115 = t105**7 717 t116 = 1/t107**7 718 t117 = t105**6 719 t118 = 1/t107**6 720 t119 = t105**5 721 t120 = 1/t107**5 722 t121 = t105**4 723 t122 = 1/t107**4 724 t123 = t105**3 725 t124 = 1/t107**3 726 t125 = t105**2 727 t126 = 1/t107**2 728 t127 = 1/t107 729 t128 = t105*t127*t47+t125*t126*t44+t123*t124*t41+t121*t122*t 730 1 38+t119*t120*t35+t117*t118*t32+t115*t116*t29+t113*t114*t2 731 2 6+t111*t112*t23+t109*t110*t20+t106*t108*t14+t13 732 t129 = exp(-3.6802889260199856d-3*gammabb*t92) 733 t130 = 5.52d-1*(1.0d+0-t129)+1.0d+0 734 t131 = t105*t127*t63+t125*t126*t62+t123*t124*t61+t121*t122*t 735 1 60+t119*t120*t59+t117*t118*t58+t115*t116*t57+t113*t114*t5 736 2 6+t111*t112*t55+t109*t110*t54+t106*t108*t53+t52 737 t132 = 9.305257363491002d-1*t103*t95-9.305257363491002d-1*t9 738 1 5 739 t133 = t105*t127*t77+t125*t126*t76+t123*t124*t75+t121*t122*t 740 1 74+t119*t120*t73+t117*t118*t72+t115*t116*t71+t113*t114*t7 741 2 0+t111*t112*t69+t109*t110*t68+t106*t108*t67+t66 742 t134 = t105*t127*t90+t125*t126*t89+t123*t124*t88+t121*t122*t 743 1 87+t119*t120*t86+t117*t118*t85+t115*t116*t84+t113*t114*t8 744 2 3+t111*t112*t82+t109*t110*t81+t106*t108*t80+t79 745 t135 = 1/t18**12 746 t136 = 1/t2**2 747 t137 = 1/rhoa**2.3333333333333334d+0 748 t138 = 1/t4 749 t139 = 1/rhoa**2 750 t140 = 5.641895835477563d-1 751 t141 = 1.4253138205893576d-2*t11*t138-4.275941461768073d-2*t 752 1 6*(3.6846026734116505d+1*t10*t140/t9-1.6205510657228786d+ 753 2 2*t10*t6*t8-2.63857249068588d-4*t139+t10*(2.6385724906858 754 3 8d-4*t139-4.2759414617680735d-2*t138)+6.41391219265211d-2 755 4 *t138) 756 t142 = 1/rhoa**3.6666666666666664d+0 757 t143 = 1.2407009817988002d+0*t12*t5-1.2407009817988002d+0*t5 758 1 +9.305257363491002d-1*t141*t4 759 t144 = 1/t107**12 760 t145 = 1/t93**2 761 t146 = 1/rhob**2.3333333333333334d+0 762 t147 = 1/t95 763 t148 = 1/rhob**2 764 t149 = 1.4253138205893576d-2*t102*t147-4.275941461768073d-2* 765 1 t97*(-1.6205510657228786d+2*t101*t97*t99-2.63857249068588 766 2 d-4*t148+t101*(2.63857249068588d-4*t148-4.275941461768073 767 3 5d-2*t147)+6.41391219265211d-2*t147+3.6846026734116505d+1 768 4 *t101*t140/t100) 769 t150 = 1/rhob**3.6666666666666664d+0 770 t151 = 1.2407009817988002d+0*t103*t96-1.2407009817988002d+0* 771 1 t96+9.305257363491002d-1*t149*t95 772 fnc(iq) = (1.0d+0*(-9.305257363491002d-1*t103*t128*t94*t95-9 773 1 .305257363491002d-1*t103*t130*t131*t95+t132*t133*t94+t130 774 2 *t132*t134)+1.0d+0*(t51*t65*t91+t3*t65*t78-9.305257363491 775 3 002d-1*t12*t4*t51*t64-9.305257363491002d-1*t12*t3*t4*t49) 776 4 )*wght+fnc(iq) 777 Amat(iq,D1_RA) = 1.0d+0*(-5.417385299101419d-3*gammaaa*t142* 778 1 t50*t65*t91+t143*t51*t91+t51*t65*(1.5192666241151986d+1*t 779 2 48*t9*t90-1.5192666241151986d+1*t16*t46*t9*t90+3.03853324 780 3 8230397d+1*t16*t46*t89*t9-3.038533248230397d+1*t43*t45*t8 781 4 9*t9+4.5577998723455965d+1*t43*t45*t88*t9-4.5577998723455 782 5 965d+1*t40*t42*t88*t9+6.077066496460795d+1*t40*t42*t87*t9 783 6 -6.077066496460795d+1*t37*t39*t87*t9+7.596333120575993d+1 784 7 *t37*t39*t86*t9-7.596333120575993d+1*t34*t36*t86*t9+9.115 785 8 599744691193d+1*t34*t36*t85*t9-9.115599744691193d+1*t31*t 786 9 33*t85*t9+1.0634866368806391d+2*t31*t33*t84*t9-1.06348663 787 : 68806391d+2*t28*t30*t84*t9+1.2154132992921589d+2*t28*t30* 788 ; t83*t9-1.2154132992921589d+2*t25*t27*t83*t9+1.36733996170 789 < 36788d+2*t25*t27*t82*t9-1.3673399617036788d+2*t22*t24*t82 790 = *t9+1.5192666241151986d+2*t22*t24*t81*t9-1.51926662411519 791 > 86d+2*t19*t21*t81*t9+1.6711932865267184d+2*t19*t21*t80*t9 792 ? -1.6711932865267184d+2*t135*t17*t80*t9)+t3*t65*(1.5192666 793 @ 241151986d+1*t48*t77*t9-1.5192666241151986d+1*t16*t46*t77 794 1 *t9+3.038533248230397d+1*t16*t46*t76*t9-3.038533248230397 795 2 d+1*t43*t45*t76*t9+4.5577998723455965d+1*t43*t45*t75*t9-4 796 3 .5577998723455965d+1*t40*t42*t75*t9+6.077066496460795d+1* 797 4 t40*t42*t74*t9-6.077066496460795d+1*t37*t39*t74*t9+7.5963 798 5 33120575993d+1*t37*t39*t73*t9-7.596333120575993d+1*t34*t3 799 6 6*t73*t9+9.115599744691193d+1*t34*t36*t72*t9-9.1155997446 800 7 91193d+1*t31*t33*t72*t9+1.0634866368806391d+2*t31*t33*t71 801 8 *t9-1.0634866368806391d+2*t28*t30*t71*t9+1.21541329929215 802 9 89d+2*t28*t30*t70*t9-1.2154132992921589d+2*t25*t27*t70*t9 803 : +1.3673399617036788d+2*t25*t27*t69*t9-1.3673399617036788d 804 ; +2*t22*t24*t69*t9+1.5192666241151986d+2*t22*t24*t68*t9-1. 805 < 5192666241151986d+2*t19*t21*t68*t9+1.6711932865267184d+2* 806 = t19*t21*t67*t9-1.6711932865267184d+2*t135*t17*t67*t9)-9.3 807 > 05257363491002d-1*t12*t4*t51*(1.5192666241151986d+1*t48*t 808 ? 63*t9-1.5192666241151986d+1*t16*t46*t63*t9+3.038533248230 809 @ 397d+1*t16*t46*t62*t9-3.038533248230397d+1*t43*t45*t62*t9 810 1 +4.5577998723455965d+1*t43*t45*t61*t9-4.5577998723455965d 811 2 +1*t40*t42*t61*t9+6.077066496460795d+1*t40*t42*t60*t9-6.0 812 3 77066496460795d+1*t37*t39*t60*t9+7.596333120575993d+1*t37 813 4 *t39*t59*t9-7.596333120575993d+1*t34*t36*t59*t9+9.1155997 814 5 44691193d+1*t34*t36*t58*t9-9.115599744691193d+1*t31*t33*t 815 6 58*t9+1.0634866368806391d+2*t31*t33*t57*t9-1.063486636880 816 7 6391d+2*t28*t30*t57*t9+1.2154132992921589d+2*t28*t30*t56* 817 8 t9-1.2154132992921589d+2*t25*t27*t56*t9+1.367339961703678 818 9 8d+2*t25*t27*t55*t9-1.3673399617036788d+2*t22*t24*t55*t9+ 819 : 1.5192666241151986d+2*t22*t24*t54*t9-1.5192666241151986d+ 820 ; 2*t19*t21*t54*t9+1.6711932865267184d+2*t19*t21*t53*t9-1.6 821 < 711932865267184d+2*t135*t17*t53*t9)-9.305257363491002d-1* 822 = t12*t3*t4*(1.5192666241151986d+1*t47*t48*t9-1.51926662411 823 > 51986d+1*t16*t46*t47*t9+3.038533248230397d+1*t16*t44*t46* 824 ? t9-3.038533248230397d+1*t43*t44*t45*t9+4.5577998723455965 825 @ d+1*t41*t43*t45*t9-4.5577998723455965d+1*t40*t41*t42*t9+6 826 1 .077066496460795d+1*t38*t40*t42*t9-6.077066496460795d+1*t 827 2 37*t38*t39*t9+7.596333120575993d+1*t35*t37*t39*t9-7.59633 828 3 3120575993d+1*t34*t35*t36*t9+9.115599744691193d+1*t32*t34 829 4 *t36*t9-9.115599744691193d+1*t31*t32*t33*t9+1.06348663688 830 5 06391d+2*t29*t31*t33*t9-1.0634866368806391d+2*t28*t29*t30 831 6 *t9+1.2154132992921589d+2*t26*t28*t30*t9-1.21541329929215 832 7 89d+2*t25*t26*t27*t9+1.3673399617036788d+2*t23*t25*t27*t9 833 8 -1.3673399617036788d+2*t22*t23*t24*t9+1.5192666241151986d 834 9 +2*t20*t22*t24*t9-1.5192666241151986d+2*t19*t20*t21*t9+1. 835 : 6711932865267184d+2*t14*t19*t21*t9-1.6711932865267184d+2* 836 ; t135*t14*t17*t9)-9.632279000746596d-3*gammaaa*t136*t142*t 837 < 65*t78+t143*t3*t78-1.2407009817988002d+0*t12*t5*t51*t64-9 838 = .305257363491002d-1*t141*t4*t51*t64+5.041016444533138d-3* 839 > gammaaa*t12*t137*t50*t64-1.2407009817988002d+0*t12*t3*t49 840 ? *t5-9.305257363491002d-1*t141*t3*t4*t49+8.963083509889702 841 @ d-3*gammaaa*t12*t136*t137*t49)*wght+Amat(iq,D1_RA) 842 Amat(iq,D1_RB) = 1.0d+0*(-1.2407009817988002d+0*t103*t128*t9 843 1 4*t96-1.2407009817988002d+0*t103*t130*t131*t96-9.30525736 844 2 3491002d-1*t103*(1.5192666241151986d+1*t100*t127*t47-1.51 845 3 92666241151986d+1*t100*t105*t126*t47+3.038533248230397d+1 846 4 *t100*t105*t126*t44-3.038533248230397d+1*t100*t124*t125*t 847 5 44+4.5577998723455965d+1*t100*t124*t125*t41-4.55779987234 848 6 55965d+1*t100*t122*t123*t41+6.077066496460795d+1*t100*t12 849 7 2*t123*t38-6.077066496460795d+1*t100*t120*t121*t38+7.5963 850 8 33120575993d+1*t100*t120*t121*t35-7.596333120575993d+1*t1 851 9 00*t118*t119*t35+9.115599744691193d+1*t100*t118*t119*t32- 852 : 9.115599744691193d+1*t100*t116*t117*t32+1.063486636880639 853 ; 1d+2*t100*t116*t117*t29-1.0634866368806391d+2*t100*t114*t 854 < 115*t29+1.2154132992921589d+2*t100*t114*t115*t26-1.215413 855 = 2992921589d+2*t100*t112*t113*t26+1.3673399617036788d+2*t1 856 > 00*t112*t113*t23-1.3673399617036788d+2*t100*t110*t111*t23 857 ? +1.5192666241151986d+2*t100*t110*t111*t20-1.5192666241151 858 @ 986d+2*t100*t108*t109*t20-1.6711932865267184d+2*t100*t106 859 1 *t14*t144+1.6711932865267184d+2*t100*t108*t109*t14)*t94*t 860 2 95-9.305257363491002d-1*t128*t149*t94*t95-9.3052573634910 861 3 02d-1*t103*t130*(1.5192666241151986d+1*t100*t127*t63-1.51 862 4 92666241151986d+1*t100*t105*t126*t63+3.038533248230397d+1 863 5 *t100*t105*t126*t62-3.038533248230397d+1*t100*t124*t125*t 864 6 62+4.5577998723455965d+1*t100*t124*t125*t61-4.55779987234 865 7 55965d+1*t100*t122*t123*t61+6.077066496460795d+1*t100*t12 866 8 2*t123*t60-6.077066496460795d+1*t100*t120*t121*t60+7.5963 867 9 33120575993d+1*t100*t120*t121*t59-7.596333120575993d+1*t1 868 : 00*t118*t119*t59+9.115599744691193d+1*t100*t118*t119*t58- 869 ; 9.115599744691193d+1*t100*t116*t117*t58+1.063486636880639 870 < 1d+2*t100*t116*t117*t57-1.0634866368806391d+2*t100*t114*t 871 = 115*t57+1.2154132992921589d+2*t100*t114*t115*t56-1.215413 872 > 2992921589d+2*t100*t112*t113*t56+1.3673399617036788d+2*t1 873 ? 00*t112*t113*t55-1.3673399617036788d+2*t100*t110*t111*t55 874 @ +1.5192666241151986d+2*t100*t110*t111*t54-1.5192666241151 875 1 986d+2*t100*t108*t109*t54-1.6711932865267184d+2*t100*t106 876 2 *t144*t53+1.6711932865267184d+2*t100*t108*t109*t53)*t95-9 877 3 .305257363491002d-1*t130*t131*t149*t95+t132*(1.5192666241 878 4 151986d+1*t100*t127*t77-1.5192666241151986d+1*t100*t105*t 879 5 126*t77+3.038533248230397d+1*t100*t105*t126*t76-3.0385332 880 6 48230397d+1*t100*t124*t125*t76+4.5577998723455965d+1*t100 881 7 *t124*t125*t75-4.5577998723455965d+1*t100*t122*t123*t75+6 882 8 .077066496460795d+1*t100*t122*t123*t74-6.077066496460795d 883 9 +1*t100*t120*t121*t74+7.596333120575993d+1*t100*t120*t121 884 : *t73-7.596333120575993d+1*t100*t118*t119*t73+9.1155997446 885 ; 91193d+1*t100*t118*t119*t72-9.115599744691193d+1*t100*t11 886 < 6*t117*t72+1.0634866368806391d+2*t100*t116*t117*t71-1.063 887 = 4866368806391d+2*t100*t114*t115*t71+1.2154132992921589d+2 888 > *t100*t114*t115*t70-1.2154132992921589d+2*t100*t112*t113* 889 ? t70+1.3673399617036788d+2*t100*t112*t113*t69-1.3673399617 890 @ 036788d+2*t100*t110*t111*t69+1.5192666241151986d+2*t100*t 891 1 110*t111*t68-1.5192666241151986d+2*t100*t108*t109*t68-1.6 892 2 711932865267184d+2*t100*t106*t144*t67+1.6711932865267184d 893 3 +2*t100*t108*t109*t67)*t94+t133*t151*t94+t130*t132*(1.519 894 4 2666241151986d+1*t100*t127*t90-1.5192666241151986d+1*t100 895 5 *t105*t126*t90+3.038533248230397d+1*t100*t105*t126*t89-3. 896 6 038533248230397d+1*t100*t124*t125*t89+4.5577998723455965d 897 7 +1*t100*t124*t125*t88-4.5577998723455965d+1*t100*t122*t12 898 8 3*t88+6.077066496460795d+1*t100*t122*t123*t87-6.077066496 899 9 460795d+1*t100*t120*t121*t87+7.596333120575993d+1*t100*t1 900 : 20*t121*t86-7.596333120575993d+1*t100*t118*t119*t86+9.115 901 ; 599744691193d+1*t100*t118*t119*t85-9.115599744691193d+1*t 902 < 100*t116*t117*t85+1.0634866368806391d+2*t100*t116*t117*t8 903 = 4-1.0634866368806391d+2*t100*t114*t115*t84+1.215413299292 904 > 1589d+2*t100*t114*t115*t83-1.2154132992921589d+2*t100*t11 905 ? 2*t113*t83+1.3673399617036788d+2*t100*t112*t113*t82-1.367 906 @ 3399617036788d+2*t100*t110*t111*t82+1.5192666241151986d+2 907 1 *t100*t110*t111*t81-1.5192666241151986d+2*t100*t108*t109* 908 2 t81-1.6711932865267184d+2*t100*t106*t144*t80+1.6711932865 909 3 267184d+2*t100*t108*t109*t80)+t130*t134*t151-9.6322790007 910 4 46596d-3*gammabb*t132*t133*t145*t150-5.417385299101419d-3 911 5 *gammabb*t129*t132*t134*t150+8.963083509889702d-3*gammabb 912 6 *t103*t128*t145*t146+5.041016444533138d-3*gammabb*t103*t1 913 7 29*t131*t146)*wght+Amat(iq,D1_RB) 914 Cmat(iq,D1_GAA) = 1.0d+0*(2.0315194871630324d-3*t1*t50*t65*t 915 1 91+3.612104625279974d-3*t1*t136*t65*t78-1.890381166699927 916 2 d-3*t12*t138*t50*t64-3.361156316208638d-3*t12*t136*t138*t 917 3 49)*wght+Cmat(iq,D1_GAA) 918 Cmat(iq,D1_GAB) = Cmat(iq,D1_GAB) 919 Cmat(iq,D1_GBB) = 1.0d+0*(3.612104625279974d-3*t132*t133*t14 920 1 5*t92+2.0315194871630324d-3*t129*t132*t134*t92-3.36115631 921 2 6208638d-3*t103*t128*t145*t147-1.890381166699927d-3*t103* 922 3 t129*t131*t147)*wght+Cmat(iq,D1_GBB) 923 Mmat(iq,D1_TA) = 1.0d+0*(t51*t65*(-2.0d+0*t48*t90-2.0d+0*t16 924 1 *t46*t90-4.0d+0*t16*t46*t89-4.0d+0*t43*t45*t89-6.0d+0*t43 925 2 *t45*t88-6.0d+0*t40*t42*t88-8.0d+0*t40*t42*t87-8.0d+0*t37 926 3 *t39*t87-1.0d+1*t37*t39*t86-1.0d+1*t34*t36*t86-1.2d+1*t34 927 4 *t36*t85-1.2d+1*t31*t33*t85-1.4d+1*t31*t33*t84-1.4d+1*t28 928 5 *t30*t84-1.6d+1*t28*t30*t83-1.6d+1*t25*t27*t83-1.8d+1*t25 929 6 *t27*t82-1.8d+1*t22*t24*t82-2.0d+1*t22*t24*t81-2.0d+1*t19 930 7 *t21*t81-2.2d+1*t19*t21*t80-2.2d+1*t135*t17*t80)+t3*t65*( 931 8 -2.0d+0*t48*t77-2.0d+0*t16*t46*t77-4.0d+0*t16*t46*t76-4.0 932 9 d+0*t43*t45*t76-6.0d+0*t43*t45*t75-6.0d+0*t40*t42*t75-8.0 933 : d+0*t40*t42*t74-8.0d+0*t37*t39*t74-1.0d+1*t37*t39*t73-1.0 934 ; d+1*t34*t36*t73-1.2d+1*t34*t36*t72-1.2d+1*t31*t33*t72-1.4 935 < d+1*t31*t33*t71-1.4d+1*t28*t30*t71-1.6d+1*t28*t30*t70-1.6 936 = d+1*t25*t27*t70-1.8d+1*t25*t27*t69-1.8d+1*t22*t24*t69-2.0 937 > d+1*t22*t24*t68-2.0d+1*t19*t21*t68-2.2d+1*t19*t21*t67-2.2 938 ? d+1*t135*t17*t67)-9.305257363491002d-1*t12*t4*t51*(-2.0d+ 939 @ 0*t48*t63-2.0d+0*t16*t46*t63-4.0d+0*t16*t46*t62-4.0d+0*t4 940 1 3*t45*t62-6.0d+0*t43*t45*t61-6.0d+0*t40*t42*t61-8.0d+0*t4 941 2 0*t42*t60-8.0d+0*t37*t39*t60-1.0d+1*t37*t39*t59-1.0d+1*t3 942 3 4*t36*t59-1.2d+1*t34*t36*t58-1.2d+1*t31*t33*t58-1.4d+1*t3 943 4 1*t33*t57-1.4d+1*t28*t30*t57-1.6d+1*t28*t30*t56-1.6d+1*t2 944 5 5*t27*t56-1.8d+1*t25*t27*t55-1.8d+1*t22*t24*t55-2.0d+1*t2 945 6 2*t24*t54-2.0d+1*t19*t21*t54-2.2d+1*t19*t21*t53-2.2d+1*t1 946 7 35*t17*t53)-9.305257363491002d-1*t12*t3*t4*(-2.0d+0*t47*t 947 8 48-2.0d+0*t16*t46*t47-4.0d+0*t16*t44*t46-4.0d+0*t43*t44*t 948 9 45-6.0d+0*t41*t43*t45-6.0d+0*t40*t41*t42-8.0d+0*t38*t40*t 949 : 42-8.0d+0*t37*t38*t39-1.0d+1*t35*t37*t39-1.0d+1*t34*t35*t 950 ; 36-1.2d+1*t32*t34*t36-1.2d+1*t31*t32*t33-1.4d+1*t29*t31*t 951 < 33-1.4d+1*t28*t29*t30-1.6d+1*t26*t28*t30-1.6d+1*t25*t26*t 952 = 27-1.8d+1*t23*t25*t27-1.8d+1*t22*t23*t24-2.0d+1*t20*t22*t 953 > 24-2.0d+1*t19*t20*t21-2.2d+1*t14*t19*t21-2.2d+1*t135*t14* 954 ? t17))*wght+Mmat(iq,D1_TA) 955 Mmat(iq,D1_TB) = 1.0d+0*(-9.305257363491002d-1*t103*(-2.0d+0 956 1 *t127*t47-2.0d+0*t105*t126*t47-4.0d+0*t105*t126*t44-4.0d+ 957 2 0*t124*t125*t44-6.0d+0*t124*t125*t41-6.0d+0*t122*t123*t41 958 3 -8.0d+0*t122*t123*t38-8.0d+0*t120*t121*t38-1.0d+1*t120*t1 959 4 21*t35-1.0d+1*t118*t119*t35-1.2d+1*t118*t119*t32-1.2d+1*t 960 5 116*t117*t32-1.4d+1*t116*t117*t29-1.4d+1*t114*t115*t29-1. 961 6 6d+1*t114*t115*t26-1.6d+1*t112*t113*t26-1.8d+1*t112*t113* 962 7 t23-1.8d+1*t110*t111*t23-2.0d+1*t110*t111*t20-2.0d+1*t108 963 8 *t109*t20-2.2d+1*t106*t14*t144-2.2d+1*t108*t109*t14)*t94* 964 9 t95-9.305257363491002d-1*t103*t130*(-2.0d+0*t127*t63-2.0d 965 : +0*t105*t126*t63-4.0d+0*t105*t126*t62-4.0d+0*t124*t125*t6 966 ; 2-6.0d+0*t124*t125*t61-6.0d+0*t122*t123*t61-8.0d+0*t122*t 967 < 123*t60-8.0d+0*t120*t121*t60-1.0d+1*t120*t121*t59-1.0d+1* 968 = t118*t119*t59-1.2d+1*t118*t119*t58-1.2d+1*t116*t117*t58-1 969 > .4d+1*t116*t117*t57-1.4d+1*t114*t115*t57-1.6d+1*t114*t115 970 ? *t56-1.6d+1*t112*t113*t56-1.8d+1*t112*t113*t55-1.8d+1*t11 971 @ 0*t111*t55-2.0d+1*t110*t111*t54-2.0d+1*t108*t109*t54-2.2d 972 1 +1*t106*t144*t53-2.2d+1*t108*t109*t53)*t95+t132*(-2.0d+0* 973 2 t127*t77-2.0d+0*t105*t126*t77-4.0d+0*t105*t126*t76-4.0d+0 974 3 *t124*t125*t76-6.0d+0*t124*t125*t75-6.0d+0*t122*t123*t75- 975 4 8.0d+0*t122*t123*t74-8.0d+0*t120*t121*t74-1.0d+1*t120*t12 976 5 1*t73-1.0d+1*t118*t119*t73-1.2d+1*t118*t119*t72-1.2d+1*t1 977 6 16*t117*t72-1.4d+1*t116*t117*t71-1.4d+1*t114*t115*t71-1.6 978 7 d+1*t114*t115*t70-1.6d+1*t112*t113*t70-1.8d+1*t112*t113*t 979 8 69-1.8d+1*t110*t111*t69-2.0d+1*t110*t111*t68-2.0d+1*t108* 980 9 t109*t68-2.2d+1*t106*t144*t67-2.2d+1*t108*t109*t67)*t94+t 981 : 130*t132*(-2.0d+0*t127*t90-2.0d+0*t105*t126*t90-4.0d+0*t1 982 ; 05*t126*t89-4.0d+0*t124*t125*t89-6.0d+0*t124*t125*t88-6.0 983 < d+0*t122*t123*t88-8.0d+0*t122*t123*t87-8.0d+0*t120*t121*t 984 = 87-1.0d+1*t120*t121*t86-1.0d+1*t118*t119*t86-1.2d+1*t118* 985 > t119*t85-1.2d+1*t116*t117*t85-1.4d+1*t116*t117*t84-1.4d+1 986 ? *t114*t115*t84-1.6d+1*t114*t115*t83-1.6d+1*t112*t113*t83- 987 @ 1.8d+1*t112*t113*t82-1.8d+1*t110*t111*t82-2.0d+1*t110*t11 988 1 1*t81-2.0d+1*t108*t109*t81-2.2d+1*t106*t144*t80-2.2d+1*t1 989 2 08*t109*t80))*wght+Mmat(iq,D1_TB) 990 elseif (rhoa.gt.tol_rho.and.rhob.le.tol_rho) then 991 t1 = 1/rhoa**2.6666666666666666d+0 992 t2 = 4.492667444378077d-3*gammaaa*t1+1.0d+0 993 t3 = 8.04d-1*(1.0d+0-1.0d+0/t2)+1.0d+0 994 t4 = rhoa**1.3333333333333333d+0 995 t5 = rhoa**3.333333333333333d-1 996 t6 = 1/t5 997 t7 = 1/rhoa 998 t8 = 1.282782438530422d-1*t6-2.63857249068588d-4*t7 999 t9 = rhoa**6.666666666666666d-1 1000 t10 = exp(-2.4308265985843178d+2*t9) 1001 t11 = t10*t8+2.63857249068588d-4*t7-1.924173657795633d-1*t6+ 1002 1 3.544907701811032d+0*erf(1.5591108358883013d+1*t5) 1003 t12 = 1.0d+0-4.275941461768073d-2*t11*t6 1004 t13 = param(12) 1005 t14 = 9.115599744691192d+0*rhoa**1.6666666666666669d+0 1006 t15 = t14-2.0d+0*taua 1007 t16 = t15**11 1008 t17 = 2.0d+0*taua+t14 1009 t18 = 1/t17**11 1010 t19 = param(11) 1011 t20 = t15**10 1012 t21 = 1/t17**10 1013 t22 = param(10) 1014 t23 = t15**9 1015 t24 = 1/t17**9 1016 t25 = param(9) 1017 t26 = t15**8 1018 t27 = 1/t17**8 1019 t28 = param(8) 1020 t29 = t15**7 1021 t30 = 1/t17**7 1022 t31 = param(7) 1023 t32 = t15**6 1024 t33 = 1/t17**6 1025 t34 = param(6) 1026 t35 = t15**5 1027 t36 = 1/t17**5 1028 t37 = param(5) 1029 t38 = t15**4 1030 t39 = 1/t17**4 1031 t40 = param(4) 1032 t41 = t15**3 1033 t42 = 1/t17**3 1034 t43 = param(3) 1035 t44 = t15**2 1036 t45 = 1/t17**2 1037 t46 = param(2) 1038 t47 = 1/t17 1039 t48 = t15*t46*t47+t43*t44*t45+t40*t41*t42+t37*t38*t39+t34*t3 1040 1 5*t36+t31*t32*t33+t28*t29*t30+t25*t26*t27+t22*t23*t24+t19 1041 2 *t20*t21+t13*t16*t18+param(1) 1042 t49 = exp(-3.6802889260199856d-3*gammaaa*t1) 1043 t50 = 5.52d-1*(1.0d+0-t49)+1.0d+0 1044 t51 = param(24) 1045 t52 = param(23) 1046 t53 = param(22) 1047 t54 = param(21) 1048 t55 = param(20) 1049 t56 = param(19) 1050 t57 = param(18) 1051 t58 = param(17) 1052 t59 = param(16) 1053 t60 = param(15) 1054 t61 = param(14) 1055 t62 = t15*t47*t61+t44*t45*t60+t41*t42*t59+t38*t39*t58+t35*t3 1056 1 6*t57+t32*t33*t56+t29*t30*t55+t26*t27*t54+t23*t24*t53+t20 1057 2 *t21*t52+t16*t18*t51+param(13) 1058 t63 = 9.305257363491002d-1*t12*t4-9.305257363491002d-1*t4 1059 t64 = param(36) 1060 t65 = param(35) 1061 t66 = param(34) 1062 t67 = param(33) 1063 t68 = param(32) 1064 t69 = param(31) 1065 t70 = param(30) 1066 t71 = param(29) 1067 t72 = param(28) 1068 t73 = param(27) 1069 t74 = param(26) 1070 t75 = t15*t47*t74+t44*t45*t73+t41*t42*t72+t38*t39*t71+t35*t3 1071 1 6*t70+t32*t33*t69+t29*t30*t68+t26*t27*t67+t23*t24*t66+t20 1072 2 *t21*t65+t16*t18*t64+param(25) 1073 t76 = param(48) 1074 t77 = param(47) 1075 t78 = param(46) 1076 t79 = param(45) 1077 t80 = param(44) 1078 t81 = param(43) 1079 t82 = param(42) 1080 t83 = param(41) 1081 t84 = param(40) 1082 t85 = param(39) 1083 t86 = param(38) 1084 t87 = t15*t47*t86+t44*t45*t85+t41*t42*t84+t38*t39*t83+t35*t3 1085 1 6*t82+t32*t33*t81+t29*t30*t80+t26*t27*t79+t23*t24*t78+t20 1086 2 *t21*t77+t16*t18*t76+param(37) 1087 t88 = 1/t17**12 1088 t89 = 1/t2**2 1089 t90 = 1/rhoa**2.3333333333333334d+0 1090 t91 = 1/t4 1091 t92 = 1/rhoa**2 1092 t93 = 1.4253138205893576d-2*t11*t91-4.275941461768073d-2*t6* 1093 1 (-2.63857249068588d-4*t92+t10*(2.63857249068588d-4*t92-4. 1094 2 2759414617680735d-2*t91)+6.41391219265211d-2*t91+2.078814 1095 3 4478510684d+1*t10/t9-1.6205510657228786d+2*t10*t6*t8) 1096 t94 = 1/rhoa**3.6666666666666664d+0 1097 t95 = 9.305257363491002d-1*t4*t93+1.2407009817988002d+0*t12* 1098 1 t5-1.2407009817988002d+0*t5 1099 fnc(iq) = 1.0d+0*(t50*t63*t87+t3*t63*t75-9.305257363491002d- 1100 1 1*t12*t4*t50*t62-9.305257363491002d-1*t12*t3*t4*t48)*wght 1101 2 +fnc(iq) 1102 Amat(iq,D1_RA) = 1.0d+0*(t50*t87*t95+t3*t75*t95-9.6322790007 1103 1 46596d-3*gammaaa*t63*t75*t89*t94-5.417385299101419d-3*gam 1104 2 maaa*t49*t63*t87*t94-9.305257363491002d-1*t4*t50*t62*t93- 1105 3 9.305257363491002d-1*t3*t4*t48*t93+8.963083509889702d-3*g 1106 4 ammaaa*t12*t48*t89*t90+5.041016444533138d-3*gammaaa*t12*t 1107 5 49*t62*t90+t50*t63*(-1.6711932865267184d+2*t16*t76*t88*t9 1108 6 +1.5192666241151986d+1*t47*t86*t9-1.5192666241151986d+1*t 1109 7 15*t45*t86*t9+3.038533248230397d+1*t15*t45*t85*t9-3.03853 1110 8 3248230397d+1*t42*t44*t85*t9+4.5577998723455965d+1*t42*t4 1111 9 4*t84*t9-4.5577998723455965d+1*t39*t41*t84*t9+6.077066496 1112 : 460795d+1*t39*t41*t83*t9-6.077066496460795d+1*t36*t38*t83 1113 ; *t9+7.596333120575993d+1*t36*t38*t82*t9-7.596333120575993 1114 < d+1*t33*t35*t82*t9+9.115599744691193d+1*t33*t35*t81*t9-9. 1115 = 115599744691193d+1*t30*t32*t81*t9+1.0634866368806391d+2*t 1116 > 30*t32*t80*t9-1.0634866368806391d+2*t27*t29*t80*t9+1.2154 1117 ? 132992921589d+2*t27*t29*t79*t9-1.2154132992921589d+2*t24* 1118 @ t26*t79*t9+1.3673399617036788d+2*t24*t26*t78*t9-1.3673399 1119 1 617036788d+2*t21*t23*t78*t9+1.5192666241151986d+2*t21*t23 1120 2 *t77*t9-1.5192666241151986d+2*t18*t20*t77*t9+1.6711932865 1121 3 267184d+2*t18*t20*t76*t9)+t3*t63*(-1.6711932865267184d+2* 1122 4 t16*t64*t88*t9+1.5192666241151986d+1*t47*t74*t9-1.5192666 1123 5 241151986d+1*t15*t45*t74*t9+3.038533248230397d+1*t15*t45* 1124 6 t73*t9-3.038533248230397d+1*t42*t44*t73*t9+4.557799872345 1125 7 5965d+1*t42*t44*t72*t9-4.5577998723455965d+1*t39*t41*t72* 1126 8 t9+6.077066496460795d+1*t39*t41*t71*t9-6.077066496460795d 1127 9 +1*t36*t38*t71*t9+7.596333120575993d+1*t36*t38*t70*t9-7.5 1128 : 96333120575993d+1*t33*t35*t70*t9+9.115599744691193d+1*t33 1129 ; *t35*t69*t9-9.115599744691193d+1*t30*t32*t69*t9+1.0634866 1130 < 368806391d+2*t30*t32*t68*t9-1.0634866368806391d+2*t27*t29 1131 = *t68*t9+1.2154132992921589d+2*t27*t29*t67*t9-1.2154132992 1132 > 921589d+2*t24*t26*t67*t9+1.3673399617036788d+2*t24*t26*t6 1133 ? 6*t9-1.3673399617036788d+2*t21*t23*t66*t9+1.5192666241151 1134 @ 986d+2*t21*t23*t65*t9-1.5192666241151986d+2*t18*t20*t65*t 1135 1 9+1.6711932865267184d+2*t18*t20*t64*t9)-9.305257363491002 1136 2 d-1*t12*t4*t50*(-1.6711932865267184d+2*t16*t51*t88*t9+1.5 1137 3 192666241151986d+1*t47*t61*t9-1.5192666241151986d+1*t15*t 1138 4 45*t61*t9+3.038533248230397d+1*t15*t45*t60*t9-3.038533248 1139 5 230397d+1*t42*t44*t60*t9+4.5577998723455965d+1*t42*t44*t5 1140 6 9*t9-4.5577998723455965d+1*t39*t41*t59*t9+6.0770664964607 1141 7 95d+1*t39*t41*t58*t9-6.077066496460795d+1*t36*t38*t58*t9+ 1142 8 7.596333120575993d+1*t36*t38*t57*t9-7.596333120575993d+1* 1143 9 t33*t35*t57*t9+9.115599744691193d+1*t33*t35*t56*t9-9.1155 1144 : 99744691193d+1*t30*t32*t56*t9+1.0634866368806391d+2*t30*t 1145 ; 32*t55*t9-1.0634866368806391d+2*t27*t29*t55*t9+1.21541329 1146 < 92921589d+2*t27*t29*t54*t9-1.2154132992921589d+2*t24*t26* 1147 = t54*t9+1.3673399617036788d+2*t24*t26*t53*t9-1.36733996170 1148 > 36788d+2*t21*t23*t53*t9+1.5192666241151986d+2*t21*t23*t52 1149 ? *t9-1.5192666241151986d+2*t18*t20*t52*t9+1.67119328652671 1150 @ 84d+2*t18*t20*t51*t9)-9.305257363491002d-1*t12*t3*t4*(-1. 1151 1 6711932865267184d+2*t13*t16*t88*t9+1.5192666241151986d+1* 1152 2 t46*t47*t9-1.5192666241151986d+1*t15*t45*t46*t9+3.0385332 1153 3 48230397d+1*t15*t43*t45*t9-3.038533248230397d+1*t42*t43*t 1154 4 44*t9+4.5577998723455965d+1*t40*t42*t44*t9-4.557799872345 1155 5 5965d+1*t39*t40*t41*t9+6.077066496460795d+1*t37*t39*t41*t 1156 6 9-6.077066496460795d+1*t36*t37*t38*t9+7.596333120575993d+ 1157 7 1*t34*t36*t38*t9-7.596333120575993d+1*t33*t34*t35*t9+9.11 1158 8 5599744691193d+1*t31*t33*t35*t9-9.115599744691193d+1*t30* 1159 9 t31*t32*t9+1.0634866368806391d+2*t28*t30*t32*t9-1.0634866 1160 : 368806391d+2*t27*t28*t29*t9+1.2154132992921589d+2*t25*t27 1161 ; *t29*t9-1.2154132992921589d+2*t24*t25*t26*t9+1.3673399617 1162 < 036788d+2*t22*t24*t26*t9-1.3673399617036788d+2*t21*t22*t2 1163 = 3*t9+1.5192666241151986d+2*t19*t21*t23*t9-1.5192666241151 1164 > 986d+2*t18*t19*t20*t9+1.6711932865267184d+2*t13*t18*t20*t 1165 ? 9)-1.2407009817988002d+0*t12*t5*t50*t62-1.240700981798800 1166 @ 2d+0*t12*t3*t48*t5)*wght+Amat(iq,D1_RA) 1167 Cmat(iq,D1_GAA) = 1.0d+0*(-3.361156316208638d-3*t12*t48*t89* 1168 1 t91-1.890381166699927d-3*t12*t49*t62*t91+3.61210462527997 1169 2 4d-3*t1*t63*t75*t89+2.0315194871630324d-3*t1*t49*t63*t87) 1170 3 *wght+Cmat(iq,D1_GAA) 1171 Mmat(iq,D1_TA) = 1.0d+0*(t50*t63*(-2.2d+1*t16*t76*t88-2.0d+0 1172 1 *t47*t86-2.0d+0*t15*t45*t86-4.0d+0*t15*t45*t85-4.0d+0*t42 1173 2 *t44*t85-6.0d+0*t42*t44*t84-6.0d+0*t39*t41*t84-8.0d+0*t39 1174 3 *t41*t83-8.0d+0*t36*t38*t83-1.0d+1*t36*t38*t82-1.0d+1*t33 1175 4 *t35*t82-1.2d+1*t33*t35*t81-1.2d+1*t30*t32*t81-1.4d+1*t30 1176 5 *t32*t80-1.4d+1*t27*t29*t80-1.6d+1*t27*t29*t79-1.6d+1*t24 1177 6 *t26*t79-1.8d+1*t24*t26*t78-1.8d+1*t21*t23*t78-2.0d+1*t21 1178 7 *t23*t77-2.0d+1*t18*t20*t77-2.2d+1*t18*t20*t76)+t3*t63*(- 1179 8 2.2d+1*t16*t64*t88-2.0d+0*t47*t74-2.0d+0*t15*t45*t74-4.0d 1180 9 +0*t15*t45*t73-4.0d+0*t42*t44*t73-6.0d+0*t42*t44*t72-6.0d 1181 : +0*t39*t41*t72-8.0d+0*t39*t41*t71-8.0d+0*t36*t38*t71-1.0d 1182 ; +1*t36*t38*t70-1.0d+1*t33*t35*t70-1.2d+1*t33*t35*t69-1.2d 1183 < +1*t30*t32*t69-1.4d+1*t30*t32*t68-1.4d+1*t27*t29*t68-1.6d 1184 = +1*t27*t29*t67-1.6d+1*t24*t26*t67-1.8d+1*t24*t26*t66-1.8d 1185 > +1*t21*t23*t66-2.0d+1*t21*t23*t65-2.0d+1*t18*t20*t65-2.2d 1186 ? +1*t18*t20*t64)-9.305257363491002d-1*t12*t4*t50*(-2.2d+1* 1187 @ t16*t51*t88-2.0d+0*t47*t61-2.0d+0*t15*t45*t61-4.0d+0*t15* 1188 1 t45*t60-4.0d+0*t42*t44*t60-6.0d+0*t42*t44*t59-6.0d+0*t39* 1189 2 t41*t59-8.0d+0*t39*t41*t58-8.0d+0*t36*t38*t58-1.0d+1*t36* 1190 3 t38*t57-1.0d+1*t33*t35*t57-1.2d+1*t33*t35*t56-1.2d+1*t30* 1191 4 t32*t56-1.4d+1*t30*t32*t55-1.4d+1*t27*t29*t55-1.6d+1*t27* 1192 5 t29*t54-1.6d+1*t24*t26*t54-1.8d+1*t24*t26*t53-1.8d+1*t21* 1193 6 t23*t53-2.0d+1*t21*t23*t52-2.0d+1*t18*t20*t52-2.2d+1*t18* 1194 7 t20*t51)-9.305257363491002d-1*t12*t3*t4*(-2.2d+1*t13*t16* 1195 8 t88-2.0d+0*t46*t47-2.0d+0*t15*t45*t46-4.0d+0*t15*t43*t45- 1196 9 4.0d+0*t42*t43*t44-6.0d+0*t40*t42*t44-6.0d+0*t39*t40*t41- 1197 : 8.0d+0*t37*t39*t41-8.0d+0*t36*t37*t38-1.0d+1*t34*t36*t38- 1198 ; 1.0d+1*t33*t34*t35-1.2d+1*t31*t33*t35-1.2d+1*t30*t31*t32- 1199 < 1.4d+1*t28*t30*t32-1.4d+1*t27*t28*t29-1.6d+1*t25*t27*t29- 1200 = 1.6d+1*t24*t25*t26-1.8d+1*t22*t24*t26-1.8d+1*t21*t22*t23- 1201 > 2.0d+1*t19*t21*t23-2.0d+1*t18*t19*t20-2.2d+1*t13*t18*t20) 1202 ? )*wght+Mmat(iq,D1_TA) 1203 Mmat(iq,D1_TB) = Mmat(iq,D1_TB) 1204 elseif (rhoa.le.tol_rho.and.rhob.gt.tol_rho) then 1205 t1 = 1/rhob**2.6666666666666666d+0 1206 t2 = 4.492667444378077d-3*gammabb*t1+1.0d+0 1207 t3 = 8.04d-1*(1.0d+0-1.0d+0/t2)+1.0d+0 1208 t4 = rhob**1.3333333333333333d+0 1209 t5 = rhob**3.333333333333333d-1 1210 t6 = 1/t5 1211 t7 = 1/rhob 1212 t8 = 1.282782438530422d-1*t6-2.63857249068588d-4*t7 1213 t9 = rhob**6.666666666666666d-1 1214 t10 = exp(-2.4308265985843178d+2*t9) 1215 t11 = t10*t8+2.63857249068588d-4*t7-1.924173657795633d-1*t6+ 1216 1 3.544907701811032d+0*erf(1.5591108358883013d+1*t5) 1217 t12 = 1.0d+0-4.275941461768073d-2*t11*t6 1218 t13 = param(12) 1219 t14 = 9.115599744691192d+0*rhob**1.6666666666666669d+0 1220 t15 = t14-2.0d+0*taub 1221 t16 = t15**11 1222 t17 = 2.0d+0*taub+t14 1223 t18 = 1/t17**11 1224 t19 = param(11) 1225 t20 = t15**10 1226 t21 = 1/t17**10 1227 t22 = param(10) 1228 t23 = t15**9 1229 t24 = 1/t17**9 1230 t25 = param(9) 1231 t26 = t15**8 1232 t27 = 1/t17**8 1233 t28 = param(8) 1234 t29 = t15**7 1235 t30 = 1/t17**7 1236 t31 = param(7) 1237 t32 = t15**6 1238 t33 = 1/t17**6 1239 t34 = param(6) 1240 t35 = t15**5 1241 t36 = 1/t17**5 1242 t37 = param(5) 1243 t38 = t15**4 1244 t39 = 1/t17**4 1245 t40 = param(4) 1246 t41 = t15**3 1247 t42 = 1/t17**3 1248 t43 = param(3) 1249 t44 = t15**2 1250 t45 = 1/t17**2 1251 t46 = param(2) 1252 t47 = 1/t17 1253 t48 = t15*t46*t47+t43*t44*t45+t40*t41*t42+t37*t38*t39+t34*t3 1254 1 5*t36+t31*t32*t33+t28*t29*t30+t25*t26*t27+t22*t23*t24+t19 1255 2 *t20*t21+t13*t16*t18+param(1) 1256 t49 = exp(-3.6802889260199856d-3*gammabb*t1) 1257 t50 = 5.52d-1*(1.0d+0-t49)+1.0d+0 1258 t51 = param(24) 1259 t52 = param(23) 1260 t53 = param(22) 1261 t54 = param(21) 1262 t55 = param(20) 1263 t56 = param(19) 1264 t57 = param(18) 1265 t58 = param(17) 1266 t59 = param(16) 1267 t60 = param(15) 1268 t61 = param(14) 1269 t62 = t15*t47*t61+t44*t45*t60+t41*t42*t59+t38*t39*t58+t35*t3 1270 1 6*t57+t32*t33*t56+t29*t30*t55+t26*t27*t54+t23*t24*t53+t20 1271 2 *t21*t52+t16*t18*t51+param(13) 1272 t63 = 9.305257363491002d-1*t12*t4-9.305257363491002d-1*t4 1273 t64 = param(36) 1274 t65 = param(35) 1275 t66 = param(34) 1276 t67 = param(33) 1277 t68 = param(32) 1278 t69 = param(31) 1279 t70 = param(30) 1280 t71 = param(29) 1281 t72 = param(28) 1282 t73 = param(27) 1283 t74 = param(26) 1284 t75 = t15*t47*t74+t44*t45*t73+t41*t42*t72+t38*t39*t71+t35*t3 1285 1 6*t70+t32*t33*t69+t29*t30*t68+t26*t27*t67+t23*t24*t66+t20 1286 2 *t21*t65+t16*t18*t64+param(25) 1287 t76 = param(48) 1288 t77 = param(47) 1289 t78 = param(46) 1290 t79 = param(45) 1291 t80 = param(44) 1292 t81 = param(43) 1293 t82 = param(42) 1294 t83 = param(41) 1295 t84 = param(40) 1296 t85 = param(39) 1297 t86 = param(38) 1298 t87 = t15*t47*t86+t44*t45*t85+t41*t42*t84+t38*t39*t83+t35*t3 1299 1 6*t82+t32*t33*t81+t29*t30*t80+t26*t27*t79+t23*t24*t78+t20 1300 2 *t21*t77+t16*t18*t76+param(37) 1301 t88 = 1/t17**12 1302 t89 = 1/t2**2 1303 t90 = 1/rhob**2.3333333333333334d+0 1304 t91 = 1/t4 1305 t92 = 1/rhob**2 1306 t93 = 1.4253138205893576d-2*t11*t91-4.275941461768073d-2*t6* 1307 1 (-2.63857249068588d-4*t92+t10*(2.63857249068588d-4*t92-4. 1308 2 2759414617680735d-2*t91)+6.41391219265211d-2*t91+2.078814 1309 3 4478510684d+1*t10/t9-1.6205510657228786d+2*t10*t6*t8) 1310 t94 = 1/rhob**3.6666666666666664d+0 1311 t95 = 9.305257363491002d-1*t4*t93+1.2407009817988002d+0*t12* 1312 1 t5-1.2407009817988002d+0*t5 1313 fnc(iq) = 1.0d+0*(t50*t63*t87+t3*t63*t75-9.305257363491002d- 1314 1 1*t12*t4*t50*t62-9.305257363491002d-1*t12*t3*t4*t48)*wght 1315 2 +fnc(iq) 1316 Amat(iq,D1_RB) = 1.0d+0*(t50*t87*t95+t3*t75*t95-9.6322790007 1317 1 46596d-3*gammabb*t63*t75*t89*t94-5.417385299101419d-3*gam 1318 2 mabb*t49*t63*t87*t94-9.305257363491002d-1*t4*t50*t62*t93- 1319 3 9.305257363491002d-1*t3*t4*t48*t93+8.963083509889702d-3*g 1320 4 ammabb*t12*t48*t89*t90+5.041016444533138d-3*gammabb*t12*t 1321 5 49*t62*t90+t50*t63*(-1.6711932865267184d+2*t16*t76*t88*t9 1322 6 +1.5192666241151986d+1*t47*t86*t9-1.5192666241151986d+1*t 1323 7 15*t45*t86*t9+3.038533248230397d+1*t15*t45*t85*t9-3.03853 1324 8 3248230397d+1*t42*t44*t85*t9+4.5577998723455965d+1*t42*t4 1325 9 4*t84*t9-4.5577998723455965d+1*t39*t41*t84*t9+6.077066496 1326 : 460795d+1*t39*t41*t83*t9-6.077066496460795d+1*t36*t38*t83 1327 ; *t9+7.596333120575993d+1*t36*t38*t82*t9-7.596333120575993 1328 < d+1*t33*t35*t82*t9+9.115599744691193d+1*t33*t35*t81*t9-9. 1329 = 115599744691193d+1*t30*t32*t81*t9+1.0634866368806391d+2*t 1330 > 30*t32*t80*t9-1.0634866368806391d+2*t27*t29*t80*t9+1.2154 1331 ? 132992921589d+2*t27*t29*t79*t9-1.2154132992921589d+2*t24* 1332 @ t26*t79*t9+1.3673399617036788d+2*t24*t26*t78*t9-1.3673399 1333 1 617036788d+2*t21*t23*t78*t9+1.5192666241151986d+2*t21*t23 1334 2 *t77*t9-1.5192666241151986d+2*t18*t20*t77*t9+1.6711932865 1335 3 267184d+2*t18*t20*t76*t9)+t3*t63*(-1.6711932865267184d+2* 1336 4 t16*t64*t88*t9+1.5192666241151986d+1*t47*t74*t9-1.5192666 1337 5 241151986d+1*t15*t45*t74*t9+3.038533248230397d+1*t15*t45* 1338 6 t73*t9-3.038533248230397d+1*t42*t44*t73*t9+4.557799872345 1339 7 5965d+1*t42*t44*t72*t9-4.5577998723455965d+1*t39*t41*t72* 1340 8 t9+6.077066496460795d+1*t39*t41*t71*t9-6.077066496460795d 1341 9 +1*t36*t38*t71*t9+7.596333120575993d+1*t36*t38*t70*t9-7.5 1342 : 96333120575993d+1*t33*t35*t70*t9+9.115599744691193d+1*t33 1343 ; *t35*t69*t9-9.115599744691193d+1*t30*t32*t69*t9+1.0634866 1344 < 368806391d+2*t30*t32*t68*t9-1.0634866368806391d+2*t27*t29 1345 = *t68*t9+1.2154132992921589d+2*t27*t29*t67*t9-1.2154132992 1346 > 921589d+2*t24*t26*t67*t9+1.3673399617036788d+2*t24*t26*t6 1347 ? 6*t9-1.3673399617036788d+2*t21*t23*t66*t9+1.5192666241151 1348 @ 986d+2*t21*t23*t65*t9-1.5192666241151986d+2*t18*t20*t65*t 1349 1 9+1.6711932865267184d+2*t18*t20*t64*t9)-9.305257363491002 1350 2 d-1*t12*t4*t50*(-1.6711932865267184d+2*t16*t51*t88*t9+1.5 1351 3 192666241151986d+1*t47*t61*t9-1.5192666241151986d+1*t15*t 1352 4 45*t61*t9+3.038533248230397d+1*t15*t45*t60*t9-3.038533248 1353 5 230397d+1*t42*t44*t60*t9+4.5577998723455965d+1*t42*t44*t5 1354 6 9*t9-4.5577998723455965d+1*t39*t41*t59*t9+6.0770664964607 1355 7 95d+1*t39*t41*t58*t9-6.077066496460795d+1*t36*t38*t58*t9+ 1356 8 7.596333120575993d+1*t36*t38*t57*t9-7.596333120575993d+1* 1357 9 t33*t35*t57*t9+9.115599744691193d+1*t33*t35*t56*t9-9.1155 1358 : 99744691193d+1*t30*t32*t56*t9+1.0634866368806391d+2*t30*t 1359 ; 32*t55*t9-1.0634866368806391d+2*t27*t29*t55*t9+1.21541329 1360 < 92921589d+2*t27*t29*t54*t9-1.2154132992921589d+2*t24*t26* 1361 = t54*t9+1.3673399617036788d+2*t24*t26*t53*t9-1.36733996170 1362 > 36788d+2*t21*t23*t53*t9+1.5192666241151986d+2*t21*t23*t52 1363 ? *t9-1.5192666241151986d+2*t18*t20*t52*t9+1.67119328652671 1364 @ 84d+2*t18*t20*t51*t9)-9.305257363491002d-1*t12*t3*t4*(-1. 1365 1 6711932865267184d+2*t13*t16*t88*t9+1.5192666241151986d+1* 1366 2 t46*t47*t9-1.5192666241151986d+1*t15*t45*t46*t9+3.0385332 1367 3 48230397d+1*t15*t43*t45*t9-3.038533248230397d+1*t42*t43*t 1368 4 44*t9+4.5577998723455965d+1*t40*t42*t44*t9-4.557799872345 1369 5 5965d+1*t39*t40*t41*t9+6.077066496460795d+1*t37*t39*t41*t 1370 6 9-6.077066496460795d+1*t36*t37*t38*t9+7.596333120575993d+ 1371 7 1*t34*t36*t38*t9-7.596333120575993d+1*t33*t34*t35*t9+9.11 1372 8 5599744691193d+1*t31*t33*t35*t9-9.115599744691193d+1*t30* 1373 9 t31*t32*t9+1.0634866368806391d+2*t28*t30*t32*t9-1.0634866 1374 : 368806391d+2*t27*t28*t29*t9+1.2154132992921589d+2*t25*t27 1375 ; *t29*t9-1.2154132992921589d+2*t24*t25*t26*t9+1.3673399617 1376 < 036788d+2*t22*t24*t26*t9-1.3673399617036788d+2*t21*t22*t2 1377 = 3*t9+1.5192666241151986d+2*t19*t21*t23*t9-1.5192666241151 1378 > 986d+2*t18*t19*t20*t9+1.6711932865267184d+2*t13*t18*t20*t 1379 ? 9)-1.2407009817988002d+0*t12*t5*t50*t62-1.240700981798800 1380 @ 2d+0*t12*t3*t48*t5)*wght+Amat(iq,D1_RB) 1381 Cmat(iq,D1_GBB) = 1.0d+0*(-3.361156316208638d-3*t12*t48*t89* 1382 1 t91-1.890381166699927d-3*t12*t49*t62*t91+3.61210462527997 1383 2 4d-3*t1*t63*t75*t89+2.0315194871630324d-3*t1*t49*t63*t87) 1384 3 *wght+Cmat(iq,D1_GBB) 1385 Mmat(iq,D1_TB) = 1.0d+0*(t50*t63*(-2.2d+1*t16*t76*t88-2.0d+0 1386 1 *t47*t86-2.0d+0*t15*t45*t86-4.0d+0*t15*t45*t85-4.0d+0*t42 1387 2 *t44*t85-6.0d+0*t42*t44*t84-6.0d+0*t39*t41*t84-8.0d+0*t39 1388 3 *t41*t83-8.0d+0*t36*t38*t83-1.0d+1*t36*t38*t82-1.0d+1*t33 1389 4 *t35*t82-1.2d+1*t33*t35*t81-1.2d+1*t30*t32*t81-1.4d+1*t30 1390 5 *t32*t80-1.4d+1*t27*t29*t80-1.6d+1*t27*t29*t79-1.6d+1*t24 1391 6 *t26*t79-1.8d+1*t24*t26*t78-1.8d+1*t21*t23*t78-2.0d+1*t21 1392 7 *t23*t77-2.0d+1*t18*t20*t77-2.2d+1*t18*t20*t76)+t3*t63*(- 1393 8 2.2d+1*t16*t64*t88-2.0d+0*t47*t74-2.0d+0*t15*t45*t74-4.0d 1394 9 +0*t15*t45*t73-4.0d+0*t42*t44*t73-6.0d+0*t42*t44*t72-6.0d 1395 : +0*t39*t41*t72-8.0d+0*t39*t41*t71-8.0d+0*t36*t38*t71-1.0d 1396 ; +1*t36*t38*t70-1.0d+1*t33*t35*t70-1.2d+1*t33*t35*t69-1.2d 1397 < +1*t30*t32*t69-1.4d+1*t30*t32*t68-1.4d+1*t27*t29*t68-1.6d 1398 = +1*t27*t29*t67-1.6d+1*t24*t26*t67-1.8d+1*t24*t26*t66-1.8d 1399 > +1*t21*t23*t66-2.0d+1*t21*t23*t65-2.0d+1*t18*t20*t65-2.2d 1400 ? +1*t18*t20*t64)-9.305257363491002d-1*t12*t4*t50*(-2.2d+1* 1401 @ t16*t51*t88-2.0d+0*t47*t61-2.0d+0*t15*t45*t61-4.0d+0*t15* 1402 1 t45*t60-4.0d+0*t42*t44*t60-6.0d+0*t42*t44*t59-6.0d+0*t39* 1403 2 t41*t59-8.0d+0*t39*t41*t58-8.0d+0*t36*t38*t58-1.0d+1*t36* 1404 3 t38*t57-1.0d+1*t33*t35*t57-1.2d+1*t33*t35*t56-1.2d+1*t30* 1405 4 t32*t56-1.4d+1*t30*t32*t55-1.4d+1*t27*t29*t55-1.6d+1*t27* 1406 5 t29*t54-1.6d+1*t24*t26*t54-1.8d+1*t24*t26*t53-1.8d+1*t21* 1407 6 t23*t53-2.0d+1*t21*t23*t52-2.0d+1*t18*t20*t52-2.2d+1*t18* 1408 7 t20*t51)-9.305257363491002d-1*t12*t3*t4*(-2.2d+1*t13*t16* 1409 8 t88-2.0d+0*t46*t47-2.0d+0*t15*t45*t46-4.0d+0*t15*t43*t45- 1410 9 4.0d+0*t42*t43*t44-6.0d+0*t40*t42*t44-6.0d+0*t39*t40*t41- 1411 : 8.0d+0*t37*t39*t41-8.0d+0*t36*t37*t38-1.0d+1*t34*t36*t38- 1412 ; 1.0d+1*t33*t34*t35-1.2d+1*t31*t33*t35-1.2d+1*t30*t31*t32- 1413 < 1.4d+1*t28*t30*t32-1.4d+1*t27*t28*t29-1.6d+1*t25*t27*t29- 1414 = 1.6d+1*t24*t25*t26-1.8d+1*t22*t24*t26-1.8d+1*t21*t22*t23- 1415 > 2.0d+1*t19*t21*t23-2.0d+1*t18*t19*t20-2.2d+1*t13*t18*t20) 1416 ? )*wght+Mmat(iq,D1_TB) 1417 Mmat(iq,D1_TA) = Mmat(iq,D1_TA) 1418 endif ! rhoa.gt.tol_rho.and.rhob.gt.tol_rho 1419 endif ! ipol.eq.1 1420 enddo ! iq 1421 end 1422C> 1423C> \brief Evaluate the nwxcm_x_m11 functional [1] 1424C> 1425C> \f{eqnarray*}{ 1426C> {\it t_1} &=& \rho_\alpha^{{{4}\over{3}}}\\\\ 1427C> {\it t_2} &=& \rho_\alpha^{{{1}\over{3}}}\\\\ 1428C> {\it t_3} &=& {{1}\over{{\it t_2}}}\\\\ 1429C> {\it t_4} &=& {{1}\over{\rho_\alpha}}\\\\ 1430C> {\it t_5} &=& 1.0-0.04275941461768073\,{\it t_3}\, 1431C> \left({{0.1282782438530422\,{\it t_3} 1432C> -2.63857249068588 \times 10^{-4}\,{\it t_4}} 1433C> \over{e^{243.0826598584318\,\rho_\alpha^{{{2}\over{3}}}}}} 1434C> -0.1924173657795633\,{\it t_3}+2.63857249068588 \times 10^{-4} 1435C> \,{\it t_4}+3.544907701811032\,\mathrm{erf} 1436C> \left(15.59110835888301\,{\it t_2}\right)\right)\\\\ 1437C> {\it t_6} &=& {{1}\over{\rho_\alpha^{{{8}\over{3}}}}}\\\\ 1438C> {\it t_7} &=& 0.804\,\left(1.0-{{1.0}\over{0.004492667444378077 1439C> \,{\it t_6}\,\sigma_{\alpha\alpha}+1.0}}\right)+1.0\\\\ 1440C> {\it t_8} &=& {\it param}\left(1\right)\\\\ 1441C> {\it t_9} &=& {\it param}\left(12\right)\\\\ 1442C> {\it t_{10}} &=& 9.115599744691192\,\rho_\alpha^{{{5} 1443C> \over{3}}}\\\\ 1444C> {\it t_{11}} &=& {\it t_{10}}-2.0\,\tau_\alpha\\\\ 1445C> {\it t_{12}} &=& {\it t_{11}}^{11}\\\\ 1446C> {\it t_{13}} &=& 2.0\,\tau_\alpha+{\it t_{10}}\\\\ 1447C> {\it t_{14}} &=& {{1}\over{{\it t_{13}}^{11}}}\\\\ 1448C> {\it t_{15}} &=& {\it param}\left(11\right)\\\\ 1449C> {\it t_{16}} &=& {\it t_{11}}^{10}\\\\ 1450C> {\it t_{17}} &=& {{1}\over{{\it t_{13}}^{10}}}\\\\ 1451C> {\it t_{18}} &=& {\it param}\left(10\right)\\\\ 1452C> {\it t_{19}} &=& {\it t_{11}}^9\\\\ 1453C> {\it t_{20}} &=& {{1}\over{{\it t_{13}}^9}}\\\\ 1454C> {\it t_{21}} &=& {\it param}\left(9\right)\\\\ 1455C> {\it t_{22}} &=& {\it t_{11}}^8\\\\ 1456C> {\it t_{23}} &=& {{1}\over{{\it t_{13}}^8}}\\\\ 1457C> {\it t_{24}} &=& {\it param}\left(8\right)\\\\ 1458C> {\it t_{25}} &=& {\it t_{11}}^7\\\\ 1459C> {\it t_{26}} &=& {{1}\over{{\it t_{13}}^7}}\\\\ 1460C> {\it t_{27}} &=& {\it param}\left(7\right)\\\\ 1461C> {\it t_{28}} &=& {\it t_{11}}^6\\\\ 1462C> {\it t_{29}} &=& {{1}\over{{\it t_{13}}^6}}\\\\ 1463C> {\it t_{30}} &=& {\it param}\left(6\right)\\\\ 1464C> {\it t_{31}} &=& {\it t_{11}}^5\\\\ 1465C> {\it t_{32}} &=& {{1}\over{{\it t_{13}}^5}}\\\\ 1466C> {\it t_{33}} &=& {\it param}\left(5\right)\\\\ 1467C> {\it t_{34}} &=& {\it t_{11}}^4\\\\ 1468C> {\it t_{35}} &=& {{1}\over{{\it t_{13}}^4}}\\\\ 1469C> {\it t_{36}} &=& {\it param}\left(4\right)\\\\ 1470C> {\it t_{37}} &=& {\it t_{11}}^3\\\\ 1471C> {\it t_{38}} &=& {{1}\over{{\it t_{13}}^3}}\\\\ 1472C> {\it t_{39}} &=& {\it param}\left(3\right)\\\\ 1473C> {\it t_{40}} &=& {\it t_{11}}^2\\\\ 1474C> {\it t_{41}} &=& {{1}\over{{\it t_{13}}^2}}\\\\ 1475C> {\it t_{42}} &=& {\it param}\left(2\right)\\\\ 1476C> {\it t_{43}} &=& {{1}\over{{\it t_{13}}}}\\\\ 1477C> {\it t_{44}} &=& 0.552\,\left(1.0-{{1} 1478C> \over{e^{0.003680288926019986\,{\it t_6}\, 1479C> \sigma_{\alpha\alpha}}}}\right)+1.0\\\\ 1480C> {\it t_{45}} &=& {\it param}\left(13\right)\\\\ 1481C> {\it t_{46}} &=& {\it param}\left(24\right)\\\\ 1482C> {\it t_{47}} &=& {\it param}\left(23\right)\\\\ 1483C> {\it t_{48}} &=& {\it param}\left(22\right)\\\\ 1484C> {\it t_{49}} &=& {\it param}\left(21\right)\\\\ 1485C> {\it t_{50}} &=& {\it param}\left(20\right)\\\\ 1486C> {\it t_{51}} &=& {\it param}\left(19\right)\\\\ 1487C> {\it t_{52}} &=& {\it param}\left(18\right)\\\\ 1488C> {\it t_{53}} &=& {\it param}\left(17\right)\\\\ 1489C> {\it t_{54}} &=& {\it param}\left(16\right)\\\\ 1490C> {\it t_{55}} &=& {\it param}\left(15\right)\\\\ 1491C> {\it t_{56}} &=& {\it param}\left(14\right)\\\\ 1492C> {\it t_{57}} &=& 0.9305257363491002\,{\it t_1}\,{\it t_5} 1493C> -0.9305257363491002\,{\it t_1}\\\\ 1494C> {\it t_{58}} &=& {\it param}\left(25\right)\\\\ 1495C> {\it t_{59}} &=& {\it param}\left(36\right)\\\\ 1496C> {\it t_{60}} &=& {\it param}\left(35\right)\\\\ 1497C> {\it t_{61}} &=& {\it param}\left(34\right)\\\\ 1498C> {\it t_{62}} &=& {\it param}\left(33\right)\\\\ 1499C> {\it t_{63}} &=& {\it param}\left(32\right)\\\\ 1500C> {\it t_{64}} &=& {\it param}\left(31\right)\\\\ 1501C> {\it t_{65}} &=& {\it param}\left(30\right)\\\\ 1502C> {\it t_{66}} &=& {\it param}\left(29\right)\\\\ 1503C> {\it t_{67}} &=& {\it param}\left(28\right)\\\\ 1504C> {\it t_{68}} &=& {\it param}\left(27\right)\\\\ 1505C> {\it t_{69}} &=& {\it param}\left(26\right)\\\\ 1506C> {\it t_{70}} &=& {\it param}\left(37\right)\\\\ 1507C> {\it t_{71}} &=& {\it param}\left(48\right)\\\\ 1508C> {\it t_{72}} &=& {\it param}\left(47\right)\\\\ 1509C> {\it t_{73}} &=& {\it param}\left(46\right)\\\\ 1510C> {\it t_{74}} &=& {\it param}\left(45\right)\\\\ 1511C> {\it t_{75}} &=& {\it param}\left(44\right)\\\\ 1512C> {\it t_{76}} &=& {\it param}\left(43\right)\\\\ 1513C> {\it t_{77}} &=& {\it param}\left(42\right)\\\\ 1514C> {\it t_{78}} &=& {\it param}\left(41\right)\\\\ 1515C> {\it t_{79}} &=& {\it param}\left(40\right)\\\\ 1516C> {\it t_{80}} &=& {\it param}\left(39\right)\\\\ 1517C> {\it t_{81}} &=& {\it param}\left(38\right)\\\\ 1518C> {\it t_{82}} &=& \rho_\beta^{{{4}\over{3}}}\\\\ 1519C> {\it t_{83}} &=& \rho_\beta^{{{1}\over{3}}}\\\\ 1520C> {\it t_{84}} &=& {{1}\over{{\it t_{83}}}}\\\\ 1521C> {\it t_{85}} &=& {{1}\over{\rho_\beta}}\\\\ 1522C> {\it t_{86}} &=& 1.0-0.04275941461768073\,{\it t_{84}}\, 1523C> \left({{0.1282782438530422\,{\it t_{84}} 1524C> -2.63857249068588 \times 10^{-4}\,{\it t_{85}}} 1525C> \over{e^{243.0826598584318\,\rho_\beta^{{{2}\over{3}}}}}} 1526C> -0.1924173657795633\,{\it t_{84}}+2.63857249068588 \times 10^{ 1527C> -4}\,{\it t_{85}}+3.544907701811032\,\mathrm{erf} 1528C> \left(15.59110835888301\,{\it t_{83}}\right)\right)\\\\ 1529C> {\it t_{87}} &=& {{1}\over{\rho_\beta^{{{8}\over{3}}}}}\\\\ 1530C> {\it t_{88}} &=& 0.804\,\left(1.0-{{1.0} 1531C> \over{0.004492667444378077\,{\it t_{87}}\,\sigma_{\beta\beta} 1532C> +1.0}}\right)+1.0\\\\ 1533C> {\it t_{89}} &=& 9.115599744691192\,\rho_\beta^{{{5}\over{3}}}\\\\ 1534C> {\it t_{90}} &=& {\it t_{89}}-2.0\,\tau_\beta\\\\ 1535C> {\it t_{91}} &=& {\it t_{90}}^{11}\\\\ 1536C> {\it t_{92}} &=& 2.0\,\tau_\beta+{\it t_{89}}\\\\ 1537C> {\it t_{93}} &=& {{1}\over{{\it t_{92}}^{11}}}\\\\ 1538C> {\it t_{94}} &=& {\it t_{90}}^{10}\\\\ 1539C> {\it t_{95}} &=& {{1}\over{{\it t_{92}}^{10}}}\\\\ 1540C> {\it t_{96}} &=& {\it t_{90}}^9\\\\ 1541C> {\it t_{97}} &=& {{1}\over{{\it t_{92}}^9}}\\\\ 1542C> {\it t_{98}} &=& {\it t_{90}}^8\\\\ 1543C> {\it t_{99}} &=& {{1}\over{{\it t_{92}}^8}}\\\\ 1544C> {\it t_{100}} &=& {\it t_{90}}^7\\\\ 1545C> {\it t_{101}} &=& {{1}\over{{\it t_{92}}^7}}\\\\ 1546C> {\it t_{102}} &=& {\it t_{90}}^6\\\\ 1547C> {\it t_{103}} &=& {{1}\over{{\it t_{92}}^6}}\\\\ 1548C> {\it t_{104}} &=& {\it t_{90}}^5\\\\ 1549C> {\it t_{105}} &=& {{1}\over{{\it t_{92}}^5}}\\\\ 1550C> {\it t_{106}} &=& {\it t_{90}}^4\\\\ 1551C> {\it t_{107}} &=& {{1}\over{{\it t_{92}}^4}}\\\\ 1552C> {\it t_{108}} &=& {\it t_{90}}^3\\\\ 1553C> {\it t_{109}} &=& {{1}\over{{\it t_{92}}^3}}\\\\ 1554C> {\it t_{110}} &=& {\it t_{90}}^2\\\\ 1555C> {\it t_{111}} &=& {{1}\over{{\it t_{92}}^2}}\\\\ 1556C> {\it t_{112}} &=& {{1}\over{{\it t_{92}}}}\\\\ 1557C> {\it t_{113}} &=& 0.552\,\left(1.0-{{1} 1558C> \over{e^{0.003680288926019986\,{\it t_{87}}\, 1559C> \sigma_{\beta\beta}}}}\right)+1.0\\\\ 1560C> {\it t_{114}} &=& 0.9305257363491002\,{\it t_{82}}\,{\it t_{86}} 1561C> -0.9305257363491002\,{\it t_{82}}\\\\ 1562C> {\it t_{115}} &=& \rho_s^{{{4}\over{3}}}\\\\ 1563C> {\it t_{116}} &=& \rho_s^{{{1}\over{3}}}\\\\ 1564C> {\it t_{117}} &=& {{1}\over{{\it t_{116}}}}\\\\ 1565C> {\it t_{118}} &=& {{1}\over{\rho_s}}\\\\ 1566C> {\it t_{119}} &=& 1.0-0.04275941461768073\,{\it t_{117}} 1567C> \,\left({{0.1282782438530422\,{\it t_{117}} 1568C> -2.63857249068588 \times 10^{-4}\,{\it t_{118}}} 1569C> \over{e^{243.0826598584318\,\rho_s^{{{2}\over{3}}}}}} 1570C> -0.1924173657795633\,{\it t_{117}}+2.63857249068588 \times 10^{ 1571C> -4}\,{\it t_{118}}+3.544907701811032\,\mathrm{erf} 1572C> \left(15.59110835888301\,{\it t_{116}}\right)\right)\\\\ 1573C> {\it t_{120}} &=& {{1}\over{\rho_s^{{{8}\over{3}}}}}\\\\ 1574C> {\it t_{121}} &=& 0.804\,\left(1.0-{{1.0} 1575C> \over{0.004492667444378077\,{\it t_{120}}\,\sigma_{ss} 1576C> +1.0}}\right)+1.0\\\\ 1577C> {\it t_{122}} &=& 9.115599744691192\,\rho_s^{{{5}\over{3}}}\\\\ 1578C> {\it t_{123}} &=& {\it t_{122}}-2.0\,\tau_s\\\\ 1579C> {\it t_{124}} &=& {\it t_{123}}^{11}\\\\ 1580C> {\it t_{125}} &=& 2.0\,\tau_s+{\it t_{122}}\\\\ 1581C> {\it t_{126}} &=& {{1}\over{{\it t_{125}}^{11}}}\\\\ 1582C> {\it t_{127}} &=& {\it t_{123}}^{10}\\\\ 1583C> {\it t_{128}} &=& {{1}\over{{\it t_{125}}^{10}}}\\\\ 1584C> {\it t_{129}} &=& {\it t_{123}}^9\\\\ 1585C> {\it t_{130}} &=& {{1}\over{{\it t_{125}}^9}}\\\\ 1586C> {\it t_{131}} &=& {\it t_{123}}^8\\\\ 1587C> {\it t_{132}} &=& {{1}\over{{\it t_{125}}^8}}\\\\ 1588C> {\it t_{133}} &=& {\it t_{123}}^7\\\\ 1589C> {\it t_{134}} &=& {{1}\over{{\it t_{125}}^7}}\\\\ 1590C> {\it t_{135}} &=& {\it t_{123}}^6\\\\ 1591C> {\it t_{136}} &=& {{1}\over{{\it t_{125}}^6}}\\\\ 1592C> {\it t_{137}} &=& {\it t_{123}}^5\\\\ 1593C> {\it t_{138}} &=& {{1}\over{{\it t_{125}}^5}}\\\\ 1594C> {\it t_{139}} &=& {\it t_{123}}^4\\\\ 1595C> {\it t_{140}} &=& {{1}\over{{\it t_{125}}^4}}\\\\ 1596C> {\it t_{141}} &=& {\it t_{123}}^3\\\\ 1597C> {\it t_{142}} &=& {{1}\over{{\it t_{125}}^3}}\\\\ 1598C> {\it t_{143}} &=& {\it t_{123}}^2\\\\ 1599C> {\it t_{144}} &=& {{1}\over{{\it t_{125}}^2}}\\\\ 1600C> {\it t_{145}} &=& {{1}\over{{\it t_{125}}}}\\\\ 1601C> {\it t_{146}} &=& 0.552\,\left(1.0-{{1} 1602C> \over{e^{0.003680288926019986\,{\it t_{120}}\, 1603C> \sigma_{ss}}}}\right)+1.0\\\\ 1604C> {\it t_{147}} &=& 0.9305257363491002\,{\it t_{115}}\,{ 1605C> \it t_{119}}-0.9305257363491002\,{\it t_{115}}\\\\ 1606C> f &=& 1.0\,\left({\it t_{114}}\,{\it t_{113}}\,\left({ 1607C> \it t_{81}}\,{\it t_{90}}\,{\it t_{112}}+{\it t_{80}}\,{ 1608C> \it t_{110}}\,{\it t_{111}}+{\it t_{79}}\,{\it t_{108}}\,{ 1609C> \it t_{109}}+{\it t_{78}}\,{\it t_{106}}\,{\it t_{107}}+{ 1610C> \it t_{77}}\,{\it t_{104}}\,{\it t_{105}}+{\it t_{76}}\,{ 1611C> \it t_{102}}\,{\it t_{103}}+{\it t_{75}}\,{\it t_{100}}\,{ 1612C> \it t_{101}}+{\it t_{74}}\,{\it t_{98}}\,{\it t_{99}}+{ 1613C> \it t_{73}}\,{\it t_{96}}\,{\it t_{97}}+{\it t_{72}}\,{ 1614C> \it t_{94}}\,{\it t_{95}}+{\it t_{71}}\,{\it t_{91}}\,{ 1615C> \it t_{93}}+{\it t_{70}}\right)+{\it t_{114}}\,{\it t_{88}} 1616C> \,\left({\it t_{69}}\,{\it t_{90}}\,{\it t_{112}}+{\it t_{68}} 1617C> \,{\it t_{110}}\,{\it t_{111}}+{\it t_{67}}\,{\it t_{108}} 1618C> \,{\it t_{109}}+{\it t_{66}}\,{\it t_{106}}\,{\it t_{107}}+{ 1619C> \it t_{65}}\,{\it t_{104}}\,{\it t_{105}}+{\it t_{64}}\,{ 1620C> \it t_{102}}\,{\it t_{103}}+{\it t_{63}}\,{\it t_{100}}\,{ 1621C> \it t_{101}}+{\it t_{62}}\,{\it t_{98}}\,{\it t_{99}}+{ 1622C> \it t_{61}}\,{\it t_{96}}\,{\it t_{97}}+{\it t_{60}}\,{ 1623C> \it t_{94}}\,{\it t_{95}}+{\it t_{59}}\,{\it t_{91}}\,{ 1624C> \it t_{93}}+{\it t_{58}}\right)-0.9305257363491002\,{ 1625C> \it t_{82}}\,{\it t_{86}}\,{\it t_{113}}\,\left({\it t_{56}} 1626C> \,{\it t_{90}}\,{\it t_{112}}+{\it t_{55}}\,{\it t_{110}}\,{ 1627C> \it t_{111}}+{\it t_{54}}\,{\it t_{108}}\,{\it t_{109}}+{ 1628C> \it t_{53}}\,{\it t_{106}}\,{\it t_{107}}+{\it t_{52}}\,{ 1629C> \it t_{104}}\,{\it t_{105}}+{\it t_{51}}\,{\it t_{102}}\,{ 1630C> \it t_{103}}+{\it t_{50}}\,{\it t_{100}}\,{\it t_{101}}+{ 1631C> \it t_{49}}\,{\it t_{98}}\,{\it t_{99}}+{\it t_{48}}\,{ 1632C> \it t_{96}}\,{\it t_{97}}+{\it t_{47}}\,{\it t_{94}}\,{ 1633C> \it t_{95}}+{\it t_{46}}\,{\it t_{91}}\,{\it t_{93}}+{ 1634C> \it t_{45}}\right)-0.9305257363491002\,{\it t_{82}}\,{ 1635C> \it t_{86}}\,{\it t_{88}}\,\left({\it t_{42}}\,{\it t_{90}} 1636C> \,{\it t_{112}}+{\it t_{39}}\,{\it t_{110}}\,{\it t_{111}}+{ 1637C> \it t_{36}}\,{\it t_{108}}\,{\it t_{109}}+{\it t_{33}}\,{ 1638C> \it t_{106}}\,{\it t_{107}}+{\it t_{30}}\,{\it t_{104}}\,{ 1639C> \it t_{105}}+{\it t_{27}}\,{\it t_{102}}\,{\it t_{103}}+{ 1640C> \it t_{24}}\,{\it t_{100}}\,{\it t_{101}}+{\it t_{21}}\,{ 1641C> \it t_{98}}\,{\it t_{99}}+{\it t_{18}}\,{\it t_{96}}\,{ 1642C> \it t_{97}}+{\it t_{15}}\,{\it t_{94}}\,{\it t_{95}}+{\it t_9} 1643C> \,{\it t_{91}}\,{\it t_{93}}+{\it t_8}\right)\right)+1.0 1644C> \,\left({\it t_{57}}\,{\it t_{44}}\,\left({\it t_{81}}\,{ 1645C> \it t_{11}}\,{\it t_{43}}+{\it t_{80}}\,{\it t_{40}}\,{ 1646C> \it t_{41}}+{\it t_{79}}\,{\it t_{37}}\,{\it t_{38}}+{ 1647C> \it t_{78}}\,{\it t_{34}}\,{\it t_{35}}+{\it t_{77}}\,{ 1648C> \it t_{31}}\,{\it t_{32}}+{\it t_{76}}\,{\it t_{28}}\,{ 1649C> \it t_{29}}+{\it t_{75}}\,{\it t_{25}}\,{\it t_{26}}+{ 1650C> \it t_{74}}\,{\it t_{22}}\,{\it t_{23}}+{\it t_{73}}\,{ 1651C> \it t_{19}}\,{\it t_{20}}+{\it t_{72}}\,{\it t_{16}}\,{ 1652C> \it t_{17}}+{\it t_{71}}\,{\it t_{12}}\,{\it t_{14}}+{ 1653C> \it t_{70}}\right)+{\it t_{57}}\,{\it t_7}\,\left({\it t_{69}} 1654C> \,{\it t_{11}}\,{\it t_{43}}+{\it t_{68}}\,{\it t_{40}}\,{ 1655C> \it t_{41}}+{\it t_{67}}\,{\it t_{37}}\,{\it t_{38}}+{ 1656C> \it t_{66}}\,{\it t_{34}}\,{\it t_{35}}+{\it t_{65}}\,{ 1657C> \it t_{31}}\,{\it t_{32}}+{\it t_{64}}\,{\it t_{28}}\,{ 1658C> \it t_{29}}+{\it t_{63}}\,{\it t_{25}}\,{\it t_{26}}+{ 1659C> \it t_{62}}\,{\it t_{22}}\,{\it t_{23}}+{\it t_{61}}\,{ 1660C> \it t_{19}}\,{\it t_{20}}+{\it t_{60}}\,{\it t_{16}}\,{ 1661C> \it t_{17}}+{\it t_{59}}\,{\it t_{12}}\,{\it t_{14}}+{ 1662C> \it t_{58}}\right)-0.9305257363491002\,{\it t_1}\,{\it t_5} 1663C> \,{\it t_{44}}\,\left({\it t_{56}}\,{\it t_{11}}\,{\it t_{43}} 1664C> +{\it t_{55}}\,{\it t_{40}}\,{\it t_{41}}+{\it t_{54}}\,{ 1665C> \it t_{37}}\,{\it t_{38}}+{\it t_{53}}\,{\it t_{34}}\,{ 1666C> \it t_{35}}+{\it t_{52}}\,{\it t_{31}}\,{\it t_{32}}+{ 1667C> \it t_{51}}\,{\it t_{28}}\,{\it t_{29}}+{\it t_{50}}\,{ 1668C> \it t_{25}}\,{\it t_{26}}+{\it t_{49}}\,{\it t_{22}}\,{ 1669C> \it t_{23}}+{\it t_{48}}\,{\it t_{19}}\,{\it t_{20}}+{ 1670C> \it t_{47}}\,{\it t_{16}}\,{\it t_{17}}+{\it t_{46}}\,{ 1671C> \it t_{12}}\,{\it t_{14}}+{\it t_{45}}\right) 1672C> -0.9305257363491002\,{\it t_1}\,{\it t_5}\,{\it t_7}\, 1673C> \left({\it t_{42}}\,{\it t_{11}}\,{\it t_{43}}+{\it t_{39}} 1674C> \,{\it t_{40}}\,{\it t_{41}}+{\it t_{36}}\,{\it t_{37}}\,{ 1675C> \it t_{38}}+{\it t_{33}}\,{\it t_{34}}\,{\it t_{35}}+{ 1676C> \it t_{30}}\,{\it t_{31}}\,{\it t_{32}}+{\it t_{27}}\,{ 1677C> \it t_{28}}\,{\it t_{29}}+{\it t_{24}}\,{\it t_{25}}\,{ 1678C> \it t_{26}}+{\it t_{21}}\,{\it t_{22}}\,{\it t_{23}}+{ 1679C> \it t_{18}}\,{\it t_{19}}\,{\it t_{20}}+{\it t_{15}}\,{ 1680C> \it t_{16}}\,{\it t_{17}}+{\it t_9}\,{\it t_{12}}\,{\it t_{14}} 1681C> +{\it t_8}\right)\right)\\\\ 1682C> g &=& 0\\\\ 1683C> G &=& 1.0\,\left({\it t_{147}}\,{\it t_{146}}\,\left({ 1684C> \it t_{81}}\,{\it t_{123}}\,{\it t_{145}}+{\it t_{80}}\,{ 1685C> \it t_{143}}\,{\it t_{144}}+{\it t_{79}}\,{\it t_{141}}\,{ 1686C> \it t_{142}}+{\it t_{78}}\,{\it t_{139}}\,{\it t_{140}}+{ 1687C> \it t_{77}}\,{\it t_{137}}\,{\it t_{138}}+{\it t_{76}}\,{ 1688C> \it t_{135}}\,{\it t_{136}}+{\it t_{75}}\,{\it t_{133}}\,{ 1689C> \it t_{134}}+{\it t_{74}}\,{\it t_{131}}\,{\it t_{132}}+{ 1690C> \it t_{73}}\,{\it t_{129}}\,{\it t_{130}}+{\it t_{72}}\,{ 1691C> \it t_{127}}\,{\it t_{128}}+{\it t_{71}}\,{\it t_{124}}\,{ 1692C> \it t_{126}}+{\it t_{70}}\right)+{\it t_{147}}\,{\it t_{121}} 1693C> \,\left({\it t_{69}}\,{\it t_{123}}\,{\it t_{145}}+{ 1694C> \it t_{68}}\,{\it t_{143}}\,{\it t_{144}}+{\it t_{67}}\,{ 1695C> \it t_{141}}\,{\it t_{142}}+{\it t_{66}}\,{\it t_{139}}\,{ 1696C> \it t_{140}}+{\it t_{65}}\,{\it t_{137}}\,{\it t_{138}}+{ 1697C> \it t_{64}}\,{\it t_{135}}\,{\it t_{136}}+{\it t_{63}}\,{ 1698C> \it t_{133}}\,{\it t_{134}}+{\it t_{62}}\,{\it t_{131}}\,{ 1699C> \it t_{132}}+{\it t_{61}}\,{\it t_{129}}\,{\it t_{130}}+{ 1700C> \it t_{60}}\,{\it t_{127}}\,{\it t_{128}}+{\it t_{59}}\,{ 1701C> \it t_{124}}\,{\it t_{126}}+{\it t_{58}}\right) 1702C> -0.9305257363491002\,{\it t_{115}}\,{\it t_{119}}\,{ 1703C> \it t_{146}}\,\left({\it t_{56}}\,{\it t_{123}}\,{\it t_{145}} 1704C> +{\it t_{55}}\,{\it t_{143}}\,{\it t_{144}}+{\it t_{54}}\,{ 1705C> \it t_{141}}\,{\it t_{142}}+{\it t_{53}}\,{\it t_{139}}\,{ 1706C> \it t_{140}}+{\it t_{52}}\,{\it t_{137}}\,{\it t_{138}}+{ 1707C> \it t_{51}}\,{\it t_{135}}\,{\it t_{136}}+{\it t_{50}}\,{ 1708C> \it t_{133}}\,{\it t_{134}}+{\it t_{49}}\,{\it t_{131}}\,{ 1709C> \it t_{132}}+{\it t_{48}}\,{\it t_{129}}\,{\it t_{130}}+{ 1710C> \it t_{47}}\,{\it t_{127}}\,{\it t_{128}}+{\it t_{46}}\,{ 1711C> \it t_{124}}\,{\it t_{126}}+{\it t_{45}}\right) 1712C> -0.9305257363491002\,{\it t_{115}}\,{\it t_{119}}\,{ 1713C> \it t_{121}}\,\left({\it t_{42}}\,{\it t_{123}}\,{\it t_{145}} 1714C> +{\it t_{39}}\,{\it t_{143}}\,{\it t_{144}}+{\it t_{36}}\,{ 1715C> \it t_{141}}\,{\it t_{142}}+{\it t_{33}}\,{\it t_{139}}\,{ 1716C> \it t_{140}}+{\it t_{30}}\,{\it t_{137}}\,{\it t_{138}}+{ 1717C> \it t_{27}}\,{\it t_{135}}\,{\it t_{136}}+{\it t_{24}}\,{ 1718C> \it t_{133}}\,{\it t_{134}}+{\it t_{21}}\,{\it t_{131}}\,{ 1719C> \it t_{132}}+{\it t_{18}}\,{\it t_{129}}\,{\it t_{130}}+{ 1720C> \it t_{15}}\,{\it t_{127}}\,{\it t_{128}}+{\it t_9}\,{ 1721C> \it t_{124}}\,{\it t_{126}}+{\it t_8}\right)\right)\\\\ 1722C> \f} 1723C> 1724C> Code generated with Maxima 5.34.0 [2] 1725C> driven by autoxc [3]. 1726C> 1727C> ### References ### 1728C> 1729C> [1] R Peverati, DG Truhlar, J.Phys.Chem.Lett. 2, 2810 (2011) , DOI: 1730C> <a href="https://doi.org/10.1021/jz201170d "> 1731C> 10.1021/jz201170d </a> 1732C> 1733C> [2] Maxima, a computer algebra system, 1734C> <a href="http://maxima.sourceforge.net/"> 1735C> http://maxima.sourceforge.net/</a> 1736C> 1737C> [3] autoxc, revision 27097 2015-05-08 1738C> 1739 subroutine nwxcm_x_m11_d2(param,tol_rho,ipol,nq,wght, 1740 +rho,rgamma,tau,fnc,Amat,Amat2,Cmat,Cmat2,Mmat,Mmat2) 1741c $Id: $ 1742#ifdef NWXC_QUAD_PREC 1743 implicit real(kind=selected_real_kind(30))(a-h,o-z),integer(i-n) 1744 integer, parameter :: rk=selected_real_kind(30) 1745#else 1746 implicit real(kind=selected_real_kind(15))(a-h,o-z),integer(i-n) 1747 integer, parameter :: rk=selected_real_kind(15) 1748#endif 1749#include "nwxc_param.fh" 1750 double precision param(*) !< [Input] Parameters of functional 1751 double precision tol_rho !< [Input] The lower limit on the density 1752 integer ipol !< [Input] The number of spin channels 1753 integer nq !< [Input] The number of points 1754 double precision wght !< [Input] The weight of the functional 1755 double precision rho(nq,NCOL_RHO) !< [Input] The density 1756 double precision rgamma(nq,NCOL_GAMMA) !< [Input] The norm of the density 1757 !< gradients 1758 double precision tau(nq,NCOL_TAU) !< [Input] The kinetic energy density 1759 double precision fnc(nq) !< [Output] The value of the functional 1760c 1761c Sampling Matrices for the XC Kernel 1762c 1763 double precision Amat(nq,NCOL_AMAT) !< [Output] The derivative wrt rho 1764 double precision Cmat(nq,NCOL_CMAT) !< [Output] The derivative wrt rgamma 1765 double precision Mmat(nq,NCOL_MMAT) !< [Output] The derivative wrt tau 1766c 1767c Sampling Matrices for the XC Kernel 1768c 1769 double precision Amat2(nq,NCOL_AMAT2) !< [Output] The 2nd derivative wrt rho 1770 double precision Cmat2(nq,NCOL_CMAT2) !< [Output] The 2nd derivative wrt rgamma 1771 !< and possibly rho 1772 double precision Mmat2(nq,NCOL_MMAT2) !< [Output] The 2nd derivative wrt tau 1773 !< and possibly rho 1774 integer iq 1775 double precision tmp 1776 double precision rhoa,rhob 1777 double precision gammaaa,gammaab,gammabb 1778 double precision taua,taub 1779 double precision nwxcm_heaviside 1780 external nwxcm_heaviside 1781CDIR$ NOVECTOR 1782 do iq = 1, nq 1783 if (ipol.eq.1) then 1784 rhoa = 0.5d0*rho(iq,R_T) 1785 gammaaa = 0.25d0*rgamma(iq,G_TT) 1786 taua = 0.5d0*tau(iq,T_T) 1787 if (rhoa.gt.tol_rho) then 1788 t1 = 1/rhoa**2.6666666666666666d+0 1789 t2 = 4.492667444378077d-3*gammaaa*t1+1.0d+0 1790 t3 = 8.04d-1*(1.0d+0-1.0d+0/t2)+1.0d+0 1791 t4 = rhoa**1.3333333333333333d+0 1792 t5 = rhoa**3.333333333333333d-1 1793 t6 = 1/t5 1794 t7 = 1/rhoa 1795 t8 = 1.282782438530422d-1*t6-2.63857249068588d-4*t7 1796 t9 = rhoa**6.666666666666666d-1 1797 t10 = exp(-2.4308265985843178d+2*t9) 1798 t11 = t10*t8+2.63857249068588d-4*t7-1.924173657795633d-1*t6+ 1799 1 3.544907701811032d+0*erf(1.5591108358883013d+1*t5) 1800 t12 = 1.0d+0-4.275941461768073d-2*t11*t6 1801 t13 = param(12) 1802 t14 = rhoa**1.6666666666666669d+0 1803 t15 = 9.115599744691192d+0*t14 1804 t16 = t15-2.0d+0*taua 1805 t17 = t16**11 1806 t18 = 2.0d+0*taua+t15 1807 t19 = 1/t18**11 1808 t20 = param(11) 1809 t21 = t16**10 1810 t22 = 1/t18**10 1811 t23 = param(10) 1812 t24 = t16**9 1813 t25 = 1/t18**9 1814 t26 = param(9) 1815 t27 = t16**8 1816 t28 = 1/t18**8 1817 t29 = param(8) 1818 t30 = t16**7 1819 t31 = 1/t18**7 1820 t32 = param(7) 1821 t33 = t16**6 1822 t34 = 1/t18**6 1823 t35 = param(6) 1824 t36 = t16**5 1825 t37 = 1/t18**5 1826 t38 = param(5) 1827 t39 = t16**4 1828 t40 = 1/t18**4 1829 t41 = param(4) 1830 t42 = t16**3 1831 t43 = 1/t18**3 1832 t44 = param(3) 1833 t45 = t16**2 1834 t46 = 1/t18**2 1835 t47 = param(2) 1836 t48 = 1/t18 1837 t49 = t16*t47*t48+t44*t45*t46+t41*t42*t43+t38*t39*t40+t35*t3 1838 1 6*t37+t32*t33*t34+t29*t30*t31+t26*t27*t28+t23*t24*t25+t20 1839 2 *t21*t22+t13*t17*t19+param(1) 1840 t50 = exp(-3.6802889260199856d-3*gammaaa*t1) 1841 t51 = 5.52d-1*(1.0d+0-t50)+1.0d+0 1842 t52 = param(24) 1843 t53 = param(23) 1844 t54 = param(22) 1845 t55 = param(21) 1846 t56 = param(20) 1847 t57 = param(19) 1848 t58 = param(18) 1849 t59 = param(17) 1850 t60 = param(16) 1851 t61 = param(15) 1852 t62 = param(14) 1853 t63 = t16*t48*t62+t45*t46*t61+t42*t43*t60+t39*t40*t59+t36*t3 1854 1 7*t58+t33*t34*t57+t30*t31*t56+t27*t28*t55+t24*t25*t54+t21 1855 2 *t22*t53+t17*t19*t52+param(13) 1856 t64 = 9.305257363491002d-1*t12*t4-9.305257363491002d-1*t4 1857 t65 = param(36) 1858 t66 = param(35) 1859 t67 = param(34) 1860 t68 = param(33) 1861 t69 = param(32) 1862 t70 = param(31) 1863 t71 = param(30) 1864 t72 = param(29) 1865 t73 = param(28) 1866 t74 = param(27) 1867 t75 = param(26) 1868 t76 = t16*t48*t75+t45*t46*t74+t42*t43*t73+t39*t40*t72+t36*t3 1869 1 7*t71+t33*t34*t70+t30*t31*t69+t27*t28*t68+t24*t25*t67+t21 1870 2 *t22*t66+t17*t19*t65+param(25) 1871 t77 = param(48) 1872 t78 = param(47) 1873 t79 = param(46) 1874 t80 = param(45) 1875 t81 = param(44) 1876 t82 = param(43) 1877 t83 = param(42) 1878 t84 = param(41) 1879 t85 = param(40) 1880 t86 = param(39) 1881 t87 = param(38) 1882 t88 = t16*t48*t87+t45*t46*t86+t42*t43*t85+t39*t40*t84+t36*t3 1883 1 7*t83+t33*t34*t82+t30*t31*t81+t27*t28*t80+t24*t25*t79+t21 1884 2 *t22*t78+t17*t19*t77+param(37) 1885 t89 = 1/t18**12 1886 t90 = -1.6711932865267184d+2*t13*t17*t89*t9+1.51926662411519 1887 1 86d+1*t47*t48*t9-1.5192666241151986d+1*t16*t46*t47*t9+3.0 1888 2 38533248230397d+1*t16*t44*t46*t9-3.038533248230397d+1*t43 1889 3 *t44*t45*t9+4.5577998723455965d+1*t41*t43*t45*t9-4.557799 1890 4 8723455965d+1*t40*t41*t42*t9+6.077066496460795d+1*t38*t40 1891 5 *t42*t9-6.077066496460795d+1*t37*t38*t39*t9+7.59633312057 1892 6 5993d+1*t35*t37*t39*t9-7.596333120575993d+1*t34*t35*t36*t 1893 7 9+9.115599744691193d+1*t32*t34*t36*t9-9.115599744691193d+ 1894 8 1*t31*t32*t33*t9+1.0634866368806391d+2*t29*t31*t33*t9-1.0 1895 9 634866368806391d+2*t28*t29*t30*t9+1.2154132992921589d+2*t 1896 : 26*t28*t30*t9-1.2154132992921589d+2*t25*t26*t27*t9+1.3673 1897 ; 399617036788d+2*t23*t25*t27*t9-1.3673399617036788d+2*t22* 1898 < t23*t24*t9+1.5192666241151986d+2*t20*t22*t24*t9-1.5192666 1899 = 241151986d+2*t19*t20*t21*t9+1.6711932865267184d+2*t13*t19 1900 > *t21*t9 1901 t91 = -1.6711932865267184d+2*t17*t52*t89*t9+1.51926662411519 1902 1 86d+1*t48*t62*t9-1.5192666241151986d+1*t16*t46*t62*t9+3.0 1903 2 38533248230397d+1*t16*t46*t61*t9-3.038533248230397d+1*t43 1904 3 *t45*t61*t9+4.5577998723455965d+1*t43*t45*t60*t9-4.557799 1905 4 8723455965d+1*t40*t42*t60*t9+6.077066496460795d+1*t40*t42 1906 5 *t59*t9-6.077066496460795d+1*t37*t39*t59*t9+7.59633312057 1907 6 5993d+1*t37*t39*t58*t9-7.596333120575993d+1*t34*t36*t58*t 1908 7 9+9.115599744691193d+1*t34*t36*t57*t9-9.115599744691193d+ 1909 8 1*t31*t33*t57*t9+1.0634866368806391d+2*t31*t33*t56*t9-1.0 1910 9 634866368806391d+2*t28*t30*t56*t9+1.2154132992921589d+2*t 1911 : 28*t30*t55*t9-1.2154132992921589d+2*t25*t27*t55*t9+1.3673 1912 ; 399617036788d+2*t25*t27*t54*t9-1.3673399617036788d+2*t22* 1913 < t24*t54*t9+1.5192666241151986d+2*t22*t24*t53*t9-1.5192666 1914 = 241151986d+2*t19*t21*t53*t9+1.6711932865267184d+2*t19*t21 1915 > *t52*t9 1916 t92 = -1.6711932865267184d+2*t17*t65*t89*t9+1.51926662411519 1917 1 86d+1*t48*t75*t9-1.5192666241151986d+1*t16*t46*t75*t9+3.0 1918 2 38533248230397d+1*t16*t46*t74*t9-3.038533248230397d+1*t43 1919 3 *t45*t74*t9+4.5577998723455965d+1*t43*t45*t73*t9-4.557799 1920 4 8723455965d+1*t40*t42*t73*t9+6.077066496460795d+1*t40*t42 1921 5 *t72*t9-6.077066496460795d+1*t37*t39*t72*t9+7.59633312057 1922 6 5993d+1*t37*t39*t71*t9-7.596333120575993d+1*t34*t36*t71*t 1923 7 9+9.115599744691193d+1*t34*t36*t70*t9-9.115599744691193d+ 1924 8 1*t31*t33*t70*t9+1.0634866368806391d+2*t31*t33*t69*t9-1.0 1925 9 634866368806391d+2*t28*t30*t69*t9+1.2154132992921589d+2*t 1926 : 28*t30*t68*t9-1.2154132992921589d+2*t25*t27*t68*t9+1.3673 1927 ; 399617036788d+2*t25*t27*t67*t9-1.3673399617036788d+2*t22* 1928 < t24*t67*t9+1.5192666241151986d+2*t22*t24*t66*t9-1.5192666 1929 = 241151986d+2*t19*t21*t66*t9+1.6711932865267184d+2*t19*t21 1930 > *t65*t9 1931 t93 = -1.6711932865267184d+2*t17*t77*t89*t9+1.51926662411519 1932 1 86d+1*t48*t87*t9-1.5192666241151986d+1*t16*t46*t87*t9+3.0 1933 2 38533248230397d+1*t16*t46*t86*t9-3.038533248230397d+1*t43 1934 3 *t45*t86*t9+4.5577998723455965d+1*t43*t45*t85*t9-4.557799 1935 4 8723455965d+1*t40*t42*t85*t9+6.077066496460795d+1*t40*t42 1936 5 *t84*t9-6.077066496460795d+1*t37*t39*t84*t9+7.59633312057 1937 6 5993d+1*t37*t39*t83*t9-7.596333120575993d+1*t34*t36*t83*t 1938 7 9+9.115599744691193d+1*t34*t36*t82*t9-9.115599744691193d+ 1939 8 1*t31*t33*t82*t9+1.0634866368806391d+2*t31*t33*t81*t9-1.0 1940 9 634866368806391d+2*t28*t30*t81*t9+1.2154132992921589d+2*t 1941 : 28*t30*t80*t9-1.2154132992921589d+2*t25*t27*t80*t9+1.3673 1942 ; 399617036788d+2*t25*t27*t79*t9-1.3673399617036788d+2*t22* 1943 < t24*t79*t9+1.5192666241151986d+2*t22*t24*t78*t9-1.5192666 1944 = 241151986d+2*t19*t21*t78*t9+1.6711932865267184d+2*t19*t21 1945 > *t77*t9 1946 t94 = 1/t2**2 1947 t95 = 1/rhoa**2.3333333333333334d+0 1948 t96 = 1/t4 1949 t97 = 1/rhoa**2 1950 t98 = 2.63857249068588d-4*t97-4.2759414617680735d-2*t96 1951 t99 = 5.641895835477563d-1 1952 t100 = 1/t9 1953 t101 = 3.6846026734116505d+1*t10*t100*t99+t10*t98-2.63857249 1954 1 068588d-4*t97+6.41391219265211d-2*t96-1.6205510657228786d 1955 2 +2*t10*t6*t8 1956 t102 = 1.4253138205893576d-2*t11*t96-4.275941461768073d-2*t1 1957 1 01*t6 1958 t103 = 1/rhoa**3.6666666666666664d+0 1959 t104 = 1.2407009817988002d+0*t12*t5-1.2407009817988002d+0*t5 1960 1 +9.305257363491002d-1*t102*t4 1961 t105 = -2.2d+1*t13*t17*t89-2.0d+0*t47*t48-2.0d+0*t16*t46*t47 1962 1 -4.0d+0*t16*t44*t46-4.0d+0*t43*t44*t45-6.0d+0*t41*t43*t45 1963 2 -6.0d+0*t40*t41*t42-8.0d+0*t38*t40*t42-8.0d+0*t37*t38*t39 1964 3 -1.0d+1*t35*t37*t39-1.0d+1*t34*t35*t36-1.2d+1*t32*t34*t36 1965 4 -1.2d+1*t31*t32*t33-1.4d+1*t29*t31*t33-1.4d+1*t28*t29*t30 1966 5 -1.6d+1*t26*t28*t30-1.6d+1*t25*t26*t27-1.8d+1*t23*t25*t27 1967 6 -1.8d+1*t22*t23*t24-2.0d+1*t20*t22*t24-2.0d+1*t19*t20*t21 1968 7 -2.2d+1*t13*t19*t21 1969 t106 = -2.2d+1*t17*t52*t89-2.0d+0*t48*t62-2.0d+0*t16*t46*t62 1970 1 -4.0d+0*t16*t46*t61-4.0d+0*t43*t45*t61-6.0d+0*t43*t45*t60 1971 2 -6.0d+0*t40*t42*t60-8.0d+0*t40*t42*t59-8.0d+0*t37*t39*t59 1972 3 -1.0d+1*t37*t39*t58-1.0d+1*t34*t36*t58-1.2d+1*t34*t36*t57 1973 4 -1.2d+1*t31*t33*t57-1.4d+1*t31*t33*t56-1.4d+1*t28*t30*t56 1974 5 -1.6d+1*t28*t30*t55-1.6d+1*t25*t27*t55-1.8d+1*t25*t27*t54 1975 6 -1.8d+1*t22*t24*t54-2.0d+1*t22*t24*t53-2.0d+1*t19*t21*t53 1976 7 -2.2d+1*t19*t21*t52 1977 t107 = -2.2d+1*t17*t65*t89-2.0d+0*t48*t75-2.0d+0*t16*t46*t75 1978 1 -4.0d+0*t16*t46*t74-4.0d+0*t43*t45*t74-6.0d+0*t43*t45*t73 1979 2 -6.0d+0*t40*t42*t73-8.0d+0*t40*t42*t72-8.0d+0*t37*t39*t72 1980 3 -1.0d+1*t37*t39*t71-1.0d+1*t34*t36*t71-1.2d+1*t34*t36*t70 1981 4 -1.2d+1*t31*t33*t70-1.4d+1*t31*t33*t69-1.4d+1*t28*t30*t69 1982 5 -1.6d+1*t28*t30*t68-1.6d+1*t25*t27*t68-1.8d+1*t25*t27*t67 1983 6 -1.8d+1*t22*t24*t67-2.0d+1*t22*t24*t66-2.0d+1*t19*t21*t66 1984 7 -2.2d+1*t19*t21*t65 1985 t108 = -2.2d+1*t17*t77*t89-2.0d+0*t48*t87-2.0d+0*t16*t46*t87 1986 1 -4.0d+0*t16*t46*t86-4.0d+0*t43*t45*t86-6.0d+0*t43*t45*t85 1987 2 -6.0d+0*t40*t42*t85-8.0d+0*t40*t42*t84-8.0d+0*t37*t39*t84 1988 3 -1.0d+1*t37*t39*t83-1.0d+1*t34*t36*t83-1.2d+1*t34*t36*t82 1989 4 -1.2d+1*t31*t33*t82-1.4d+1*t31*t33*t81-1.4d+1*t28*t30*t81 1990 5 -1.6d+1*t28*t30*t80-1.6d+1*t25*t27*t80-1.8d+1*t25*t27*t79 1991 6 -1.8d+1*t22*t24*t79-2.0d+1*t22*t24*t78-2.0d+1*t19*t21*t78 1992 7 -2.2d+1*t19*t21*t77 1993 t109 = 1/t18**13 1994 t110 = gammaaa**2 1995 t111 = 1/t2**3 1996 t112 = 1/rhoa**6 1997 t113 = 1/rhoa**3.3333333333333337d+0 1998 t114 = 1/rhoa**3 1999 t115 = -4.275941461768073d-2*t6*(-5.971086789162617d+3*t10*t 2000 1 7*t99-2.4564017822744336d+1*t10*t99/t14-3.241102131445757 2001 2 d+2*t10*t6*t98+5.401836885742928d+1*t10*t8*t96-8.55188292 2002 3 3536147d-2*t95+t10*(5.701255282357431d-2*t95-5.2771449813 2003 4 7176d-4*t114)+2.626185756615557d+4*t10*t100*t8+5.27714498 2004 5 137176d-4*t114)+2.850627641178715d-2*t101*t96-1.900418427 2005 6 4524766d-2*t11*t95 2006 t116 = 1/rhoa**7.333333333333333d+0 2007 t117 = 1/rhoa**4.666666666666667d+0 2008 t118 = 2.4814019635976003d+0*t102*t5+9.305257363491002d-1*t1 2009 1 15*t4+4.135669939329334d-1*t100*t12-4.135669939329334d-1* 2010 2 t100 2011 t119 = 1/rhoa**5 2012 t120 = 1/rhoa**6.333333333333333d+0 2013 t121 = 1/rhoa**4 2014 t122 = 1/rhoa**5.333333333333333d+0 2015 fnc(iq) = 2.0d+0*(t51*t64*t88+t3*t64*t76-9.305257363491002d- 2016 1 1*t12*t4*t51*t63-9.305257363491002d-1*t12*t3*t4*t49)*wght 2017 2 +fnc(iq) 2018 Amat(iq,D1_RA) = 1.0d+0*(8.963083509889702d-3*gammaaa*t12*t4 2019 1 9*t94*t95+5.041016444533138d-3*gammaaa*t12*t50*t63*t95-9. 2020 2 632279000746596d-3*gammaaa*t103*t64*t76*t94+t51*t64*t93+t 2021 3 3*t64*t92-9.305257363491002d-1*t12*t4*t51*t91-9.305257363 2022 4 491002d-1*t12*t3*t4*t90-5.417385299101419d-3*gammaaa*t103 2023 5 *t50*t64*t88+t104*t51*t88+t104*t3*t76-1.2407009817988002d 2024 6 +0*t12*t5*t51*t63-9.305257363491002d-1*t102*t4*t51*t63-1. 2025 7 2407009817988002d+0*t12*t3*t49*t5-9.305257363491002d-1*t1 2026 8 02*t3*t4*t49)*wght+Amat(iq,D1_RA) 2027 Cmat(iq,D1_GAA) = 1.0d+0*(-3.361156316208638d-3*t12*t49*t94* 2028 1 t96-1.890381166699927d-3*t12*t50*t63*t96+3.61210462527997 2029 2 4d-3*t1*t64*t76*t94+2.0315194871630324d-3*t1*t50*t64*t88) 2030 3 *wght+Cmat(iq,D1_GAA) 2031 Cmat(iq,D1_GAB) = Cmat(iq,D1_GAB) 2032 Mmat(iq,D1_TA) = 1.0d+0*(t108*t51*t64+t107*t3*t64-9.30525736 2033 1 3491002d-1*t106*t12*t4*t51-9.305257363491002d-1*t105*t12* 2034 2 t3*t4)*wght+Mmat(iq,D1_TA) 2035 Amat2(iq,D2_RA_RA) = 1.0d+0*((1.7926167019779404d-2*gammaaa* 2036 1 t12*t90+1.7926167019779404d-2*gammaaa*t102*t49)*t94*t95+( 2037 2 1.0082032889066277d-2*gammaaa*t12*t50*t91+1.0082032889066 2038 3 277d-2*gammaaa*t102*t50*t63)*t95+t103*(-1.926455800149319 2039 4 3d-2*gammaaa*t64*t92-1.9264558001493193d-2*gammaaa*t104*t 2040 5 76)*t94+3.5318356336070855d-2*gammaaa*t117*t64*t76*t94-8. 2041 6 963083509889707d-3*gammaaa*t113*t12*t49*t94+t103*(-1.0834 2042 7 770598202839d-2*gammaaa*t50*t64*t93-1.0834770598202839d-2 2043 8 *gammaaa*t104*t50*t88)+2*t104*t51*t93+2*t104*t3*t92-2.481 2044 9 4019635976003d+0*t12*t5*t51*t91-1.8610514726982003d+0*t10 2045 : 2*t4*t51*t91-2.4814019635976003d+0*t12*t3*t5*t90-1.861051 2046 ; 4726982003d+0*t102*t3*t4*t90+t51*t64*(2.5389881826654315d 2047 < +4*t21*t4*t78*t89-1.1141288576844789d+2*t17*t6*t77*t89-5. 2048 = 585774001863949d+4*t21*t4*t77*t89+1.0128444160767991d+1*t 2049 > 48*t6*t87-1.0128444160767991d+1*t16*t46*t6*t87-4.61634215 2050 ? 03007845d+2*t4*t46*t87+4.6163421503007845d+2*t16*t4*t43*t 2051 @ 87+2.0256888321535982d+1*t16*t46*t6*t86-2.025688832153598 2052 1 2d+1*t43*t45*t6*t86+4.6163421503007845d+2*t4*t46*t86+1.38 2053 2 49026450902355d+3*t4*t40*t45*t86-1.846536860120314d+3*t16 2054 3 *t4*t43*t86+3.038533248230397d+1*t43*t45*t6*t85-3.0385332 2055 4 48230397d+1*t40*t42*t6*t85-4.1547079352707067d+3*t4*t40*t 2056 5 45*t85+1.3849026450902355d+3*t16*t4*t43*t85+2.76980529018 2057 6 0471d+3*t37*t4*t42*t85+4.0513776643071964d+1*t40*t42*t6*t 2058 7 84-4.0513776643071964d+1*t37*t39*t6*t84+2.769805290180471 2059 8 d+3*t4*t40*t45*t84-7.386147440481255d+3*t37*t4*t42*t84+4. 2060 9 616342150300784d+3*t34*t39*t4*t84+5.064222080383994d+1*t3 2061 : 7*t39*t6*t83-5.064222080383994d+1*t34*t36*t6*t83+4.616342 2062 ; 150300784d+3*t37*t4*t42*t83-1.154085537575196d+4*t34*t39* 2063 < t4*t83+6.924513225451178d+3*t31*t36*t4*t83+6.077066496460 2064 = 795d+1*t34*t36*t6*t82-6.077066496460795d+1*t31*t33*t6*t82 2065 > +6.924513225451178d+3*t34*t39*t4*t82-1.661883174108283d+4 2066 ? *t31*t36*t4*t82+9.694318515631648d+3*t28*t33*t4*t82+7.089 2067 @ 910912537593d+1*t31*t33*t6*t81-7.089910912537593d+1*t28*t 2068 1 30*t6*t81+9.694318515631648d+3*t31*t36*t4*t81-2.262007653 2069 2 6473846d+4*t28*t33*t4*t81+1.2925758020842196d+4*t25*t30*t 2070 3 4*t81+8.102755328614393d+1*t28*t30*t6*t80-8.1027553286143 2071 4 93d+1*t25*t27*t6*t80+1.2925758020842196d+4*t28*t33*t4*t80 2072 5 -2.954458976192502d+4*t25*t30*t4*t80+1.6618831741082823d+ 2073 6 4*t22*t27*t4*t80+9.115599744691191d+1*t25*t27*t6*t79-9.11 2074 7 5599744691191d+1*t22*t24*t6*t79+1.6618831741082823d+4*t25 2075 8 *t30*t4*t79-3.7392371417436354d+4*t22*t27*t4*t79+2.077353 2076 9 9676353528d+4*t19*t24*t4*t79+1.012844416076799d+2*t22*t24 2077 : *t6*t78-1.012844416076799d+2*t19*t21*t6*t78+2.07735396763 2078 ; 53528d+4*t22*t27*t4*t78-4.616342150300784d+4*t19*t24*t4*t 2079 < 78+1.1141288576844789d+2*t19*t21*t6*t77+2.538988182665431 2080 = 5d+4*t19*t24*t4*t77+3.046785819198518d+4*t109*t17*t4*t77) 2081 > +t3*t64*(2.5389881826654315d+4*t21*t4*t66*t89-1.114128857 2082 ? 6844789d+2*t17*t6*t65*t89-5.585774001863949d+4*t21*t4*t65 2083 @ *t89+1.0128444160767991d+1*t48*t6*t75-1.0128444160767991d 2084 1 +1*t16*t46*t6*t75-4.6163421503007845d+2*t4*t46*t75+4.6163 2085 2 421503007845d+2*t16*t4*t43*t75+2.0256888321535982d+1*t16* 2086 3 t46*t6*t74-2.0256888321535982d+1*t43*t45*t6*t74+4.6163421 2087 4 503007845d+2*t4*t46*t74+1.3849026450902355d+3*t4*t40*t45* 2088 5 t74-1.846536860120314d+3*t16*t4*t43*t74+3.038533248230397 2089 6 d+1*t43*t45*t6*t73-3.038533248230397d+1*t40*t42*t6*t73-4. 2090 7 1547079352707067d+3*t4*t40*t45*t73+1.3849026450902355d+3* 2091 8 t16*t4*t43*t73+2.769805290180471d+3*t37*t4*t42*t73+4.0513 2092 9 776643071964d+1*t40*t42*t6*t72-4.0513776643071964d+1*t37* 2093 : t39*t6*t72+2.769805290180471d+3*t4*t40*t45*t72-7.38614744 2094 ; 0481255d+3*t37*t4*t42*t72+4.616342150300784d+3*t34*t39*t4 2095 < *t72+5.064222080383994d+1*t37*t39*t6*t71-5.06422208038399 2096 = 4d+1*t34*t36*t6*t71+4.616342150300784d+3*t37*t4*t42*t71-1 2097 > .154085537575196d+4*t34*t39*t4*t71+6.924513225451178d+3*t 2098 ? 31*t36*t4*t71+6.077066496460795d+1*t34*t36*t6*t70-6.07706 2099 @ 6496460795d+1*t31*t33*t6*t70+6.924513225451178d+3*t34*t39 2100 1 *t4*t70-1.661883174108283d+4*t31*t36*t4*t70+9.69431851563 2101 2 1648d+3*t28*t33*t4*t70+7.089910912537593d+1*t31*t33*t6*t6 2102 3 9-7.089910912537593d+1*t28*t30*t6*t69+9.694318515631648d+ 2103 4 3*t31*t36*t4*t69-2.2620076536473846d+4*t28*t33*t4*t69+1.2 2104 5 925758020842196d+4*t25*t30*t4*t69+8.102755328614393d+1*t2 2105 6 8*t30*t6*t68-8.102755328614393d+1*t25*t27*t6*t68+1.292575 2106 7 8020842196d+4*t28*t33*t4*t68-2.954458976192502d+4*t25*t30 2107 8 *t4*t68+1.6618831741082823d+4*t22*t27*t4*t68+9.1155997446 2108 9 91191d+1*t25*t27*t6*t67-9.115599744691191d+1*t22*t24*t6*t 2109 : 67+1.6618831741082823d+4*t25*t30*t4*t67-3.739237141743635 2110 ; 4d+4*t22*t27*t4*t67+2.0773539676353528d+4*t19*t24*t4*t67+ 2111 < 1.012844416076799d+2*t22*t24*t6*t66-1.012844416076799d+2* 2112 = t19*t21*t6*t66+2.0773539676353528d+4*t22*t27*t4*t66-4.616 2113 > 342150300784d+4*t19*t24*t4*t66+1.1141288576844789d+2*t19* 2114 ? t21*t6*t65+2.5389881826654315d+4*t19*t24*t4*t65+3.0467858 2115 @ 19198518d+4*t109*t17*t4*t65)-9.305257363491002d-1*t12*t4* 2116 1 t51*(-1.1141288576844789d+2*t17*t52*t6*t89+2.538988182665 2117 2 4315d+4*t21*t4*t53*t89-5.585774001863949d+4*t21*t4*t52*t8 2118 3 9+1.0128444160767991d+1*t48*t6*t62-1.0128444160767991d+1* 2119 4 t16*t46*t6*t62-4.6163421503007845d+2*t4*t46*t62+4.6163421 2120 5 503007845d+2*t16*t4*t43*t62+2.0256888321535982d+1*t16*t46 2121 6 *t6*t61-2.0256888321535982d+1*t43*t45*t6*t61+4.6163421503 2122 7 007845d+2*t4*t46*t61+1.3849026450902355d+3*t4*t40*t45*t61 2123 8 -1.846536860120314d+3*t16*t4*t43*t61+3.038533248230397d+1 2124 9 *t43*t45*t6*t60-3.038533248230397d+1*t40*t42*t6*t60-4.154 2125 : 7079352707067d+3*t4*t40*t45*t60+1.3849026450902355d+3*t16 2126 ; *t4*t43*t60+2.769805290180471d+3*t37*t4*t42*t60+4.0513776 2127 < 643071964d+1*t40*t42*t59*t6-4.0513776643071964d+1*t37*t39 2128 = *t59*t6+5.064222080383994d+1*t37*t39*t58*t6-5.06422208038 2129 > 3994d+1*t34*t36*t58*t6+6.077066496460795d+1*t34*t36*t57*t 2130 ? 6-6.077066496460795d+1*t31*t33*t57*t6+7.089910912537593d+ 2131 @ 1*t31*t33*t56*t6-7.089910912537593d+1*t28*t30*t56*t6+8.10 2132 1 2755328614393d+1*t28*t30*t55*t6-8.102755328614393d+1*t25* 2133 2 t27*t55*t6+9.115599744691191d+1*t25*t27*t54*t6-9.11559974 2134 3 4691191d+1*t22*t24*t54*t6+1.012844416076799d+2*t22*t24*t5 2135 4 3*t6-1.012844416076799d+2*t19*t21*t53*t6+1.11412885768447 2136 5 89d+2*t19*t21*t52*t6+2.769805290180471d+3*t4*t40*t45*t59- 2137 6 7.386147440481255d+3*t37*t4*t42*t59+4.616342150300784d+3* 2138 7 t34*t39*t4*t59+4.616342150300784d+3*t37*t4*t42*t58-1.1540 2139 8 85537575196d+4*t34*t39*t4*t58+6.924513225451178d+3*t31*t3 2140 9 6*t4*t58+6.924513225451178d+3*t34*t39*t4*t57-1.6618831741 2141 : 08283d+4*t31*t36*t4*t57+9.694318515631648d+3*t28*t33*t4*t 2142 ; 57+9.694318515631648d+3*t31*t36*t4*t56-2.2620076536473846 2143 < d+4*t28*t33*t4*t56+1.2925758020842196d+4*t25*t30*t4*t56+1 2144 = .2925758020842196d+4*t28*t33*t4*t55-2.954458976192502d+4* 2145 > t25*t30*t4*t55+1.6618831741082823d+4*t22*t27*t4*t55+1.661 2146 ? 8831741082823d+4*t25*t30*t4*t54-3.7392371417436354d+4*t22 2147 @ *t27*t4*t54+2.0773539676353528d+4*t19*t24*t4*t54+2.077353 2148 1 9676353528d+4*t22*t27*t4*t53-4.616342150300784d+4*t19*t24 2149 2 *t4*t53+2.5389881826654315d+4*t19*t24*t4*t52+3.0467858191 2150 3 98518d+4*t109*t17*t4*t52)-9.305257363491002d-1*t12*t3*t4* 2151 4 (-1.1141288576844789d+2*t13*t17*t6*t89+2.5389881826654315 2152 5 d+4*t20*t21*t4*t89-5.585774001863949d+4*t13*t21*t4*t89+1. 2153 6 0128444160767991d+1*t47*t48*t6-1.0128444160767991d+1*t16* 2154 7 t46*t47*t6+2.0256888321535982d+1*t16*t44*t46*t6-2.0256888 2155 8 321535982d+1*t43*t44*t45*t6+3.038533248230397d+1*t41*t43* 2156 9 t45*t6-3.038533248230397d+1*t40*t41*t42*t6+4.051377664307 2157 : 1964d+1*t38*t40*t42*t6-4.0513776643071964d+1*t37*t38*t39* 2158 ; t6+5.064222080383994d+1*t35*t37*t39*t6-5.064222080383994d 2159 < +1*t34*t35*t36*t6+6.077066496460795d+1*t32*t34*t36*t6-6.0 2160 = 77066496460795d+1*t31*t32*t33*t6+7.089910912537593d+1*t29 2161 > *t31*t33*t6-7.089910912537593d+1*t28*t29*t30*t6+8.1027553 2162 ? 28614393d+1*t26*t28*t30*t6-8.102755328614393d+1*t25*t26*t 2163 @ 27*t6+9.115599744691191d+1*t23*t25*t27*t6-9.1155997446911 2164 1 91d+1*t22*t23*t24*t6+1.012844416076799d+2*t20*t22*t24*t6- 2165 2 1.012844416076799d+2*t19*t20*t21*t6+1.1141288576844789d+2 2166 3 *t13*t19*t21*t6-4.6163421503007845d+2*t4*t46*t47+4.616342 2167 4 1503007845d+2*t16*t4*t43*t47+4.6163421503007845d+2*t4*t44 2168 5 *t46+1.3849026450902355d+3*t4*t40*t44*t45-4.1547079352707 2169 6 067d+3*t4*t40*t41*t45+2.769805290180471d+3*t38*t4*t40*t45 2170 7 -1.846536860120314d+3*t16*t4*t43*t44+1.3849026450902355d+ 2171 8 3*t16*t4*t41*t43+2.769805290180471d+3*t37*t4*t41*t42-7.38 2172 9 6147440481255d+3*t37*t38*t4*t42+4.616342150300784d+3*t35* 2173 : t37*t4*t42+4.616342150300784d+3*t34*t38*t39*t4-1.15408553 2174 ; 7575196d+4*t34*t35*t39*t4+6.924513225451178d+3*t32*t34*t3 2175 < 9*t4+6.924513225451178d+3*t31*t35*t36*t4-1.66188317410828 2176 = 3d+4*t31*t32*t36*t4+9.694318515631648d+3*t29*t31*t36*t4+9 2177 > .694318515631648d+3*t28*t32*t33*t4-2.2620076536473846d+4* 2178 ? t28*t29*t33*t4+1.2925758020842196d+4*t26*t28*t33*t4+1.292 2179 @ 5758020842196d+4*t25*t29*t30*t4-2.954458976192502d+4*t25* 2180 1 t26*t30*t4+1.6618831741082823d+4*t23*t25*t30*t4+1.6618831 2181 2 741082823d+4*t22*t26*t27*t4-3.7392371417436354d+4*t22*t23 2182 3 *t27*t4+2.0773539676353528d+4*t20*t22*t27*t4+2.0773539676 2183 4 353528d+4*t19*t23*t24*t4-4.616342150300784d+4*t19*t20*t24 2184 5 *t4+2.5389881826654315d+4*t13*t19*t24*t4+3.04678581919851 2185 6 8d+4*t109*t13*t17*t4)+1.9863746096705204d-2*gammaaa*t117* 2186 7 t50*t64*t88-5.316678166471045d-5*t110*t116*t50*t64*t88+t1 2187 8 18*t51*t88-2.3079800683637772d-4*t110*t111*t116*t64*t76+t 2188 9 118*t3*t76+t100*(-4.135669939329334d-1*t12*t51*t63-4.1356 2189 : 69939329334d-1*t12*t3*t49)-2.4814019635976003d+0*t102*t5* 2190 ; t51*t63-9.305257363491002d-1*t115*t4*t51*t63-5.0410164445 2191 < 33138d-3*gammaaa*t113*t12*t50*t63+4.947305865786653d-5*t1 2192 = 10*t112*t12*t50*t63-2.4814019635976003d+0*t102*t3*t49*t5- 2193 > 9.305257363491002d-1*t115*t3*t4*t49+2.1476348525932504d-4 2194 ? *t110*t111*t112*t12*t49)*wght+Amat2(iq,D2_RA_RA) 2195 Amat2(iq,D2_RA_RB) = Amat2(iq,D2_RA_RB) 2196 Cmat2(iq,D2_RA_GAA) = 1.0d+0*((-3.361156316208638d-3*t12*t90 2197 1 -3.361156316208638d-3*t102*t49)*t94*t96+(-1.8903811666999 2198 2 27d-3*t12*t50*t91-1.890381166699927d-3*t102*t50*t63)*t96+ 2199 3 4.481541754944851d-3*t12*t49*t94*t95+2.520508222266569d-3 2200 4 *t12*t50*t63*t95+t1*(3.612104625279974d-3*t64*t92+3.61210 2201 5 4625279974d-3*t104*t76)*t94-9.632279000746596d-3*t103*t64 2202 6 *t76*t94+t1*(2.0315194871630324d-3*t50*t64*t93+2.03151948 2203 7 71630324d-3*t104*t50*t88)+1.9937543124266421d-5*gammaaa*t 2204 8 120*t50*t64*t88-5.417385299101419d-3*t103*t50*t64*t88+8.6 2205 9 54925256364164d-5*gammaaa*t111*t120*t64*t76-1.85523969966 2206 : 9995d-5*gammaaa*t119*t12*t50*t63-8.05363069722469d-5*gamm 2207 ; aaa*t111*t119*t12*t49)*wght+Cmat2(iq,D2_RA_GAA) 2208 Cmat2(iq,D2_RA_GAB) = Cmat2(iq,D2_RA_GAB) 2209 Cmat2(iq,D2_RA_GBB) = Cmat2(iq,D2_RA_GBB) 2210 Cmat2(iq,D2_GAA_GAA) = 1.0d+0*(-7.476578671599909d-6*t122*t5 2211 1 0*t64*t88-3.245596971136562d-5*t111*t122*t64*t76+6.957148 2212 2 873762482d-6*t12*t121*t50*t63+3.020111511459258d-5*t111*t 2213 3 12*t121*t49)*wght+Cmat2(iq,D2_GAA_GAA) 2214 Cmat2(iq,D2_GAA_GAB) = Cmat2(iq,D2_GAA_GAB) 2215 Cmat2(iq,D2_GAA_GBB) = Cmat2(iq,D2_GAA_GBB) 2216 Cmat2(iq,D2_GAB_GAB) = Cmat2(iq,D2_GAB_GAB) 2217 Mmat2(iq,D2_RA_TA) = 1.0d+0*(8.963083509889702d-3*gammaaa*t1 2218 1 05*t12*t94*t95+5.041016444533138d-3*gammaaa*t106*t12*t50* 2219 2 t95-9.632279000746596d-3*gammaaa*t103*t107*t64*t94+t51*t6 2220 3 4*(3.342386573053437d+3*t21*t78*t89*t9+6.077066496460795d 2221 4 +1*t16*t43*t87*t9-6.077066496460795d+1*t46*t86*t9+1.82311 2222 5 99489382385d+2*t40*t45*t86*t9-1.8231199489382385d+2*t16*t 2223 6 43*t85*t9+3.646239897876477d+2*t37*t42*t85*t9-3.646239897 2224 7 876477d+2*t40*t45*t84*t9+6.077066496460795d+2*t34*t39*t84 2225 8 *t9-6.077066496460795d+2*t37*t42*t83*t9+9.115599744691192 2226 9 d+2*t31*t36*t83*t9-9.115599744691192d+2*t34*t39*t82*t9+1. 2227 : 276183964256767d+3*t28*t33*t82*t9-1.276183964256767d+3*t3 2228 ; 1*t36*t81*t9+1.7015786190090226d+3*t25*t30*t81*t9-1.70157 2229 < 86190090226d+3*t28*t33*t80*t9+2.187743938725886d+3*t22*t2 2230 = 7*t80*t9-2.187743938725886d+3*t25*t30*t79*t9+2.7346799234 2231 > 07357d+3*t19*t24*t79*t9-2.734679923407357d+3*t22*t27*t78* 2232 ? t9-3.342386573053437d+3*t19*t24*t77*t9+4.0108638876641245 2233 @ d+3*t109*t17*t77*t9)+t3*t64*(3.342386573053437d+3*t21*t66 2234 1 *t89*t9+6.077066496460795d+1*t16*t43*t75*t9-6.07706649646 2235 2 0795d+1*t46*t74*t9+1.8231199489382385d+2*t40*t45*t74*t9-1 2236 3 .8231199489382385d+2*t16*t43*t73*t9+3.646239897876477d+2* 2237 4 t37*t42*t73*t9-3.646239897876477d+2*t40*t45*t72*t9+6.0770 2238 5 66496460795d+2*t34*t39*t72*t9-6.077066496460795d+2*t37*t4 2239 6 2*t71*t9+9.115599744691192d+2*t31*t36*t71*t9-9.1155997446 2240 7 91192d+2*t34*t39*t70*t9+1.276183964256767d+3*t28*t33*t70* 2241 8 t9-1.276183964256767d+3*t31*t36*t69*t9+1.7015786190090226 2242 9 d+3*t25*t30*t69*t9-1.7015786190090226d+3*t28*t33*t68*t9+2 2243 : .187743938725886d+3*t22*t27*t68*t9-2.187743938725886d+3*t 2244 ; 25*t30*t67*t9+2.734679923407357d+3*t19*t24*t67*t9-2.73467 2245 < 9923407357d+3*t22*t27*t66*t9-3.342386573053437d+3*t19*t24 2246 = *t65*t9+4.0108638876641245d+3*t109*t17*t65*t9)-9.30525736 2247 > 3491002d-1*t12*t4*t51*(3.342386573053437d+3*t21*t53*t89*t 2248 ? 9+6.077066496460795d+1*t16*t43*t62*t9-6.077066496460795d+ 2249 @ 1*t46*t61*t9+1.8231199489382385d+2*t40*t45*t61*t9-1.82311 2250 1 99489382385d+2*t16*t43*t60*t9+3.646239897876477d+2*t37*t4 2251 2 2*t60*t9-3.646239897876477d+2*t40*t45*t59*t9+6.0770664964 2252 3 60795d+2*t34*t39*t59*t9-6.077066496460795d+2*t37*t42*t58* 2253 4 t9+9.115599744691192d+2*t31*t36*t58*t9-9.115599744691192d 2254 5 +2*t34*t39*t57*t9+1.276183964256767d+3*t28*t33*t57*t9-1.2 2255 6 76183964256767d+3*t31*t36*t56*t9+1.7015786190090226d+3*t2 2256 7 5*t30*t56*t9-1.7015786190090226d+3*t28*t33*t55*t9+2.18774 2257 8 3938725886d+3*t22*t27*t55*t9-2.187743938725886d+3*t25*t30 2258 9 *t54*t9+2.734679923407357d+3*t19*t24*t54*t9-2.73467992340 2259 : 7357d+3*t22*t27*t53*t9-3.342386573053437d+3*t19*t24*t52*t 2260 ; 9+4.0108638876641245d+3*t109*t17*t52*t9)-9.30525736349100 2261 < 2d-1*t12*t3*t4*(3.342386573053437d+3*t20*t21*t89*t9+6.077 2262 = 066496460795d+1*t16*t43*t47*t9-6.077066496460795d+1*t44*t 2263 > 46*t9+1.8231199489382385d+2*t40*t44*t45*t9-3.646239897876 2264 ? 477d+2*t38*t40*t45*t9-1.8231199489382385d+2*t16*t41*t43*t 2265 @ 9+3.646239897876477d+2*t37*t41*t42*t9-6.077066496460795d+ 2266 1 2*t35*t37*t42*t9+6.077066496460795d+2*t34*t38*t39*t9-9.11 2267 2 5599744691192d+2*t32*t34*t39*t9+9.115599744691192d+2*t31* 2268 3 t35*t36*t9-1.276183964256767d+3*t29*t31*t36*t9+1.27618396 2269 4 4256767d+3*t28*t32*t33*t9-1.7015786190090226d+3*t26*t28*t 2270 5 33*t9+1.7015786190090226d+3*t25*t29*t30*t9-2.187743938725 2271 6 886d+3*t23*t25*t30*t9+2.187743938725886d+3*t22*t26*t27*t9 2272 7 -2.734679923407357d+3*t20*t22*t27*t9+2.734679923407357d+3 2273 8 *t19*t23*t24*t9-3.342386573053437d+3*t13*t19*t24*t9+4.010 2274 9 8638876641245d+3*t109*t13*t17*t9)-5.417385299101419d-3*ga 2275 : mmaaa*t103*t108*t50*t64-1.2407009817988002d+0*t106*t12*t5 2276 ; *t51-9.305257363491002d-1*t102*t106*t4*t51+t104*t108*t51- 2277 < 1.2407009817988002d+0*t105*t12*t3*t5-9.305257363491002d-1 2278 = *t102*t105*t3*t4+t104*t107*t3)*wght+Mmat2(iq,D2_RA_TA) 2279 Mmat2(iq,D2_RA_TB) = Mmat2(iq,D2_RA_TB) 2280 Mmat2(iq,D2_GAA_TA) = 1.0d+0*(-3.361156316208638d-3*t105*t12 2281 1 *t94*t96-1.890381166699927d-3*t106*t12*t50*t96+3.61210462 2282 2 5279974d-3*t1*t107*t64*t94+2.0315194871630324d-3*t1*t108* 2283 3 t50*t64)*wght+Mmat2(iq,D2_GAA_TA) 2284 Mmat2(iq,D2_GAA_TB) = Mmat2(iq,D2_GAA_TB) 2285 Mmat2(iq,D2_GAB_TA) = Mmat2(iq,D2_GAB_TA) 2286 Mmat2(iq,D2_TA_TA) = 1.0d+0*(t51*t64*(4.4d+2*t21*t78*t89+9.6 2287 1 8d+2*t21*t77*t89+8.0d+0*t46*t87+8.0d+0*t16*t43*t87+8.0d+0 2288 2 *t46*t86+2.4d+1*t40*t45*t86+3.2d+1*t16*t43*t86+7.2d+1*t40 2289 3 *t45*t85+2.4d+1*t16*t43*t85+4.8d+1*t37*t42*t85+4.8d+1*t40 2290 4 *t45*t84+1.28d+2*t37*t42*t84+8.0d+1*t34*t39*t84+8.0d+1*t3 2291 5 7*t42*t83+2.0d+2*t34*t39*t83+1.2d+2*t31*t36*t83+1.2d+2*t3 2292 6 4*t39*t82+2.88d+2*t31*t36*t82+1.68d+2*t28*t33*t82+1.68d+2 2293 7 *t31*t36*t81+3.92d+2*t28*t33*t81+2.24d+2*t25*t30*t81+2.24 2294 8 d+2*t28*t33*t80+5.12d+2*t25*t30*t80+2.88d+2*t22*t27*t80+2 2295 9 .88d+2*t25*t30*t79+6.48d+2*t22*t27*t79+3.6d+2*t19*t24*t79 2296 : +3.6d+2*t22*t27*t78+8.0d+2*t19*t24*t78+4.4d+2*t19*t24*t77 2297 ; +5.28d+2*t109*t17*t77)+t3*t64*(4.4d+2*t21*t66*t89+9.68d+2 2298 < *t21*t65*t89+8.0d+0*t46*t75+8.0d+0*t16*t43*t75+8.0d+0*t46 2299 = *t74+2.4d+1*t40*t45*t74+3.2d+1*t16*t43*t74+7.2d+1*t40*t45 2300 > *t73+2.4d+1*t16*t43*t73+4.8d+1*t37*t42*t73+4.8d+1*t40*t45 2301 ? *t72+1.28d+2*t37*t42*t72+8.0d+1*t34*t39*t72+8.0d+1*t37*t4 2302 @ 2*t71+2.0d+2*t34*t39*t71+1.2d+2*t31*t36*t71+1.2d+2*t34*t3 2303 1 9*t70+2.88d+2*t31*t36*t70+1.68d+2*t28*t33*t70+1.68d+2*t31 2304 2 *t36*t69+3.92d+2*t28*t33*t69+2.24d+2*t25*t30*t69+2.24d+2* 2305 3 t28*t33*t68+5.12d+2*t25*t30*t68+2.88d+2*t22*t27*t68+2.88d 2306 4 +2*t25*t30*t67+6.48d+2*t22*t27*t67+3.6d+2*t19*t24*t67+3.6 2307 5 d+2*t22*t27*t66+8.0d+2*t19*t24*t66+4.4d+2*t19*t24*t65+5.2 2308 6 8d+2*t109*t17*t65)-9.305257363491002d-1*t12*t4*t51*(4.4d+ 2309 7 2*t21*t53*t89+9.68d+2*t21*t52*t89+8.0d+0*t46*t62+8.0d+0*t 2310 8 16*t43*t62+8.0d+0*t46*t61+2.4d+1*t40*t45*t61+3.2d+1*t16*t 2311 9 43*t61+7.2d+1*t40*t45*t60+2.4d+1*t16*t43*t60+4.8d+1*t37*t 2312 : 42*t60+4.8d+1*t40*t45*t59+1.28d+2*t37*t42*t59+8.0d+1*t34* 2313 ; t39*t59+8.0d+1*t37*t42*t58+2.0d+2*t34*t39*t58+1.2d+2*t31* 2314 < t36*t58+1.2d+2*t34*t39*t57+2.88d+2*t31*t36*t57+1.68d+2*t2 2315 = 8*t33*t57+1.68d+2*t31*t36*t56+3.92d+2*t28*t33*t56+2.24d+2 2316 > *t25*t30*t56+2.24d+2*t28*t33*t55+5.12d+2*t25*t30*t55+2.88 2317 ? d+2*t22*t27*t55+2.88d+2*t25*t30*t54+6.48d+2*t22*t27*t54+3 2318 @ .6d+2*t19*t24*t54+3.6d+2*t22*t27*t53+8.0d+2*t19*t24*t53+4 2319 1 .4d+2*t19*t24*t52+5.28d+2*t109*t17*t52)-9.305257363491002 2320 2 d-1*t12*t3*t4*(4.4d+2*t20*t21*t89+9.68d+2*t13*t21*t89+8.0 2321 3 d+0*t46*t47+8.0d+0*t16*t43*t47+8.0d+0*t44*t46+2.4d+1*t40* 2322 4 t44*t45+7.2d+1*t40*t41*t45+4.8d+1*t38*t40*t45+3.2d+1*t16* 2323 5 t43*t44+2.4d+1*t16*t41*t43+4.8d+1*t37*t41*t42+1.28d+2*t37 2324 6 *t38*t42+8.0d+1*t35*t37*t42+8.0d+1*t34*t38*t39+2.0d+2*t34 2325 7 *t35*t39+1.2d+2*t32*t34*t39+1.2d+2*t31*t35*t36+2.88d+2*t3 2326 8 1*t32*t36+1.68d+2*t29*t31*t36+1.68d+2*t28*t32*t33+3.92d+2 2327 9 *t28*t29*t33+2.24d+2*t26*t28*t33+2.24d+2*t25*t29*t30+5.12 2328 : d+2*t25*t26*t30+2.88d+2*t23*t25*t30+2.88d+2*t22*t26*t27+6 2329 ; .48d+2*t22*t23*t27+3.6d+2*t20*t22*t27+3.6d+2*t19*t23*t24+ 2330 < 8.0d+2*t19*t20*t24+4.4d+2*t13*t19*t24+5.28d+2*t109*t13*t1 2331 = 7))*wght+Mmat2(iq,D2_TA_TA) 2332 Mmat2(iq,D2_TA_TB) = Mmat2(iq,D2_TA_TB) 2333 endif ! rhoa.gt.tol_rho 2334 else ! ipol.eq.1 2335 rhoa = rho(iq,R_A) 2336 rhob = rho(iq,R_B) 2337 gammaaa = rgamma(iq,G_AA) 2338 gammaab = rgamma(iq,G_AB) 2339 gammabb = rgamma(iq,G_BB) 2340 taua = tau(iq,T_A) 2341 taub = tau(iq,T_B) 2342 if (rhoa.gt.tol_rho.and.rhob.gt.tol_rho) then 2343 t1 = 1/rhoa**2.6666666666666666d+0 2344 t2 = 4.492667444378077d-3*gammaaa*t1+1.0d+0 2345 t3 = 8.04d-1*(1.0d+0-1.0d+0/t2)+1.0d+0 2346 t4 = rhoa**1.3333333333333333d+0 2347 t5 = rhoa**3.333333333333333d-1 2348 t6 = 1/t5 2349 t7 = 1/rhoa 2350 t8 = 1.282782438530422d-1*t6-2.63857249068588d-4*t7 2351 t9 = rhoa**6.666666666666666d-1 2352 t10 = exp(-2.4308265985843178d+2*t9) 2353 t11 = t10*t8+2.63857249068588d-4*t7-1.924173657795633d-1*t6+ 2354 1 3.544907701811032d+0*erf(1.5591108358883013d+1*t5) 2355 t12 = 1.0d+0-4.275941461768073d-2*t11*t6 2356 t13 = param(1) 2357 t14 = param(12) 2358 t15 = rhoa**1.6666666666666669d+0 2359 t16 = 9.115599744691192d+0*t15 2360 t17 = t16-2.0d+0*taua 2361 t18 = t17**11 2362 t19 = 2.0d+0*taua+t16 2363 t20 = 1/t19**11 2364 t21 = param(11) 2365 t22 = t17**10 2366 t23 = 1/t19**10 2367 t24 = param(10) 2368 t25 = t17**9 2369 t26 = 1/t19**9 2370 t27 = param(9) 2371 t28 = t17**8 2372 t29 = 1/t19**8 2373 t30 = param(8) 2374 t31 = t17**7 2375 t32 = 1/t19**7 2376 t33 = param(7) 2377 t34 = t17**6 2378 t35 = 1/t19**6 2379 t36 = param(6) 2380 t37 = t17**5 2381 t38 = 1/t19**5 2382 t39 = param(5) 2383 t40 = t17**4 2384 t41 = 1/t19**4 2385 t42 = param(4) 2386 t43 = t17**3 2387 t44 = 1/t19**3 2388 t45 = param(3) 2389 t46 = t17**2 2390 t47 = 1/t19**2 2391 t48 = param(2) 2392 t49 = 1/t19 2393 t50 = t17*t48*t49+t45*t46*t47+t42*t43*t44+t39*t40*t41+t36*t3 2394 1 7*t38+t33*t34*t35+t30*t31*t32+t27*t28*t29+t24*t25*t26+t21 2395 2 *t22*t23+t14*t18*t20+t13 2396 t51 = exp(-3.6802889260199856d-3*gammaaa*t1) 2397 t52 = 5.52d-1*(1.0d+0-t51)+1.0d+0 2398 t53 = param(13) 2399 t54 = param(24) 2400 t55 = param(23) 2401 t56 = param(22) 2402 t57 = param(21) 2403 t58 = param(20) 2404 t59 = param(19) 2405 t60 = param(18) 2406 t61 = param(17) 2407 t62 = param(16) 2408 t63 = param(15) 2409 t64 = param(14) 2410 t65 = t17*t49*t64+t46*t47*t63+t43*t44*t62+t40*t41*t61+t37*t3 2411 1 8*t60+t34*t35*t59+t31*t32*t58+t28*t29*t57+t25*t26*t56+t22 2412 2 *t23*t55+t18*t20*t54+t53 2413 t66 = 9.305257363491002d-1*t12*t4-9.305257363491002d-1*t4 2414 t67 = param(25) 2415 t68 = param(36) 2416 t69 = param(35) 2417 t70 = param(34) 2418 t71 = param(33) 2419 t72 = param(32) 2420 t73 = param(31) 2421 t74 = param(30) 2422 t75 = param(29) 2423 t76 = param(28) 2424 t77 = param(27) 2425 t78 = param(26) 2426 t79 = t17*t49*t78+t46*t47*t77+t43*t44*t76+t40*t41*t75+t37*t3 2427 1 8*t74+t34*t35*t73+t31*t32*t72+t28*t29*t71+t25*t26*t70+t22 2428 2 *t23*t69+t18*t20*t68+t67 2429 t80 = param(37) 2430 t81 = param(48) 2431 t82 = param(47) 2432 t83 = param(46) 2433 t84 = param(45) 2434 t85 = param(44) 2435 t86 = param(43) 2436 t87 = param(42) 2437 t88 = param(41) 2438 t89 = param(40) 2439 t90 = param(39) 2440 t91 = param(38) 2441 t92 = t17*t49*t91+t46*t47*t90+t43*t44*t89+t40*t41*t88+t37*t3 2442 1 8*t87+t34*t35*t86+t31*t32*t85+t28*t29*t84+t25*t26*t83+t22 2443 2 *t23*t82+t18*t20*t81+t80 2444 t93 = 1/rhob**2.6666666666666666d+0 2445 t94 = 4.492667444378077d-3*gammabb*t93+1.0d+0 2446 t95 = 8.04d-1*(1.0d+0-1.0d+0/t94)+1.0d+0 2447 t96 = rhob**1.3333333333333333d+0 2448 t97 = rhob**3.333333333333333d-1 2449 t98 = 1/t97 2450 t99 = 1/rhob 2451 t100 = 1.282782438530422d-1*t98-2.63857249068588d-4*t99 2452 t101 = rhob**6.666666666666666d-1 2453 t102 = exp(-2.4308265985843178d+2*t101) 2454 t103 = 2.63857249068588d-4*t99-1.924173657795633d-1*t98+3.54 2455 1 4907701811032d+0*erf(1.5591108358883013d+1*t97)+t100*t102 2456 t104 = 1.0d+0-4.275941461768073d-2*t103*t98 2457 t105 = rhob**1.6666666666666669d+0 2458 t106 = 9.115599744691192d+0*t105 2459 t107 = t106-2.0d+0*taub 2460 t108 = t107**11 2461 t109 = 2.0d+0*taub+t106 2462 t110 = 1/t109**11 2463 t111 = t107**10 2464 t112 = 1/t109**10 2465 t113 = t107**9 2466 t114 = 1/t109**9 2467 t115 = t107**8 2468 t116 = 1/t109**8 2469 t117 = t107**7 2470 t118 = 1/t109**7 2471 t119 = t107**6 2472 t120 = 1/t109**6 2473 t121 = t107**5 2474 t122 = 1/t109**5 2475 t123 = t107**4 2476 t124 = 1/t109**4 2477 t125 = t107**3 2478 t126 = 1/t109**3 2479 t127 = t107**2 2480 t128 = 1/t109**2 2481 t129 = 1/t109 2482 t130 = t107*t129*t48+t127*t128*t45+t125*t126*t42+t123*t124*t 2483 1 39+t121*t122*t36+t119*t120*t33+t117*t118*t30+t115*t116*t2 2484 2 7+t113*t114*t24+t111*t112*t21+t108*t110*t14+t13 2485 t131 = exp(-3.6802889260199856d-3*gammabb*t93) 2486 t132 = 5.52d-1*(1.0d+0-t131)+1.0d+0 2487 t133 = t107*t129*t64+t127*t128*t63+t125*t126*t62+t123*t124*t 2488 1 61+t121*t122*t60+t119*t120*t59+t117*t118*t58+t115*t116*t5 2489 2 7+t113*t114*t56+t111*t112*t55+t108*t110*t54+t53 2490 t134 = 9.305257363491002d-1*t104*t96-9.305257363491002d-1*t9 2491 1 6 2492 t135 = t107*t129*t78+t127*t128*t77+t125*t126*t76+t123*t124*t 2493 1 75+t121*t122*t74+t119*t120*t73+t117*t118*t72+t115*t116*t7 2494 2 1+t113*t114*t70+t111*t112*t69+t108*t110*t68+t67 2495 t136 = t107*t129*t91+t127*t128*t90+t125*t126*t89+t123*t124*t 2496 1 88+t121*t122*t87+t119*t120*t86+t117*t118*t85+t115*t116*t8 2497 2 4+t113*t114*t83+t111*t112*t82+t108*t110*t81+t80 2498 t137 = 1/t19**12 2499 t138 = 1.5192666241151986d+1*t48*t49*t9-1.5192666241151986d+ 2500 1 1*t17*t47*t48*t9+3.038533248230397d+1*t17*t45*t47*t9-3.03 2501 2 8533248230397d+1*t44*t45*t46*t9+4.5577998723455965d+1*t42 2502 3 *t44*t46*t9-4.5577998723455965d+1*t41*t42*t43*t9+6.077066 2503 4 496460795d+1*t39*t41*t43*t9-6.077066496460795d+1*t38*t39* 2504 5 t40*t9+7.596333120575993d+1*t36*t38*t40*t9-7.596333120575 2505 6 993d+1*t35*t36*t37*t9+9.115599744691193d+1*t33*t35*t37*t9 2506 7 -9.115599744691193d+1*t32*t33*t34*t9+1.0634866368806391d+ 2507 8 2*t30*t32*t34*t9-1.0634866368806391d+2*t29*t30*t31*t9+1.2 2508 9 154132992921589d+2*t27*t29*t31*t9-1.2154132992921589d+2*t 2509 : 26*t27*t28*t9+1.3673399617036788d+2*t24*t26*t28*t9-1.3673 2510 ; 399617036788d+2*t23*t24*t25*t9+1.5192666241151986d+2*t21* 2511 < t23*t25*t9-1.5192666241151986d+2*t20*t21*t22*t9+1.6711932 2512 = 865267184d+2*t14*t20*t22*t9-1.6711932865267184d+2*t137*t1 2513 > 4*t18*t9 2514 t139 = 1.5192666241151986d+1*t49*t64*t9-1.5192666241151986d+ 2515 1 1*t17*t47*t64*t9+3.038533248230397d+1*t17*t47*t63*t9-3.03 2516 2 8533248230397d+1*t44*t46*t63*t9+4.5577998723455965d+1*t44 2517 3 *t46*t62*t9-4.5577998723455965d+1*t41*t43*t62*t9+6.077066 2518 4 496460795d+1*t41*t43*t61*t9-6.077066496460795d+1*t38*t40* 2519 5 t61*t9+7.596333120575993d+1*t38*t40*t60*t9-7.596333120575 2520 6 993d+1*t35*t37*t60*t9+9.115599744691193d+1*t35*t37*t59*t9 2521 7 -9.115599744691193d+1*t32*t34*t59*t9+1.0634866368806391d+ 2522 8 2*t32*t34*t58*t9-1.0634866368806391d+2*t29*t31*t58*t9+1.2 2523 9 154132992921589d+2*t29*t31*t57*t9-1.2154132992921589d+2*t 2524 : 26*t28*t57*t9+1.3673399617036788d+2*t26*t28*t56*t9-1.3673 2525 ; 399617036788d+2*t23*t25*t56*t9+1.5192666241151986d+2*t23* 2526 < t25*t55*t9-1.5192666241151986d+2*t20*t22*t55*t9+1.6711932 2527 = 865267184d+2*t20*t22*t54*t9-1.6711932865267184d+2*t137*t1 2528 > 8*t54*t9 2529 t140 = 1.5192666241151986d+1*t49*t78*t9-1.5192666241151986d+ 2530 1 1*t17*t47*t78*t9+3.038533248230397d+1*t17*t47*t77*t9-3.03 2531 2 8533248230397d+1*t44*t46*t77*t9+4.5577998723455965d+1*t44 2532 3 *t46*t76*t9-4.5577998723455965d+1*t41*t43*t76*t9+6.077066 2533 4 496460795d+1*t41*t43*t75*t9-6.077066496460795d+1*t38*t40* 2534 5 t75*t9+7.596333120575993d+1*t38*t40*t74*t9-7.596333120575 2535 6 993d+1*t35*t37*t74*t9+9.115599744691193d+1*t35*t37*t73*t9 2536 7 -9.115599744691193d+1*t32*t34*t73*t9+1.0634866368806391d+ 2537 8 2*t32*t34*t72*t9-1.0634866368806391d+2*t29*t31*t72*t9+1.2 2538 9 154132992921589d+2*t29*t31*t71*t9-1.2154132992921589d+2*t 2539 : 26*t28*t71*t9+1.3673399617036788d+2*t26*t28*t70*t9-1.3673 2540 ; 399617036788d+2*t23*t25*t70*t9+1.5192666241151986d+2*t23* 2541 < t25*t69*t9-1.5192666241151986d+2*t20*t22*t69*t9+1.6711932 2542 = 865267184d+2*t20*t22*t68*t9-1.6711932865267184d+2*t137*t1 2543 > 8*t68*t9 2544 t141 = 1.5192666241151986d+1*t49*t9*t91-1.5192666241151986d+ 2545 1 1*t17*t47*t9*t91+3.038533248230397d+1*t17*t47*t9*t90-3.03 2546 2 8533248230397d+1*t44*t46*t9*t90+4.5577998723455965d+1*t44 2547 3 *t46*t89*t9-4.5577998723455965d+1*t41*t43*t89*t9+6.077066 2548 4 496460795d+1*t41*t43*t88*t9-6.077066496460795d+1*t38*t40* 2549 5 t88*t9+7.596333120575993d+1*t38*t40*t87*t9-7.596333120575 2550 6 993d+1*t35*t37*t87*t9+9.115599744691193d+1*t35*t37*t86*t9 2551 7 -9.115599744691193d+1*t32*t34*t86*t9+1.0634866368806391d+ 2552 8 2*t32*t34*t85*t9-1.0634866368806391d+2*t29*t31*t85*t9+1.2 2553 9 154132992921589d+2*t29*t31*t84*t9-1.2154132992921589d+2*t 2554 : 26*t28*t84*t9+1.3673399617036788d+2*t26*t28*t83*t9-1.3673 2555 ; 399617036788d+2*t23*t25*t83*t9+1.5192666241151986d+2*t23* 2556 < t25*t82*t9-1.5192666241151986d+2*t20*t22*t82*t9+1.6711932 2557 = 865267184d+2*t20*t22*t81*t9-1.6711932865267184d+2*t137*t1 2558 > 8*t81*t9 2559 t142 = 1/t2**2 2560 t143 = 1/rhoa**2.3333333333333334d+0 2561 t144 = 1/t4 2562 t145 = 1/rhoa**2 2563 t146 = 2.63857249068588d-4*t145-4.2759414617680735d-2*t144 2564 t147 = 5.641895835477563d-1 2565 t148 = 1/t9 2566 t149 = -1.6205510657228786d+2*t10*t6*t8+3.6846026734116505d+ 2567 1 1*t10*t147*t148+t10*t146-2.63857249068588d-4*t145+6.41391 2568 2 219265211d-2*t144 2569 t150 = 1.4253138205893576d-2*t11*t144-4.275941461768073d-2*t 2570 1 149*t6 2571 t151 = 1/rhoa**3.6666666666666664d+0 2572 t152 = 1.2407009817988002d+0*t12*t5-1.2407009817988002d+0*t5 2573 1 +9.305257363491002d-1*t150*t4 2574 t153 = 1/t109**12 2575 t154 = 1.5192666241151986d+1*t101*t129*t48-1.519266624115198 2576 1 6d+1*t101*t107*t128*t48+3.038533248230397d+1*t101*t107*t1 2577 2 28*t45-3.038533248230397d+1*t101*t126*t127*t45+4.55779987 2578 3 23455965d+1*t101*t126*t127*t42-4.5577998723455965d+1*t101 2579 4 *t124*t125*t42+6.077066496460795d+1*t101*t124*t125*t39-6. 2580 5 077066496460795d+1*t101*t122*t123*t39+7.596333120575993d+ 2581 6 1*t101*t122*t123*t36-7.596333120575993d+1*t101*t120*t121* 2582 7 t36+9.115599744691193d+1*t101*t120*t121*t33-9.11559974469 2583 8 1193d+1*t101*t118*t119*t33+1.0634866368806391d+2*t101*t11 2584 9 8*t119*t30-1.0634866368806391d+2*t101*t116*t117*t30+1.215 2585 : 4132992921589d+2*t101*t116*t117*t27-1.2154132992921589d+2 2586 ; *t101*t114*t115*t27+1.3673399617036788d+2*t101*t114*t115* 2587 < t24-1.3673399617036788d+2*t101*t112*t113*t24+1.5192666241 2588 = 151986d+2*t101*t112*t113*t21-1.5192666241151986d+2*t101*t 2589 > 110*t111*t21-1.6711932865267184d+2*t101*t108*t14*t153+1.6 2590 ? 711932865267184d+2*t101*t110*t111*t14 2591 t155 = 1.5192666241151986d+1*t101*t129*t64-1.519266624115198 2592 1 6d+1*t101*t107*t128*t64+3.038533248230397d+1*t101*t107*t1 2593 2 28*t63-3.038533248230397d+1*t101*t126*t127*t63+4.55779987 2594 3 23455965d+1*t101*t126*t127*t62-4.5577998723455965d+1*t101 2595 4 *t124*t125*t62+6.077066496460795d+1*t101*t124*t125*t61-6. 2596 5 077066496460795d+1*t101*t122*t123*t61+7.596333120575993d+ 2597 6 1*t101*t122*t123*t60-7.596333120575993d+1*t101*t120*t121* 2598 7 t60+9.115599744691193d+1*t101*t120*t121*t59-9.11559974469 2599 8 1193d+1*t101*t118*t119*t59+1.0634866368806391d+2*t101*t11 2600 9 8*t119*t58-1.0634866368806391d+2*t101*t116*t117*t58+1.215 2601 : 4132992921589d+2*t101*t116*t117*t57-1.2154132992921589d+2 2602 ; *t101*t114*t115*t57+1.3673399617036788d+2*t101*t114*t115* 2603 < t56-1.3673399617036788d+2*t101*t112*t113*t56+1.5192666241 2604 = 151986d+2*t101*t112*t113*t55-1.5192666241151986d+2*t101*t 2605 > 110*t111*t55-1.6711932865267184d+2*t101*t108*t153*t54+1.6 2606 ? 711932865267184d+2*t101*t110*t111*t54 2607 t156 = 1.5192666241151986d+1*t101*t129*t78-1.519266624115198 2608 1 6d+1*t101*t107*t128*t78+3.038533248230397d+1*t101*t107*t1 2609 2 28*t77-3.038533248230397d+1*t101*t126*t127*t77+4.55779987 2610 3 23455965d+1*t101*t126*t127*t76-4.5577998723455965d+1*t101 2611 4 *t124*t125*t76+6.077066496460795d+1*t101*t124*t125*t75-6. 2612 5 077066496460795d+1*t101*t122*t123*t75+7.596333120575993d+ 2613 6 1*t101*t122*t123*t74-7.596333120575993d+1*t101*t120*t121* 2614 7 t74+9.115599744691193d+1*t101*t120*t121*t73-9.11559974469 2615 8 1193d+1*t101*t118*t119*t73+1.0634866368806391d+2*t101*t11 2616 9 8*t119*t72-1.0634866368806391d+2*t101*t116*t117*t72+1.215 2617 : 4132992921589d+2*t101*t116*t117*t71-1.2154132992921589d+2 2618 ; *t101*t114*t115*t71+1.3673399617036788d+2*t101*t114*t115* 2619 < t70-1.3673399617036788d+2*t101*t112*t113*t70+1.5192666241 2620 = 151986d+2*t101*t112*t113*t69-1.5192666241151986d+2*t101*t 2621 > 110*t111*t69-1.6711932865267184d+2*t101*t108*t153*t68+1.6 2622 ? 711932865267184d+2*t101*t110*t111*t68 2623 t157 = 1.5192666241151986d+1*t101*t129*t91-1.519266624115198 2624 1 6d+1*t101*t107*t128*t91+3.038533248230397d+1*t101*t107*t1 2625 2 28*t90-3.038533248230397d+1*t101*t126*t127*t90+4.55779987 2626 3 23455965d+1*t101*t126*t127*t89-4.5577998723455965d+1*t101 2627 4 *t124*t125*t89+6.077066496460795d+1*t101*t124*t125*t88-6. 2628 5 077066496460795d+1*t101*t122*t123*t88+7.596333120575993d+ 2629 6 1*t101*t122*t123*t87-7.596333120575993d+1*t101*t120*t121* 2630 7 t87+9.115599744691193d+1*t101*t120*t121*t86-9.11559974469 2631 8 1193d+1*t101*t118*t119*t86+1.0634866368806391d+2*t101*t11 2632 9 8*t119*t85-1.0634866368806391d+2*t101*t116*t117*t85+1.215 2633 : 4132992921589d+2*t101*t116*t117*t84-1.2154132992921589d+2 2634 ; *t101*t114*t115*t84+1.3673399617036788d+2*t101*t114*t115* 2635 < t83-1.3673399617036788d+2*t101*t112*t113*t83+1.5192666241 2636 = 151986d+2*t101*t112*t113*t82-1.5192666241151986d+2*t101*t 2637 > 110*t111*t82-1.6711932865267184d+2*t101*t108*t153*t81+1.6 2638 ? 711932865267184d+2*t101*t110*t111*t81 2639 t158 = 1/t94**2 2640 t159 = 1/rhob**2.3333333333333334d+0 2641 t160 = 1/t96 2642 t161 = 1/rhob**2 2643 t162 = 2.63857249068588d-4*t161-4.2759414617680735d-2*t160 2644 t163 = 1/t101 2645 t164 = -1.6205510657228786d+2*t100*t102*t98+3.68460267341165 2646 1 05d+1*t102*t147*t163+t102*t162-2.63857249068588d-4*t161+6 2647 2 .41391219265211d-2*t160 2648 t165 = 1.4253138205893576d-2*t103*t160-4.275941461768073d-2* 2649 1 t164*t98 2650 t166 = 1/rhob**3.6666666666666664d+0 2651 t167 = 1.2407009817988002d+0*t104*t97-1.2407009817988002d+0* 2652 1 t97+9.305257363491002d-1*t165*t96 2653 t168 = -2.0d+0*t48*t49-2.0d+0*t17*t47*t48-4.0d+0*t17*t45*t47 2654 1 -4.0d+0*t44*t45*t46-6.0d+0*t42*t44*t46-6.0d+0*t41*t42*t43 2655 2 -8.0d+0*t39*t41*t43-8.0d+0*t38*t39*t40-1.0d+1*t36*t38*t40 2656 3 -1.0d+1*t35*t36*t37-1.2d+1*t33*t35*t37-1.2d+1*t32*t33*t34 2657 4 -1.4d+1*t30*t32*t34-1.4d+1*t29*t30*t31-1.6d+1*t27*t29*t31 2658 5 -1.6d+1*t26*t27*t28-1.8d+1*t24*t26*t28-1.8d+1*t23*t24*t25 2659 6 -2.0d+1*t21*t23*t25-2.0d+1*t20*t21*t22-2.2d+1*t14*t20*t22 2660 7 -2.2d+1*t137*t14*t18 2661 t169 = -2.0d+0*t49*t64-2.0d+0*t17*t47*t64-4.0d+0*t17*t47*t63 2662 1 -4.0d+0*t44*t46*t63-6.0d+0*t44*t46*t62-6.0d+0*t41*t43*t62 2663 2 -8.0d+0*t41*t43*t61-8.0d+0*t38*t40*t61-1.0d+1*t38*t40*t60 2664 3 -1.0d+1*t35*t37*t60-1.2d+1*t35*t37*t59-1.2d+1*t32*t34*t59 2665 4 -1.4d+1*t32*t34*t58-1.4d+1*t29*t31*t58-1.6d+1*t29*t31*t57 2666 5 -1.6d+1*t26*t28*t57-1.8d+1*t26*t28*t56-1.8d+1*t23*t25*t56 2667 6 -2.0d+1*t23*t25*t55-2.0d+1*t20*t22*t55-2.2d+1*t20*t22*t54 2668 7 -2.2d+1*t137*t18*t54 2669 t170 = -2.0d+0*t49*t78-2.0d+0*t17*t47*t78-4.0d+0*t17*t47*t77 2670 1 -4.0d+0*t44*t46*t77-6.0d+0*t44*t46*t76-6.0d+0*t41*t43*t76 2671 2 -8.0d+0*t41*t43*t75-8.0d+0*t38*t40*t75-1.0d+1*t38*t40*t74 2672 3 -1.0d+1*t35*t37*t74-1.2d+1*t35*t37*t73-1.2d+1*t32*t34*t73 2673 4 -1.4d+1*t32*t34*t72-1.4d+1*t29*t31*t72-1.6d+1*t29*t31*t71 2674 5 -1.6d+1*t26*t28*t71-1.8d+1*t26*t28*t70-1.8d+1*t23*t25*t70 2675 6 -2.0d+1*t23*t25*t69-2.0d+1*t20*t22*t69-2.2d+1*t20*t22*t68 2676 7 -2.2d+1*t137*t18*t68 2677 t171 = -2.0d+0*t49*t91-2.0d+0*t17*t47*t91-4.0d+0*t17*t47*t90 2678 1 -4.0d+0*t44*t46*t90-6.0d+0*t44*t46*t89-6.0d+0*t41*t43*t89 2679 2 -8.0d+0*t41*t43*t88-8.0d+0*t38*t40*t88-1.0d+1*t38*t40*t87 2680 3 -1.0d+1*t35*t37*t87-1.2d+1*t35*t37*t86-1.2d+1*t32*t34*t86 2681 4 -1.4d+1*t32*t34*t85-1.4d+1*t29*t31*t85-1.6d+1*t29*t31*t84 2682 5 -1.6d+1*t26*t28*t84-1.8d+1*t26*t28*t83-1.8d+1*t23*t25*t83 2683 6 -2.0d+1*t23*t25*t82-2.0d+1*t20*t22*t82-2.2d+1*t20*t22*t81 2684 7 -2.2d+1*t137*t18*t81 2685 t172 = -2.0d+0*t129*t48-2.0d+0*t107*t128*t48-4.0d+0*t107*t12 2686 1 8*t45-4.0d+0*t126*t127*t45-6.0d+0*t126*t127*t42-6.0d+0*t1 2687 2 24*t125*t42-8.0d+0*t124*t125*t39-8.0d+0*t122*t123*t39-1.0 2688 3 d+1*t122*t123*t36-1.0d+1*t120*t121*t36-1.2d+1*t120*t121*t 2689 4 33-1.2d+1*t118*t119*t33-1.4d+1*t118*t119*t30-1.4d+1*t116* 2690 5 t117*t30-1.6d+1*t116*t117*t27-1.6d+1*t114*t115*t27-1.8d+1 2691 6 *t114*t115*t24-1.8d+1*t112*t113*t24-2.0d+1*t112*t113*t21- 2692 7 2.0d+1*t110*t111*t21-2.2d+1*t108*t14*t153-2.2d+1*t110*t11 2693 8 1*t14 2694 t173 = -2.0d+0*t129*t64-2.0d+0*t107*t128*t64-4.0d+0*t107*t12 2695 1 8*t63-4.0d+0*t126*t127*t63-6.0d+0*t126*t127*t62-6.0d+0*t1 2696 2 24*t125*t62-8.0d+0*t124*t125*t61-8.0d+0*t122*t123*t61-1.0 2697 3 d+1*t122*t123*t60-1.0d+1*t120*t121*t60-1.2d+1*t120*t121*t 2698 4 59-1.2d+1*t118*t119*t59-1.4d+1*t118*t119*t58-1.4d+1*t116* 2699 5 t117*t58-1.6d+1*t116*t117*t57-1.6d+1*t114*t115*t57-1.8d+1 2700 6 *t114*t115*t56-1.8d+1*t112*t113*t56-2.0d+1*t112*t113*t55- 2701 7 2.0d+1*t110*t111*t55-2.2d+1*t108*t153*t54-2.2d+1*t110*t11 2702 8 1*t54 2703 t174 = -2.0d+0*t129*t78-2.0d+0*t107*t128*t78-4.0d+0*t107*t12 2704 1 8*t77-4.0d+0*t126*t127*t77-6.0d+0*t126*t127*t76-6.0d+0*t1 2705 2 24*t125*t76-8.0d+0*t124*t125*t75-8.0d+0*t122*t123*t75-1.0 2706 3 d+1*t122*t123*t74-1.0d+1*t120*t121*t74-1.2d+1*t120*t121*t 2707 4 73-1.2d+1*t118*t119*t73-1.4d+1*t118*t119*t72-1.4d+1*t116* 2708 5 t117*t72-1.6d+1*t116*t117*t71-1.6d+1*t114*t115*t71-1.8d+1 2709 6 *t114*t115*t70-1.8d+1*t112*t113*t70-2.0d+1*t112*t113*t69- 2710 7 2.0d+1*t110*t111*t69-2.2d+1*t108*t153*t68-2.2d+1*t110*t11 2711 8 1*t68 2712 t175 = -2.0d+0*t129*t91-2.0d+0*t107*t128*t91-4.0d+0*t107*t12 2713 1 8*t90-4.0d+0*t126*t127*t90-6.0d+0*t126*t127*t89-6.0d+0*t1 2714 2 24*t125*t89-8.0d+0*t124*t125*t88-8.0d+0*t122*t123*t88-1.0 2715 3 d+1*t122*t123*t87-1.0d+1*t120*t121*t87-1.2d+1*t120*t121*t 2716 4 86-1.2d+1*t118*t119*t86-1.4d+1*t118*t119*t85-1.4d+1*t116* 2717 5 t117*t85-1.6d+1*t116*t117*t84-1.6d+1*t114*t115*t84-1.8d+1 2718 6 *t114*t115*t83-1.8d+1*t112*t113*t83-2.0d+1*t112*t113*t82- 2719 7 2.0d+1*t110*t111*t82-2.2d+1*t108*t153*t81-2.2d+1*t110*t11 2720 8 1*t81 2721 t176 = 1/t19**13 2722 t177 = gammaaa**2 2723 t178 = 1/t2**3 2724 t179 = 1/rhoa**6 2725 t180 = 1/rhoa**3.3333333333333337d+0 2726 t181 = 1/rhoa**3 2727 t182 = -4.275941461768073d-2*t6*(2.626185756615557d+4*t10*t1 2728 1 48*t8+5.401836885742928d+1*t10*t144*t8-5.971086789162617d 2729 2 +3*t10*t147*t7-3.241102131445757d+2*t10*t146*t6+5.2771449 2730 3 8137176d-4*t181+t10*(5.701255282357431d-2*t143-5.27714498 2731 4 137176d-4*t181)-2.4564017822744336d+1*t10*t147/t15-8.5518 2732 5 82923536147d-2*t143)+2.850627641178715d-2*t144*t149-1.900 2733 6 4184274524766d-2*t11*t143 2734 t183 = 1/rhoa**7.333333333333333d+0 2735 t184 = 1/rhoa**4.666666666666667d+0 2736 t185 = 2.4814019635976003d+0*t150*t5+9.305257363491002d-1*t1 2737 1 82*t4+4.135669939329334d-1*t12*t148-4.135669939329334d-1* 2738 2 t148 2739 t186 = 1/t109**13 2740 t187 = gammabb**2 2741 t188 = 1/t94**3 2742 t189 = 1/rhob**6 2743 t190 = 1/rhob**3.3333333333333337d+0 2744 t191 = 1/rhob**3 2745 t192 = -4.275941461768073d-2*t98*(-5.971086789162617d+3*t102 2746 1 *t147*t99-3.241102131445757d+2*t102*t162*t98+5.2771449813 2747 2 7176d-4*t191+t102*(5.701255282357431d-2*t159-5.2771449813 2748 3 7176d-4*t191)+2.626185756615557d+4*t100*t102*t163+5.40183 2749 4 6885742928d+1*t100*t102*t160-8.551882923536147d-2*t159-2. 2750 5 4564017822744336d+1*t102*t147/t105)+2.850627641178715d-2* 2751 6 t160*t164-1.9004184274524766d-2*t103*t159 2752 t193 = 1/rhob**7.333333333333333d+0 2753 t194 = 1/rhob**4.666666666666667d+0 2754 t195 = 2.4814019635976003d+0*t165*t97+9.305257363491002d-1*t 2755 1 192*t96+4.135669939329334d-1*t104*t163-4.135669939329334d 2756 2 -1*t163 2757 t196 = 1/rhoa**5 2758 t197 = 1/rhoa**6.333333333333333d+0 2759 t198 = 1/rhob**5 2760 t199 = 1/rhob**6.333333333333333d+0 2761 t200 = 1/rhoa**4 2762 t201 = 1/rhoa**5.333333333333333d+0 2763 t202 = 1/rhob**4 2764 t203 = 1/rhob**5.333333333333333d+0 2765 fnc(iq) = (1.0d+0*(-9.305257363491002d-1*t104*t130*t95*t96-9 2766 1 .305257363491002d-1*t104*t132*t133*t96+t134*t135*t95+t132 2767 2 *t134*t136)+1.0d+0*(t52*t66*t92+t3*t66*t79-9.305257363491 2768 3 002d-1*t12*t4*t52*t65-9.305257363491002d-1*t12*t3*t4*t50) 2769 4 )*wght+fnc(iq) 2770 Amat(iq,D1_RA) = 1.0d+0*(-5.417385299101419d-3*gammaaa*t151* 2771 1 t51*t66*t92+t152*t52*t92-9.632279000746596d-3*gammaaa*t14 2772 2 2*t151*t66*t79+t152*t3*t79+t141*t52*t66+t140*t3*t66-1.240 2773 3 7009817988002d+0*t12*t5*t52*t65-9.305257363491002d-1*t150 2774 4 *t4*t52*t65+5.041016444533138d-3*gammaaa*t12*t143*t51*t65 2775 5 -9.305257363491002d-1*t12*t139*t4*t52-1.2407009817988002d 2776 6 +0*t12*t3*t5*t50-9.305257363491002d-1*t150*t3*t4*t50+8.96 2777 7 3083509889702d-3*gammaaa*t12*t142*t143*t50-9.305257363491 2778 8 002d-1*t12*t138*t3*t4)*wght+Amat(iq,D1_RA) 2779 Amat(iq,D1_RB) = 1.0d+0*(-1.2407009817988002d+0*t104*t130*t9 2780 1 5*t97-1.2407009817988002d+0*t104*t132*t133*t97-9.30525736 2781 2 3491002d-1*t130*t165*t95*t96-9.305257363491002d-1*t104*t1 2782 3 54*t95*t96-9.305257363491002d-1*t132*t133*t165*t96-9.3052 2783 4 57363491002d-1*t104*t132*t155*t96+t135*t167*t95+t134*t156 2784 5 *t95+t132*t136*t167-9.632279000746596d-3*gammabb*t134*t13 2785 6 5*t158*t166-5.417385299101419d-3*gammabb*t131*t134*t136*t 2786 7 166+8.963083509889702d-3*gammabb*t104*t130*t158*t159+5.04 2787 8 1016444533138d-3*gammabb*t104*t131*t133*t159+t132*t134*t1 2788 9 57)*wght+Amat(iq,D1_RB) 2789 Cmat(iq,D1_GAA) = 1.0d+0*(2.0315194871630324d-3*t1*t51*t66*t 2790 1 92+3.612104625279974d-3*t1*t142*t66*t79-1.890381166699927 2791 2 d-3*t12*t144*t51*t65-3.361156316208638d-3*t12*t142*t144*t 2792 3 50)*wght+Cmat(iq,D1_GAA) 2793 Cmat(iq,D1_GAB) = Cmat(iq,D1_GAB) 2794 Cmat(iq,D1_GBB) = 1.0d+0*(3.612104625279974d-3*t134*t135*t15 2795 1 8*t93+2.0315194871630324d-3*t131*t134*t136*t93-3.36115631 2796 2 6208638d-3*t104*t130*t158*t160-1.890381166699927d-3*t104* 2797 3 t131*t133*t160)*wght+Cmat(iq,D1_GBB) 2798 Mmat(iq,D1_TA) = 1.0d+0*(t171*t52*t66+t170*t3*t66-9.30525736 2799 1 3491002d-1*t12*t169*t4*t52-9.305257363491002d-1*t12*t168* 2800 2 t3*t4)*wght+Mmat(iq,D1_TA) 2801 Mmat(iq,D1_TB) = 1.0d+0*(-9.305257363491002d-1*t104*t172*t95 2802 1 *t96-9.305257363491002d-1*t104*t132*t173*t96+t134*t174*t9 2803 2 5+t132*t134*t175)*wght+Mmat(iq,D1_TB) 2804 Amat2(iq,D2_RA_RA) = 1.0d+0*(t151*(-1.0834770598202839d-2*ga 2805 1 mmaaa*t152*t51*t92-1.0834770598202839d-2*gammaaa*t141*t51 2806 2 *t66)+1.9863746096705204d-2*gammaaa*t184*t51*t66*t92-5.31 2807 3 6678166471045d-5*t177*t183*t51*t66*t92+t185*t52*t92+t52*t 2808 4 66*(1.0128444160767991d+1*t49*t6*t91-1.0128444160767991d+ 2809 5 1*t17*t47*t6*t91-4.6163421503007845d+2*t4*t47*t91+4.61634 2810 6 21503007845d+2*t17*t4*t44*t91+2.0256888321535982d+1*t17*t 2811 7 47*t6*t90-2.0256888321535982d+1*t44*t46*t6*t90+4.61634215 2812 8 03007845d+2*t4*t47*t90+1.3849026450902355d+3*t4*t41*t46*t 2813 9 90-1.846536860120314d+3*t17*t4*t44*t90+3.038533248230397d 2814 : +1*t44*t46*t6*t89-3.038533248230397d+1*t41*t43*t6*t89-4.1 2815 ; 547079352707067d+3*t4*t41*t46*t89+1.3849026450902355d+3*t 2816 < 17*t4*t44*t89+2.769805290180471d+3*t38*t4*t43*t89+4.05137 2817 = 76643071964d+1*t41*t43*t6*t88-4.0513776643071964d+1*t38*t 2818 > 40*t6*t88+2.769805290180471d+3*t4*t41*t46*t88-7.386147440 2819 ? 481255d+3*t38*t4*t43*t88+4.616342150300784d+3*t35*t4*t40* 2820 @ t88+5.064222080383994d+1*t38*t40*t6*t87-5.064222080383994 2821 1 d+1*t35*t37*t6*t87+4.616342150300784d+3*t38*t4*t43*t87-1. 2822 2 154085537575196d+4*t35*t4*t40*t87+6.924513225451178d+3*t3 2823 3 2*t37*t4*t87+6.077066496460795d+1*t35*t37*t6*t86-6.077066 2824 4 496460795d+1*t32*t34*t6*t86+6.924513225451178d+3*t35*t4*t 2825 5 40*t86-1.661883174108283d+4*t32*t37*t4*t86+9.694318515631 2826 6 648d+3*t29*t34*t4*t86+7.089910912537593d+1*t32*t34*t6*t85 2827 7 -7.089910912537593d+1*t29*t31*t6*t85+9.694318515631648d+3 2828 8 *t32*t37*t4*t85-2.2620076536473846d+4*t29*t34*t4*t85+1.29 2829 9 25758020842196d+4*t26*t31*t4*t85+8.102755328614393d+1*t29 2830 : *t31*t6*t84-8.102755328614393d+1*t26*t28*t6*t84+1.2925758 2831 ; 020842196d+4*t29*t34*t4*t84-2.954458976192502d+4*t26*t31* 2832 < t4*t84+1.6618831741082823d+4*t23*t28*t4*t84+9.11559974469 2833 = 1191d+1*t26*t28*t6*t83-9.115599744691191d+1*t23*t25*t6*t8 2834 > 3+1.6618831741082823d+4*t26*t31*t4*t83-3.7392371417436354 2835 ? d+4*t23*t28*t4*t83+2.0773539676353528d+4*t20*t25*t4*t83+1 2836 @ .012844416076799d+2*t23*t25*t6*t82-1.012844416076799d+2*t 2837 1 20*t22*t6*t82+2.0773539676353528d+4*t23*t28*t4*t82-4.6163 2838 2 42150300784d+4*t20*t25*t4*t82+2.5389881826654315d+4*t137* 2839 3 t22*t4*t82+1.1141288576844789d+2*t20*t22*t6*t81-1.1141288 2840 4 576844789d+2*t137*t18*t6*t81+2.5389881826654315d+4*t20*t2 2841 5 5*t4*t81-5.585774001863949d+4*t137*t22*t4*t81+3.046785819 2842 6 198518d+4*t176*t18*t4*t81)+t142*t151*(-1.9264558001493193 2843 7 d-2*gammaaa*t152*t79-1.9264558001493193d-2*gammaaa*t140*t 2844 8 66)+3.5318356336070855d-2*gammaaa*t142*t184*t66*t79-2.307 2845 9 9800683637772d-4*t177*t178*t183*t66*t79+t185*t3*t79+t3*t6 2846 : 6*(1.0128444160767991d+1*t49*t6*t78-1.0128444160767991d+1 2847 ; *t17*t47*t6*t78-4.6163421503007845d+2*t4*t47*t78+4.616342 2848 < 1503007845d+2*t17*t4*t44*t78+2.0256888321535982d+1*t17*t4 2849 = 7*t6*t77-2.0256888321535982d+1*t44*t46*t6*t77+4.616342150 2850 > 3007845d+2*t4*t47*t77+1.3849026450902355d+3*t4*t41*t46*t7 2851 ? 7-1.846536860120314d+3*t17*t4*t44*t77+3.038533248230397d+ 2852 @ 1*t44*t46*t6*t76-3.038533248230397d+1*t41*t43*t6*t76-4.15 2853 1 47079352707067d+3*t4*t41*t46*t76+1.3849026450902355d+3*t1 2854 2 7*t4*t44*t76+2.769805290180471d+3*t38*t4*t43*t76+4.051377 2855 3 6643071964d+1*t41*t43*t6*t75-4.0513776643071964d+1*t38*t4 2856 4 0*t6*t75+2.769805290180471d+3*t4*t41*t46*t75-7.3861474404 2857 5 81255d+3*t38*t4*t43*t75+4.616342150300784d+3*t35*t4*t40*t 2858 6 75+5.064222080383994d+1*t38*t40*t6*t74-5.064222080383994d 2859 7 +1*t35*t37*t6*t74+4.616342150300784d+3*t38*t4*t43*t74-1.1 2860 8 54085537575196d+4*t35*t4*t40*t74+6.924513225451178d+3*t32 2861 9 *t37*t4*t74+6.077066496460795d+1*t35*t37*t6*t73-6.0770664 2862 : 96460795d+1*t32*t34*t6*t73+6.924513225451178d+3*t35*t4*t4 2863 ; 0*t73-1.661883174108283d+4*t32*t37*t4*t73+9.6943185156316 2864 < 48d+3*t29*t34*t4*t73+7.089910912537593d+1*t32*t34*t6*t72- 2865 = 7.089910912537593d+1*t29*t31*t6*t72+9.694318515631648d+3* 2866 > t32*t37*t4*t72-2.2620076536473846d+4*t29*t34*t4*t72+1.292 2867 ? 5758020842196d+4*t26*t31*t4*t72+8.102755328614393d+1*t29* 2868 @ t31*t6*t71-8.102755328614393d+1*t26*t28*t6*t71+1.29257580 2869 1 20842196d+4*t29*t34*t4*t71-2.954458976192502d+4*t26*t31*t 2870 2 4*t71+1.6618831741082823d+4*t23*t28*t4*t71+9.115599744691 2871 3 191d+1*t26*t28*t6*t70-9.115599744691191d+1*t23*t25*t6*t70 2872 4 +1.6618831741082823d+4*t26*t31*t4*t70-3.7392371417436354d 2873 5 +4*t23*t28*t4*t70+2.0773539676353528d+4*t20*t25*t4*t70+1. 2874 6 012844416076799d+2*t23*t25*t6*t69-1.012844416076799d+2*t2 2875 7 0*t22*t6*t69+2.0773539676353528d+4*t23*t28*t4*t69-4.61634 2876 8 2150300784d+4*t20*t25*t4*t69+2.5389881826654315d+4*t137*t 2877 9 22*t4*t69+1.1141288576844789d+2*t20*t22*t6*t68-1.11412885 2878 : 76844789d+2*t137*t18*t6*t68+2.5389881826654315d+4*t20*t25 2879 ; *t4*t68-5.585774001863949d+4*t137*t22*t4*t68+3.0467858191 2880 < 98518d+4*t176*t18*t4*t68)+t148*(-4.135669939329334d-1*t12 2881 = *t52*t65-4.135669939329334d-1*t12*t3*t50)+t143*(1.0082032 2882 > 889066277d-2*gammaaa*t150*t51*t65+1.0082032889066277d-2*g 2883 ? ammaaa*t12*t139*t51)-2.4814019635976003d+0*t150*t5*t52*t6 2884 @ 5-9.305257363491002d-1*t182*t4*t52*t65-5.041016444533138d 2885 1 -3*gammaaa*t12*t180*t51*t65+4.947305865786653d-5*t12*t177 2886 2 *t179*t51*t65-9.305257363491002d-1*t12*t4*t52*(1.01284441 2887 3 60767991d+1*t49*t6*t64-1.0128444160767991d+1*t17*t47*t6*t 2888 4 64-4.6163421503007845d+2*t4*t47*t64+4.6163421503007845d+2 2889 5 *t17*t4*t44*t64+2.0256888321535982d+1*t17*t47*t6*t63-2.02 2890 6 56888321535982d+1*t44*t46*t6*t63+4.6163421503007845d+2*t4 2891 7 *t47*t63+1.3849026450902355d+3*t4*t41*t46*t63-1.846536860 2892 8 120314d+3*t17*t4*t44*t63+3.038533248230397d+1*t44*t46*t6* 2893 9 t62-3.038533248230397d+1*t41*t43*t6*t62-4.154707935270706 2894 : 7d+3*t4*t41*t46*t62+1.3849026450902355d+3*t17*t4*t44*t62+ 2895 ; 2.769805290180471d+3*t38*t4*t43*t62+4.0513776643071964d+1 2896 < *t41*t43*t6*t61-4.0513776643071964d+1*t38*t40*t6*t61+2.76 2897 = 9805290180471d+3*t4*t41*t46*t61-7.386147440481255d+3*t38* 2898 > t4*t43*t61+4.616342150300784d+3*t35*t4*t40*t61+5.06422208 2899 ? 0383994d+1*t38*t40*t6*t60-5.064222080383994d+1*t35*t37*t6 2900 @ *t60+4.616342150300784d+3*t38*t4*t43*t60-1.15408553757519 2901 1 6d+4*t35*t4*t40*t60+6.924513225451178d+3*t32*t37*t4*t60+6 2902 2 .077066496460795d+1*t35*t37*t59*t6-6.077066496460795d+1*t 2903 3 32*t34*t59*t6+7.089910912537593d+1*t32*t34*t58*t6-7.08991 2904 4 0912537593d+1*t29*t31*t58*t6+8.102755328614393d+1*t29*t31 2905 5 *t57*t6-8.102755328614393d+1*t26*t28*t57*t6+9.11559974469 2906 6 1191d+1*t26*t28*t56*t6-9.115599744691191d+1*t23*t25*t56*t 2907 7 6+1.012844416076799d+2*t23*t25*t55*t6-1.012844416076799d+ 2908 8 2*t20*t22*t55*t6+1.1141288576844789d+2*t20*t22*t54*t6-1.1 2909 9 141288576844789d+2*t137*t18*t54*t6+6.924513225451178d+3*t 2910 : 35*t4*t40*t59-1.661883174108283d+4*t32*t37*t4*t59+9.69431 2911 ; 8515631648d+3*t29*t34*t4*t59+9.694318515631648d+3*t32*t37 2912 < *t4*t58-2.2620076536473846d+4*t29*t34*t4*t58+1.2925758020 2913 = 842196d+4*t26*t31*t4*t58+1.2925758020842196d+4*t29*t34*t4 2914 > *t57-2.954458976192502d+4*t26*t31*t4*t57+1.66188317410828 2915 ? 23d+4*t23*t28*t4*t57+1.6618831741082823d+4*t26*t31*t4*t56 2916 @ -3.7392371417436354d+4*t23*t28*t4*t56+2.0773539676353528d 2917 1 +4*t20*t25*t4*t56+2.0773539676353528d+4*t23*t28*t4*t55-4. 2918 2 616342150300784d+4*t20*t25*t4*t55+2.5389881826654315d+4*t 2919 3 137*t22*t4*t55+2.5389881826654315d+4*t20*t25*t4*t54-5.585 2920 4 774001863949d+4*t137*t22*t4*t54+3.046785819198518d+4*t176 2921 5 *t18*t4*t54)-9.305257363491002d-1*t12*t3*t4*(1.0128444160 2922 6 767991d+1*t48*t49*t6-1.0128444160767991d+1*t17*t47*t48*t6 2923 7 +2.0256888321535982d+1*t17*t45*t47*t6-2.0256888321535982d 2924 8 +1*t44*t45*t46*t6+3.038533248230397d+1*t42*t44*t46*t6-3.0 2925 9 38533248230397d+1*t41*t42*t43*t6+4.0513776643071964d+1*t3 2926 : 9*t41*t43*t6-4.0513776643071964d+1*t38*t39*t40*t6+5.06422 2927 ; 2080383994d+1*t36*t38*t40*t6-5.064222080383994d+1*t35*t36 2928 < *t37*t6+6.077066496460795d+1*t33*t35*t37*t6-6.07706649646 2929 = 0795d+1*t32*t33*t34*t6+7.089910912537593d+1*t30*t32*t34*t 2930 > 6-7.089910912537593d+1*t29*t30*t31*t6+8.102755328614393d+ 2931 ? 1*t27*t29*t31*t6-8.102755328614393d+1*t26*t27*t28*t6+9.11 2932 @ 5599744691191d+1*t24*t26*t28*t6-9.115599744691191d+1*t23* 2933 1 t24*t25*t6+1.012844416076799d+2*t21*t23*t25*t6-1.01284441 2934 2 6076799d+2*t20*t21*t22*t6+1.1141288576844789d+2*t14*t20*t 2935 3 22*t6-1.1141288576844789d+2*t137*t14*t18*t6-4.61634215030 2936 4 07845d+2*t4*t47*t48+4.6163421503007845d+2*t17*t4*t44*t48+ 2937 5 4.6163421503007845d+2*t4*t45*t47+1.3849026450902355d+3*t4 2938 6 *t41*t45*t46-4.1547079352707067d+3*t4*t41*t42*t46+2.76980 2939 7 5290180471d+3*t39*t4*t41*t46-1.846536860120314d+3*t17*t4* 2940 8 t44*t45+1.3849026450902355d+3*t17*t4*t42*t44+2.7698052901 2941 9 80471d+3*t38*t4*t42*t43-7.386147440481255d+3*t38*t39*t4*t 2942 : 43+4.616342150300784d+3*t36*t38*t4*t43+4.616342150300784d 2943 ; +3*t35*t39*t4*t40-1.154085537575196d+4*t35*t36*t4*t40+6.9 2944 < 24513225451178d+3*t33*t35*t4*t40+6.924513225451178d+3*t32 2945 = *t36*t37*t4-1.661883174108283d+4*t32*t33*t37*t4+9.6943185 2946 > 15631648d+3*t30*t32*t37*t4+9.694318515631648d+3*t29*t33*t 2947 ? 34*t4-2.2620076536473846d+4*t29*t30*t34*t4+1.292575802084 2948 @ 2196d+4*t27*t29*t34*t4+1.2925758020842196d+4*t26*t30*t31* 2949 1 t4-2.954458976192502d+4*t26*t27*t31*t4+1.6618831741082823 2950 2 d+4*t24*t26*t31*t4+1.6618831741082823d+4*t23*t27*t28*t4-3 2951 3 .7392371417436354d+4*t23*t24*t28*t4+2.0773539676353528d+4 2952 4 *t21*t23*t28*t4+2.0773539676353528d+4*t20*t24*t25*t4-4.61 2953 5 6342150300784d+4*t20*t21*t25*t4+2.5389881826654315d+4*t14 2954 6 *t20*t25*t4+2.5389881826654315d+4*t137*t21*t22*t4-5.58577 2955 7 4001863949d+4*t137*t14*t22*t4+3.046785819198518d+4*t14*t1 2956 8 76*t18*t4)-2.4814019635976003d+0*t12*t139*t5*t52-1.861051 2957 9 4726982003d+0*t139*t150*t4*t52+2*t141*t152*t52+t142*t143* 2958 : (1.7926167019779404d-2*gammaaa*t150*t50+1.792616701977940 2959 ; 4d-2*gammaaa*t12*t138)-2.4814019635976003d+0*t150*t3*t5*t 2960 < 50-9.305257363491002d-1*t182*t3*t4*t50-8.963083509889707d 2961 = -3*gammaaa*t12*t142*t180*t50+2.1476348525932504d-4*t12*t1 2962 > 77*t178*t179*t50-2.4814019635976003d+0*t12*t138*t3*t5-1.8 2963 ? 610514726982003d+0*t138*t150*t3*t4+2*t140*t152*t3)*wght+A 2964 @ mat2(iq,D2_RA_RA) 2965 Amat2(iq,D2_RA_RB) = Amat2(iq,D2_RA_RB) 2966 Amat2(iq,D2_RB_RB) = 1.0d+0*(t132*t134*(1.0128444160767991d+ 2967 1 1*t129*t91*t98-1.0128444160767991d+1*t107*t128*t91*t98+2. 2968 2 0256888321535982d+1*t107*t128*t90*t98-2.0256888321535982d 2969 3 +1*t126*t127*t90*t98+3.038533248230397d+1*t126*t127*t89*t 2970 4 98-3.038533248230397d+1*t124*t125*t89*t98+4.0513776643071 2971 5 964d+1*t124*t125*t88*t98-4.0513776643071964d+1*t122*t123* 2972 6 t88*t98+5.064222080383994d+1*t122*t123*t87*t98-5.06422208 2973 7 0383994d+1*t120*t121*t87*t98+6.077066496460795d+1*t120*t1 2974 8 21*t86*t98-6.077066496460795d+1*t118*t119*t86*t98+7.08991 2975 9 0912537593d+1*t118*t119*t85*t98-7.089910912537593d+1*t116 2976 : *t117*t85*t98+8.102755328614393d+1*t116*t117*t84*t98-8.10 2977 ; 2755328614393d+1*t114*t115*t84*t98+9.115599744691191d+1*t 2978 < 114*t115*t83*t98-9.115599744691191d+1*t112*t113*t83*t98+1 2979 = .012844416076799d+2*t112*t113*t82*t98-1.012844416076799d+ 2980 > 2*t110*t111*t82*t98-1.1141288576844789d+2*t108*t153*t81*t 2981 ? 98+1.1141288576844789d+2*t110*t111*t81*t98-4.616342150300 2982 @ 7845d+2*t128*t91*t96+4.6163421503007845d+2*t107*t126*t91* 2983 1 t96+4.6163421503007845d+2*t128*t90*t96+1.3849026450902355 2984 2 d+3*t124*t127*t90*t96-1.846536860120314d+3*t107*t126*t90* 2985 3 t96-4.1547079352707067d+3*t124*t127*t89*t96+1.38490264509 2986 4 02355d+3*t107*t126*t89*t96+2.769805290180471d+3*t122*t125 2987 5 *t89*t96+2.769805290180471d+3*t124*t127*t88*t96-7.3861474 2988 6 40481255d+3*t122*t125*t88*t96+4.616342150300784d+3*t120*t 2989 7 123*t88*t96+4.616342150300784d+3*t122*t125*t87*t96-1.1540 2990 8 85537575196d+4*t120*t123*t87*t96+6.924513225451178d+3*t11 2991 9 8*t121*t87*t96+6.924513225451178d+3*t120*t123*t86*t96-1.6 2992 : 61883174108283d+4*t118*t121*t86*t96+9.694318515631648d+3* 2993 ; t116*t119*t86*t96+9.694318515631648d+3*t118*t121*t85*t96- 2994 < 2.2620076536473846d+4*t116*t119*t85*t96+1.292575802084219 2995 = 6d+4*t114*t117*t85*t96+1.2925758020842196d+4*t116*t119*t8 2996 > 4*t96-2.954458976192502d+4*t114*t117*t84*t96+1.6618831741 2997 ? 082823d+4*t112*t115*t84*t96+1.6618831741082823d+4*t114*t1 2998 @ 17*t83*t96-3.7392371417436354d+4*t112*t115*t83*t96+2.0773 2999 1 539676353528d+4*t110*t113*t83*t96+2.5389881826654315d+4*t 3000 2 111*t153*t82*t96+2.0773539676353528d+4*t112*t115*t82*t96- 3001 3 4.616342150300784d+4*t110*t113*t82*t96+3.046785819198518d 3002 4 +4*t108*t186*t81*t96-5.585774001863949d+4*t111*t153*t81*t 3003 5 96+2.5389881826654315d+4*t110*t113*t81*t96)+t134*t95*(1.0 3004 6 128444160767991d+1*t129*t78*t98-1.0128444160767991d+1*t10 3005 7 7*t128*t78*t98+2.0256888321535982d+1*t107*t128*t77*t98-2. 3006 8 0256888321535982d+1*t126*t127*t77*t98+3.038533248230397d+ 3007 9 1*t126*t127*t76*t98-3.038533248230397d+1*t124*t125*t76*t9 3008 : 8+4.0513776643071964d+1*t124*t125*t75*t98-4.0513776643071 3009 ; 964d+1*t122*t123*t75*t98+5.064222080383994d+1*t122*t123*t 3010 < 74*t98-5.064222080383994d+1*t120*t121*t74*t98+6.077066496 3011 = 460795d+1*t120*t121*t73*t98-6.077066496460795d+1*t118*t11 3012 > 9*t73*t98+7.089910912537593d+1*t118*t119*t72*t98-7.089910 3013 ? 912537593d+1*t116*t117*t72*t98+8.102755328614393d+1*t116* 3014 @ t117*t71*t98-8.102755328614393d+1*t114*t115*t71*t98+9.115 3015 1 599744691191d+1*t114*t115*t70*t98-9.115599744691191d+1*t1 3016 2 12*t113*t70*t98+1.012844416076799d+2*t112*t113*t69*t98-1. 3017 3 012844416076799d+2*t110*t111*t69*t98-1.1141288576844789d+ 3018 4 2*t108*t153*t68*t98+1.1141288576844789d+2*t110*t111*t68*t 3019 5 98-4.6163421503007845d+2*t128*t78*t96+4.6163421503007845d 3020 6 +2*t107*t126*t78*t96+4.6163421503007845d+2*t128*t77*t96+1 3021 7 .3849026450902355d+3*t124*t127*t77*t96-1.846536860120314d 3022 8 +3*t107*t126*t77*t96-4.1547079352707067d+3*t124*t127*t76* 3023 9 t96+1.3849026450902355d+3*t107*t126*t76*t96+2.76980529018 3024 : 0471d+3*t122*t125*t76*t96+2.769805290180471d+3*t124*t127* 3025 ; t75*t96-7.386147440481255d+3*t122*t125*t75*t96+4.61634215 3026 < 0300784d+3*t120*t123*t75*t96+4.616342150300784d+3*t122*t1 3027 = 25*t74*t96-1.154085537575196d+4*t120*t123*t74*t96+6.92451 3028 > 3225451178d+3*t118*t121*t74*t96+6.924513225451178d+3*t120 3029 ? *t123*t73*t96-1.661883174108283d+4*t118*t121*t73*t96+9.69 3030 @ 4318515631648d+3*t116*t119*t73*t96+9.694318515631648d+3*t 3031 1 118*t121*t72*t96-2.2620076536473846d+4*t116*t119*t72*t96+ 3032 2 1.2925758020842196d+4*t114*t117*t72*t96+1.292575802084219 3033 3 6d+4*t116*t119*t71*t96-2.954458976192502d+4*t114*t117*t71 3034 4 *t96+1.6618831741082823d+4*t112*t115*t71*t96+1.6618831741 3035 5 082823d+4*t114*t117*t70*t96-3.7392371417436354d+4*t112*t1 3036 6 15*t70*t96+2.0773539676353528d+4*t110*t113*t70*t96+2.5389 3037 7 881826654315d+4*t111*t153*t69*t96+2.0773539676353528d+4*t 3038 8 112*t115*t69*t96-4.616342150300784d+4*t110*t113*t69*t96+3 3039 9 .046785819198518d+4*t108*t186*t68*t96-5.585774001863949d+ 3040 : 4*t111*t153*t68*t96+2.5389881826654315d+4*t110*t113*t68*t 3041 ; 96)-9.305257363491002d-1*t104*t132*t96*(1.012844416076799 3042 < 1d+1*t129*t64*t98-1.0128444160767991d+1*t107*t128*t64*t98 3043 = +2.0256888321535982d+1*t107*t128*t63*t98-2.02568883215359 3044 > 82d+1*t126*t127*t63*t98+3.038533248230397d+1*t126*t127*t6 3045 ? 2*t98-3.038533248230397d+1*t124*t125*t62*t98+4.0513776643 3046 @ 071964d+1*t124*t125*t61*t98-4.0513776643071964d+1*t122*t1 3047 1 23*t61*t98+5.064222080383994d+1*t122*t123*t60*t98-5.06422 3048 2 2080383994d+1*t120*t121*t60*t98+6.077066496460795d+1*t120 3049 3 *t121*t59*t98-6.077066496460795d+1*t118*t119*t59*t98+7.08 3050 4 9910912537593d+1*t118*t119*t58*t98-7.089910912537593d+1*t 3051 5 116*t117*t58*t98+8.102755328614393d+1*t116*t117*t57*t98-8 3052 6 .102755328614393d+1*t114*t115*t57*t98+9.115599744691191d+ 3053 7 1*t114*t115*t56*t98-9.115599744691191d+1*t112*t113*t56*t9 3054 8 8+1.012844416076799d+2*t112*t113*t55*t98-1.01284441607679 3055 9 9d+2*t110*t111*t55*t98-1.1141288576844789d+2*t108*t153*t5 3056 : 4*t98+1.1141288576844789d+2*t110*t111*t54*t98-4.616342150 3057 ; 3007845d+2*t128*t64*t96+4.6163421503007845d+2*t107*t126*t 3058 < 64*t96+4.6163421503007845d+2*t128*t63*t96+1.3849026450902 3059 = 355d+3*t124*t127*t63*t96-1.846536860120314d+3*t107*t126*t 3060 > 63*t96-4.1547079352707067d+3*t124*t127*t62*t96+1.38490264 3061 ? 50902355d+3*t107*t126*t62*t96+2.769805290180471d+3*t122*t 3062 @ 125*t62*t96+2.769805290180471d+3*t124*t127*t61*t96-7.3861 3063 1 47440481255d+3*t122*t125*t61*t96+4.616342150300784d+3*t12 3064 2 0*t123*t61*t96+4.616342150300784d+3*t122*t125*t60*t96-1.1 3065 3 54085537575196d+4*t120*t123*t60*t96+6.924513225451178d+3* 3066 4 t118*t121*t60*t96+6.924513225451178d+3*t120*t123*t59*t96- 3067 5 1.661883174108283d+4*t118*t121*t59*t96+9.694318515631648d 3068 6 +3*t116*t119*t59*t96+9.694318515631648d+3*t118*t121*t58*t 3069 7 96-2.2620076536473846d+4*t116*t119*t58*t96+1.292575802084 3070 8 2196d+4*t114*t117*t58*t96+1.2925758020842196d+4*t116*t119 3071 9 *t57*t96-2.954458976192502d+4*t114*t117*t57*t96+1.6618831 3072 : 741082823d+4*t112*t115*t57*t96+1.6618831741082823d+4*t114 3073 ; *t117*t56*t96-3.7392371417436354d+4*t112*t115*t56*t96+2.0 3074 < 773539676353528d+4*t110*t113*t56*t96+2.5389881826654315d+ 3075 = 4*t111*t153*t55*t96+2.0773539676353528d+4*t112*t115*t55*t 3076 > 96-4.616342150300784d+4*t110*t113*t55*t96+3.0467858191985 3077 ? 18d+4*t108*t186*t54*t96-5.585774001863949d+4*t111*t153*t5 3078 @ 4*t96+2.5389881826654315d+4*t110*t113*t54*t96)-9.30525736 3079 1 3491002d-1*t104*t95*t96*(1.0128444160767991d+1*t129*t48*t 3080 2 98-1.0128444160767991d+1*t107*t128*t48*t98+2.025688832153 3081 3 5982d+1*t107*t128*t45*t98-2.0256888321535982d+1*t126*t127 3082 4 *t45*t98+3.038533248230397d+1*t126*t127*t42*t98-3.0385332 3083 5 48230397d+1*t124*t125*t42*t98+4.0513776643071964d+1*t124* 3084 6 t125*t39*t98-4.0513776643071964d+1*t122*t123*t39*t98+5.06 3085 7 4222080383994d+1*t122*t123*t36*t98-5.064222080383994d+1*t 3086 8 120*t121*t36*t98+6.077066496460795d+1*t120*t121*t33*t98-6 3087 9 .077066496460795d+1*t118*t119*t33*t98+7.089910912537593d+ 3088 : 1*t118*t119*t30*t98-7.089910912537593d+1*t116*t117*t30*t9 3089 ; 8+8.102755328614393d+1*t116*t117*t27*t98-8.10275532861439 3090 < 3d+1*t114*t115*t27*t98+9.115599744691191d+1*t114*t115*t24 3091 = *t98-9.115599744691191d+1*t112*t113*t24*t98+1.01284441607 3092 > 6799d+2*t112*t113*t21*t98-1.012844416076799d+2*t110*t111* 3093 ? t21*t98-1.1141288576844789d+2*t108*t14*t153*t98+1.1141288 3094 @ 576844789d+2*t110*t111*t14*t98-4.6163421503007845d+2*t128 3095 1 *t48*t96+4.6163421503007845d+2*t107*t126*t48*t96+4.616342 3096 2 1503007845d+2*t128*t45*t96+1.3849026450902355d+3*t124*t12 3097 3 7*t45*t96-1.846536860120314d+3*t107*t126*t45*t96-4.154707 3098 4 9352707067d+3*t124*t127*t42*t96+1.3849026450902355d+3*t10 3099 5 7*t126*t42*t96+2.769805290180471d+3*t122*t125*t42*t96+2.7 3100 6 69805290180471d+3*t124*t127*t39*t96-7.386147440481255d+3* 3101 7 t122*t125*t39*t96+4.616342150300784d+3*t120*t123*t39*t96+ 3102 8 4.616342150300784d+3*t122*t125*t36*t96-1.154085537575196d 3103 9 +4*t120*t123*t36*t96+6.924513225451178d+3*t118*t121*t36*t 3104 : 96+6.924513225451178d+3*t120*t123*t33*t96-1.6618831741082 3105 ; 83d+4*t118*t121*t33*t96+9.694318515631648d+3*t116*t119*t3 3106 < 3*t96+9.694318515631648d+3*t118*t121*t30*t96-2.2620076536 3107 = 473846d+4*t116*t119*t30*t96+1.2925758020842196d+4*t114*t1 3108 > 17*t30*t96+1.2925758020842196d+4*t116*t119*t27*t96-2.9544 3109 ? 58976192502d+4*t114*t117*t27*t96+1.6618831741082823d+4*t1 3110 @ 12*t115*t27*t96+1.6618831741082823d+4*t114*t117*t24*t96-3 3111 1 .7392371417436354d+4*t112*t115*t24*t96+2.0773539676353528 3112 2 d+4*t110*t113*t24*t96+2.5389881826654315d+4*t111*t153*t21 3113 3 *t96+2.0773539676353528d+4*t112*t115*t21*t96-4.6163421503 3114 4 00784d+4*t110*t113*t21*t96+3.046785819198518d+4*t108*t14* 3115 5 t186*t96-5.585774001863949d+4*t111*t14*t153*t96+2.5389881 3116 6 826654315d+4*t110*t113*t14*t96)-2.4814019635976003d+0*t13 3117 7 0*t165*t95*t97-2.4814019635976003d+0*t104*t154*t95*t97-2. 3118 8 4814019635976003d+0*t132*t133*t165*t97-2.4814019635976003 3119 9 d+0*t104*t132*t155*t97-9.305257363491002d-1*t130*t192*t95 3120 : *t96-1.8610514726982003d+0*t154*t165*t95*t96-9.3052573634 3121 ; 91002d-1*t132*t133*t192*t96-1.8610514726982003d+0*t132*t1 3122 < 55*t165*t96+t163*(-4.135669939329334d-1*t104*t130*t95-4.1 3123 = 35669939329334d-1*t104*t132*t133)+t135*t195*t95+2*t156*t1 3124 > 67*t95+t132*t136*t195+3.5318356336070855d-2*gammabb*t134* 3125 ? t135*t158*t194+1.9863746096705204d-2*gammabb*t131*t134*t1 3126 @ 36*t194-2.3079800683637772d-4*t134*t135*t187*t188*t193-5. 3127 1 316678166471045d-5*t131*t134*t136*t187*t193-8.96308350988 3128 2 9707d-3*gammabb*t104*t130*t158*t190-5.041016444533138d-3* 3129 3 gammabb*t104*t131*t133*t190+2.1476348525932504d-4*t104*t1 3130 4 30*t187*t188*t189+4.947305865786653d-5*t104*t131*t133*t18 3131 5 7*t189+t166*(-1.0834770598202839d-2*gammabb*t131*t136*t16 3132 6 7-1.0834770598202839d-2*gammabb*t131*t134*t157)+t158*t166 3133 7 *(-1.9264558001493193d-2*gammabb*t135*t167-1.926455800149 3134 8 3193d-2*gammabb*t134*t156)+2*t132*t157*t167+t159*(1.00820 3135 9 32889066277d-2*gammabb*t131*t133*t165+1.0082032889066277d 3136 : -2*gammabb*t104*t131*t155)+t158*t159*(1.7926167019779404d 3137 ; -2*gammabb*t130*t165+1.7926167019779404d-2*gammabb*t104*t 3138 < 154))*wght+Amat2(iq,D2_RB_RB) 3139 Cmat2(iq,D2_RA_GAA) = 1.0d+0*(t1*(2.0315194871630324d-3*t152 3140 1 *t51*t92+2.0315194871630324d-3*t141*t51*t66)+1.9937543124 3141 2 266421d-5*gammaaa*t197*t51*t66*t92-5.417385299101419d-3*t 3142 3 151*t51*t66*t92+t1*t142*(3.612104625279974d-3*t152*t79+3. 3143 4 612104625279974d-3*t140*t66)+8.654925256364164d-5*gammaaa 3144 5 *t178*t197*t66*t79-9.632279000746596d-3*t142*t151*t66*t79 3145 6 +t144*(-1.890381166699927d-3*t150*t51*t65-1.8903811666999 3146 7 27d-3*t12*t139*t51)-1.855239699669995d-5*gammaaa*t12*t196 3147 8 *t51*t65+2.520508222266569d-3*t12*t143*t51*t65+t142*t144* 3148 9 (-3.361156316208638d-3*t150*t50-3.361156316208638d-3*t12* 3149 : t138)-8.05363069722469d-5*gammaaa*t12*t178*t196*t50+4.481 3150 ; 541754944851d-3*t12*t142*t143*t50)*wght+Cmat2(iq,D2_RA_GA 3151 < A) 3152 Cmat2(iq,D2_RA_GAB) = Cmat2(iq,D2_RA_GAB) 3153 Cmat2(iq,D2_RA_GBB) = Cmat2(iq,D2_RA_GBB) 3154 Cmat2(iq,D2_RB_GAA) = Cmat2(iq,D2_RB_GAA) 3155 Cmat2(iq,D2_RB_GAB) = Cmat2(iq,D2_RB_GAB) 3156 Cmat2(iq,D2_RB_GBB) = 1.0d+0*((2.0315194871630324d-3*t131*t1 3157 1 36*t167+2.0315194871630324d-3*t131*t134*t157)*t93+t158*(3 3158 2 .612104625279974d-3*t135*t167+3.612104625279974d-3*t134*t 3159 3 156)*t93+8.654925256364164d-5*gammabb*t134*t135*t188*t199 3160 4 +1.9937543124266421d-5*gammabb*t131*t134*t136*t199-8.0536 3161 5 3069722469d-5*gammabb*t104*t130*t188*t198-1.8552396996699 3162 6 95d-5*gammabb*t104*t131*t133*t198-9.632279000746596d-3*t1 3163 7 34*t135*t158*t166-5.417385299101419d-3*t131*t134*t136*t16 3164 8 6+t160*(-1.890381166699927d-3*t131*t133*t165-1.8903811666 3165 9 99927d-3*t104*t131*t155)+t158*t160*(-3.361156316208638d-3 3166 : *t130*t165-3.361156316208638d-3*t104*t154)+4.481541754944 3167 ; 851d-3*t104*t130*t158*t159+2.520508222266569d-3*t104*t131 3168 < *t133*t159)*wght+Cmat2(iq,D2_RB_GBB) 3169 Cmat2(iq,D2_GAA_GAA) = 1.0d+0*(-7.476578671599909d-6*t201*t5 3170 1 1*t66*t92-3.245596971136562d-5*t178*t201*t66*t79+6.957148 3171 2 873762482d-6*t12*t200*t51*t65+3.020111511459258d-5*t12*t1 3172 3 78*t200*t50)*wght+Cmat2(iq,D2_GAA_GAA) 3173 Cmat2(iq,D2_GAA_GAB) = Cmat2(iq,D2_GAA_GAB) 3174 Cmat2(iq,D2_GAA_GBB) = Cmat2(iq,D2_GAA_GBB) 3175 Cmat2(iq,D2_GAB_GAB) = Cmat2(iq,D2_GAB_GAB) 3176 Cmat2(iq,D2_GAB_GBB) = Cmat2(iq,D2_GAB_GBB) 3177 Cmat2(iq,D2_GBB_GBB) = 1.0d+0*(-3.245596971136562d-5*t134*t1 3178 1 35*t188*t203-7.476578671599909d-6*t131*t134*t136*t203+3.0 3179 2 20111511459258d-5*t104*t130*t188*t202+6.957148873762482d- 3180 3 6*t104*t131*t133*t202)*wght+Cmat2(iq,D2_GBB_GBB) 3181 Mmat2(iq,D2_RA_TA) = 1.0d+0*(t52*t66*(6.077066496460795d+1*t 3182 1 17*t44*t9*t91-6.077066496460795d+1*t47*t9*t90+1.823119948 3183 2 9382385d+2*t41*t46*t9*t90-1.8231199489382385d+2*t17*t44*t 3184 3 89*t9+3.646239897876477d+2*t38*t43*t89*t9-3.6462398978764 3185 4 77d+2*t41*t46*t88*t9+6.077066496460795d+2*t35*t40*t88*t9- 3186 5 6.077066496460795d+2*t38*t43*t87*t9+9.115599744691192d+2* 3187 6 t32*t37*t87*t9-9.115599744691192d+2*t35*t40*t86*t9+1.2761 3188 7 83964256767d+3*t29*t34*t86*t9-1.276183964256767d+3*t32*t3 3189 8 7*t85*t9+1.7015786190090226d+3*t26*t31*t85*t9-1.701578619 3190 9 0090226d+3*t29*t34*t84*t9+2.187743938725886d+3*t23*t28*t8 3191 : 4*t9-2.187743938725886d+3*t26*t31*t83*t9+2.73467992340735 3192 ; 7d+3*t20*t25*t83*t9-2.734679923407357d+3*t23*t28*t82*t9+3 3193 < .342386573053437d+3*t137*t22*t82*t9-3.342386573053437d+3* 3194 = t20*t25*t81*t9+4.0108638876641245d+3*t176*t18*t81*t9)+t3* 3195 > t66*(6.077066496460795d+1*t17*t44*t78*t9-6.07706649646079 3196 ? 5d+1*t47*t77*t9+1.8231199489382385d+2*t41*t46*t77*t9-1.82 3197 @ 31199489382385d+2*t17*t44*t76*t9+3.646239897876477d+2*t38 3198 1 *t43*t76*t9-3.646239897876477d+2*t41*t46*t75*t9+6.0770664 3199 2 96460795d+2*t35*t40*t75*t9-6.077066496460795d+2*t38*t43*t 3200 3 74*t9+9.115599744691192d+2*t32*t37*t74*t9-9.1155997446911 3201 4 92d+2*t35*t40*t73*t9+1.276183964256767d+3*t29*t34*t73*t9- 3202 5 1.276183964256767d+3*t32*t37*t72*t9+1.7015786190090226d+3 3203 6 *t26*t31*t72*t9-1.7015786190090226d+3*t29*t34*t71*t9+2.18 3204 7 7743938725886d+3*t23*t28*t71*t9-2.187743938725886d+3*t26* 3205 8 t31*t70*t9+2.734679923407357d+3*t20*t25*t70*t9-2.73467992 3206 9 3407357d+3*t23*t28*t69*t9+3.342386573053437d+3*t137*t22*t 3207 : 69*t9-3.342386573053437d+3*t20*t25*t68*t9+4.0108638876641 3208 ; 245d+3*t176*t18*t68*t9)-9.305257363491002d-1*t12*t4*t52*( 3209 < 6.077066496460795d+1*t17*t44*t64*t9-6.077066496460795d+1* 3210 = t47*t63*t9+1.8231199489382385d+2*t41*t46*t63*t9-1.8231199 3211 > 489382385d+2*t17*t44*t62*t9+3.646239897876477d+2*t38*t43* 3212 ? t62*t9-3.646239897876477d+2*t41*t46*t61*t9+6.077066496460 3213 @ 795d+2*t35*t40*t61*t9-6.077066496460795d+2*t38*t43*t60*t9 3214 1 +9.115599744691192d+2*t32*t37*t60*t9-9.115599744691192d+2 3215 2 *t35*t40*t59*t9+1.276183964256767d+3*t29*t34*t59*t9-1.276 3216 3 183964256767d+3*t32*t37*t58*t9+1.7015786190090226d+3*t26* 3217 4 t31*t58*t9-1.7015786190090226d+3*t29*t34*t57*t9+2.1877439 3218 5 38725886d+3*t23*t28*t57*t9-2.187743938725886d+3*t26*t31*t 3219 6 56*t9+2.734679923407357d+3*t20*t25*t56*t9-2.7346799234073 3220 7 57d+3*t23*t28*t55*t9+3.342386573053437d+3*t137*t22*t55*t9 3221 8 -3.342386573053437d+3*t20*t25*t54*t9+4.0108638876641245d+ 3222 9 3*t176*t18*t54*t9)-9.305257363491002d-1*t12*t3*t4*(6.0770 3223 : 66496460795d+1*t17*t44*t48*t9-6.077066496460795d+1*t45*t4 3224 ; 7*t9+1.8231199489382385d+2*t41*t45*t46*t9-3.6462398978764 3225 < 77d+2*t39*t41*t46*t9-1.8231199489382385d+2*t17*t42*t44*t9 3226 = +3.646239897876477d+2*t38*t42*t43*t9-6.077066496460795d+2 3227 > *t36*t38*t43*t9+6.077066496460795d+2*t35*t39*t40*t9-9.115 3228 ? 599744691192d+2*t33*t35*t40*t9+9.115599744691192d+2*t32*t 3229 @ 36*t37*t9-1.276183964256767d+3*t30*t32*t37*t9+1.276183964 3230 1 256767d+3*t29*t33*t34*t9-1.7015786190090226d+3*t27*t29*t3 3231 2 4*t9+1.7015786190090226d+3*t26*t30*t31*t9-2.1877439387258 3232 3 86d+3*t24*t26*t31*t9+2.187743938725886d+3*t23*t27*t28*t9- 3233 4 2.734679923407357d+3*t21*t23*t28*t9+2.734679923407357d+3* 3234 5 t20*t24*t25*t9-3.342386573053437d+3*t14*t20*t25*t9+3.3423 3235 6 86573053437d+3*t137*t21*t22*t9+4.0108638876641245d+3*t14* 3236 7 t176*t18*t9)-5.417385299101419d-3*gammaaa*t151*t171*t51*t 3237 8 66-9.632279000746596d-3*gammaaa*t142*t151*t170*t66-1.2407 3238 9 009817988002d+0*t12*t169*t5*t52-9.305257363491002d-1*t150 3239 : *t169*t4*t52+t152*t171*t52+5.041016444533138d-3*gammaaa*t 3240 ; 12*t143*t169*t51-1.2407009817988002d+0*t12*t168*t3*t5-9.3 3241 < 05257363491002d-1*t150*t168*t3*t4+t152*t170*t3+8.96308350 3242 = 9889702d-3*gammaaa*t12*t142*t143*t168)*wght+Mmat2(iq,D2_R 3243 > A_TA) 3244 Mmat2(iq,D2_RA_TB) = Mmat2(iq,D2_RA_TB) 3245 Mmat2(iq,D2_RB_TA) = Mmat2(iq,D2_RB_TA) 3246 Mmat2(iq,D2_RB_TB) = 1.0d+0*(-1.2407009817988002d+0*t104*t17 3247 1 2*t95*t97-1.2407009817988002d+0*t104*t132*t173*t97-9.3052 3248 2 57363491002d-1*t104*(6.077066496460795d+1*t101*t107*t126* 3249 3 t48-6.077066496460795d+1*t101*t128*t45+1.8231199489382385 3250 4 d+2*t101*t124*t127*t45-1.8231199489382385d+2*t101*t107*t1 3251 5 26*t42+3.646239897876477d+2*t101*t122*t125*t42-3.64623989 3252 6 7876477d+2*t101*t124*t127*t39+6.077066496460795d+2*t101*t 3253 7 120*t123*t39-6.077066496460795d+2*t101*t122*t125*t36+9.11 3254 8 5599744691192d+2*t101*t118*t121*t36-9.115599744691192d+2* 3255 9 t101*t120*t123*t33+1.276183964256767d+3*t101*t116*t119*t3 3256 : 3-1.276183964256767d+3*t101*t118*t121*t30+1.7015786190090 3257 ; 226d+3*t101*t114*t117*t30-1.7015786190090226d+3*t101*t116 3258 < *t119*t27+2.187743938725886d+3*t101*t112*t115*t27-2.18774 3259 = 3938725886d+3*t101*t114*t117*t24+2.734679923407357d+3*t10 3260 > 1*t110*t113*t24+3.342386573053437d+3*t101*t111*t153*t21-2 3261 ? .734679923407357d+3*t101*t112*t115*t21+4.0108638876641245 3262 @ d+3*t101*t108*t14*t186-3.342386573053437d+3*t101*t110*t11 3263 1 3*t14)*t95*t96-9.305257363491002d-1*t165*t172*t95*t96-9.3 3264 2 05257363491002d-1*t104*t132*(6.077066496460795d+1*t101*t1 3265 3 07*t126*t64-6.077066496460795d+1*t101*t128*t63+1.82311994 3266 4 89382385d+2*t101*t124*t127*t63-1.8231199489382385d+2*t101 3267 5 *t107*t126*t62+3.646239897876477d+2*t101*t122*t125*t62-3. 3268 6 646239897876477d+2*t101*t124*t127*t61+6.077066496460795d+ 3269 7 2*t101*t120*t123*t61-6.077066496460795d+2*t101*t122*t125* 3270 8 t60+9.115599744691192d+2*t101*t118*t121*t60-9.11559974469 3271 9 1192d+2*t101*t120*t123*t59+1.276183964256767d+3*t101*t116 3272 : *t119*t59-1.276183964256767d+3*t101*t118*t121*t58+1.70157 3273 ; 86190090226d+3*t101*t114*t117*t58-1.7015786190090226d+3*t 3274 < 101*t116*t119*t57+2.187743938725886d+3*t101*t112*t115*t57 3275 = -2.187743938725886d+3*t101*t114*t117*t56+2.73467992340735 3276 > 7d+3*t101*t110*t113*t56+3.342386573053437d+3*t101*t111*t1 3277 ? 53*t55-2.734679923407357d+3*t101*t112*t115*t55+4.01086388 3278 @ 76641245d+3*t101*t108*t186*t54-3.342386573053437d+3*t101* 3279 1 t110*t113*t54)*t96-9.305257363491002d-1*t132*t165*t173*t9 3280 2 6+t134*(6.077066496460795d+1*t101*t107*t126*t78-6.0770664 3281 3 96460795d+1*t101*t128*t77+1.8231199489382385d+2*t101*t124 3282 4 *t127*t77-1.8231199489382385d+2*t101*t107*t126*t76+3.6462 3283 5 39897876477d+2*t101*t122*t125*t76-3.646239897876477d+2*t1 3284 6 01*t124*t127*t75+6.077066496460795d+2*t101*t120*t123*t75- 3285 7 6.077066496460795d+2*t101*t122*t125*t74+9.115599744691192 3286 8 d+2*t101*t118*t121*t74-9.115599744691192d+2*t101*t120*t12 3287 9 3*t73+1.276183964256767d+3*t101*t116*t119*t73-1.276183964 3288 : 256767d+3*t101*t118*t121*t72+1.7015786190090226d+3*t101*t 3289 ; 114*t117*t72-1.7015786190090226d+3*t101*t116*t119*t71+2.1 3290 < 87743938725886d+3*t101*t112*t115*t71-2.187743938725886d+3 3291 = *t101*t114*t117*t70+2.734679923407357d+3*t101*t110*t113*t 3292 > 70+3.342386573053437d+3*t101*t111*t153*t69-2.734679923407 3293 ? 357d+3*t101*t112*t115*t69+4.0108638876641245d+3*t101*t108 3294 @ *t186*t68-3.342386573053437d+3*t101*t110*t113*t68)*t95+t1 3295 1 67*t174*t95+t132*t134*(6.077066496460795d+1*t101*t107*t12 3296 2 6*t91-6.077066496460795d+1*t101*t128*t90+1.82311994893823 3297 3 85d+2*t101*t124*t127*t90-1.8231199489382385d+2*t101*t107* 3298 4 t126*t89+3.646239897876477d+2*t101*t122*t125*t89-3.646239 3299 5 897876477d+2*t101*t124*t127*t88+6.077066496460795d+2*t101 3300 6 *t120*t123*t88-6.077066496460795d+2*t101*t122*t125*t87+9. 3301 7 115599744691192d+2*t101*t118*t121*t87-9.115599744691192d+ 3302 8 2*t101*t120*t123*t86+1.276183964256767d+3*t101*t116*t119* 3303 9 t86-1.276183964256767d+3*t101*t118*t121*t85+1.70157861900 3304 : 90226d+3*t101*t114*t117*t85-1.7015786190090226d+3*t101*t1 3305 ; 16*t119*t84+2.187743938725886d+3*t101*t112*t115*t84-2.187 3306 < 743938725886d+3*t101*t114*t117*t83+2.734679923407357d+3*t 3307 = 101*t110*t113*t83+3.342386573053437d+3*t101*t111*t153*t82 3308 > -2.734679923407357d+3*t101*t112*t115*t82+4.01086388766412 3309 ? 45d+3*t101*t108*t186*t81-3.342386573053437d+3*t101*t110*t 3310 @ 113*t81)+t132*t167*t175-5.417385299101419d-3*gammabb*t131 3311 1 *t134*t166*t175-9.632279000746596d-3*gammabb*t134*t158*t1 3312 2 66*t174+5.041016444533138d-3*gammabb*t104*t131*t159*t173+ 3313 3 8.963083509889702d-3*gammabb*t104*t158*t159*t172)*wght+Mm 3314 4 at2(iq,D2_RB_TB) 3315 Mmat2(iq,D2_GAA_TA) = 1.0d+0*(2.0315194871630324d-3*t1*t171* 3316 1 t51*t66+3.612104625279974d-3*t1*t142*t170*t66-1.890381166 3317 2 699927d-3*t12*t144*t169*t51-3.361156316208638d-3*t12*t142 3318 3 *t144*t168)*wght+Mmat2(iq,D2_GAA_TA) 3319 Mmat2(iq,D2_GAA_TB) = Mmat2(iq,D2_GAA_TB) 3320 Mmat2(iq,D2_GAB_TA) = Mmat2(iq,D2_GAB_TA) 3321 Mmat2(iq,D2_GAB_TB) = Mmat2(iq,D2_GAB_TB) 3322 Mmat2(iq,D2_GBB_TA) = Mmat2(iq,D2_GBB_TA) 3323 Mmat2(iq,D2_GBB_TB) = 1.0d+0*(2.0315194871630324d-3*t131*t13 3324 1 4*t175*t93+3.612104625279974d-3*t134*t158*t174*t93-1.8903 3325 2 81166699927d-3*t104*t131*t160*t173-3.361156316208638d-3*t 3326 3 104*t158*t160*t172)*wght+Mmat2(iq,D2_GBB_TB) 3327 Mmat2(iq,D2_TA_TA) = 1.0d+0*(t52*t66*(8.0d+0*t47*t91+8.0d+0* 3328 1 t17*t44*t91+8.0d+0*t47*t90+2.4d+1*t41*t46*t90+3.2d+1*t17* 3329 2 t44*t90+7.2d+1*t41*t46*t89+2.4d+1*t17*t44*t89+4.8d+1*t38* 3330 3 t43*t89+4.8d+1*t41*t46*t88+1.28d+2*t38*t43*t88+8.0d+1*t35 3331 4 *t40*t88+8.0d+1*t38*t43*t87+2.0d+2*t35*t40*t87+1.2d+2*t32 3332 5 *t37*t87+1.2d+2*t35*t40*t86+2.88d+2*t32*t37*t86+1.68d+2*t 3333 6 29*t34*t86+1.68d+2*t32*t37*t85+3.92d+2*t29*t34*t85+2.24d+ 3334 7 2*t26*t31*t85+2.24d+2*t29*t34*t84+5.12d+2*t26*t31*t84+2.8 3335 8 8d+2*t23*t28*t84+2.88d+2*t26*t31*t83+6.48d+2*t23*t28*t83+ 3336 9 3.6d+2*t20*t25*t83+3.6d+2*t23*t28*t82+8.0d+2*t20*t25*t82+ 3337 : 4.4d+2*t137*t22*t82+4.4d+2*t20*t25*t81+9.68d+2*t137*t22*t 3338 ; 81+5.28d+2*t176*t18*t81)+t3*t66*(8.0d+0*t47*t78+8.0d+0*t1 3339 < 7*t44*t78+8.0d+0*t47*t77+2.4d+1*t41*t46*t77+3.2d+1*t17*t4 3340 = 4*t77+7.2d+1*t41*t46*t76+2.4d+1*t17*t44*t76+4.8d+1*t38*t4 3341 > 3*t76+4.8d+1*t41*t46*t75+1.28d+2*t38*t43*t75+8.0d+1*t35*t 3342 ? 40*t75+8.0d+1*t38*t43*t74+2.0d+2*t35*t40*t74+1.2d+2*t32*t 3343 @ 37*t74+1.2d+2*t35*t40*t73+2.88d+2*t32*t37*t73+1.68d+2*t29 3344 1 *t34*t73+1.68d+2*t32*t37*t72+3.92d+2*t29*t34*t72+2.24d+2* 3345 2 t26*t31*t72+2.24d+2*t29*t34*t71+5.12d+2*t26*t31*t71+2.88d 3346 3 +2*t23*t28*t71+2.88d+2*t26*t31*t70+6.48d+2*t23*t28*t70+3. 3347 4 6d+2*t20*t25*t70+3.6d+2*t23*t28*t69+8.0d+2*t20*t25*t69+4. 3348 5 4d+2*t137*t22*t69+4.4d+2*t20*t25*t68+9.68d+2*t137*t22*t68 3349 6 +5.28d+2*t176*t18*t68)-9.305257363491002d-1*t12*t4*t52*(8 3350 7 .0d+0*t47*t64+8.0d+0*t17*t44*t64+8.0d+0*t47*t63+2.4d+1*t4 3351 8 1*t46*t63+3.2d+1*t17*t44*t63+7.2d+1*t41*t46*t62+2.4d+1*t1 3352 9 7*t44*t62+4.8d+1*t38*t43*t62+4.8d+1*t41*t46*t61+1.28d+2*t 3353 : 38*t43*t61+8.0d+1*t35*t40*t61+8.0d+1*t38*t43*t60+2.0d+2*t 3354 ; 35*t40*t60+1.2d+2*t32*t37*t60+1.2d+2*t35*t40*t59+2.88d+2* 3355 < t32*t37*t59+1.68d+2*t29*t34*t59+1.68d+2*t32*t37*t58+3.92d 3356 = +2*t29*t34*t58+2.24d+2*t26*t31*t58+2.24d+2*t29*t34*t57+5. 3357 > 12d+2*t26*t31*t57+2.88d+2*t23*t28*t57+2.88d+2*t26*t31*t56 3358 ? +6.48d+2*t23*t28*t56+3.6d+2*t20*t25*t56+3.6d+2*t23*t28*t5 3359 @ 5+8.0d+2*t20*t25*t55+4.4d+2*t137*t22*t55+4.4d+2*t20*t25*t 3360 1 54+9.68d+2*t137*t22*t54+5.28d+2*t176*t18*t54)-9.305257363 3361 2 491002d-1*t12*t3*t4*(8.0d+0*t47*t48+8.0d+0*t17*t44*t48+8. 3362 3 0d+0*t45*t47+2.4d+1*t41*t45*t46+7.2d+1*t41*t42*t46+4.8d+1 3363 4 *t39*t41*t46+3.2d+1*t17*t44*t45+2.4d+1*t17*t42*t44+4.8d+1 3364 5 *t38*t42*t43+1.28d+2*t38*t39*t43+8.0d+1*t36*t38*t43+8.0d+ 3365 6 1*t35*t39*t40+2.0d+2*t35*t36*t40+1.2d+2*t33*t35*t40+1.2d+ 3366 7 2*t32*t36*t37+2.88d+2*t32*t33*t37+1.68d+2*t30*t32*t37+1.6 3367 8 8d+2*t29*t33*t34+3.92d+2*t29*t30*t34+2.24d+2*t27*t29*t34+ 3368 9 2.24d+2*t26*t30*t31+5.12d+2*t26*t27*t31+2.88d+2*t24*t26*t 3369 : 31+2.88d+2*t23*t27*t28+6.48d+2*t23*t24*t28+3.6d+2*t21*t23 3370 ; *t28+3.6d+2*t20*t24*t25+8.0d+2*t20*t21*t25+4.4d+2*t14*t20 3371 < *t25+4.4d+2*t137*t21*t22+9.68d+2*t137*t14*t22+5.28d+2*t14 3372 = *t176*t18))*wght+Mmat2(iq,D2_TA_TA) 3373 Mmat2(iq,D2_TA_TB) = Mmat2(iq,D2_TA_TB) 3374 Mmat2(iq,D2_TB_TB) = 1.0d+0*(-9.305257363491002d-1*t104*(8.0 3375 1 d+0*t128*t48+8.0d+0*t107*t126*t48+8.0d+0*t128*t45+2.4d+1* 3376 2 t124*t127*t45+3.2d+1*t107*t126*t45+7.2d+1*t124*t127*t42+2 3377 3 .4d+1*t107*t126*t42+4.8d+1*t122*t125*t42+4.8d+1*t124*t127 3378 4 *t39+1.28d+2*t122*t125*t39+8.0d+1*t120*t123*t39+8.0d+1*t1 3379 5 22*t125*t36+2.0d+2*t120*t123*t36+1.2d+2*t118*t121*t36+1.2 3380 6 d+2*t120*t123*t33+2.88d+2*t118*t121*t33+1.68d+2*t116*t119 3381 7 *t33+1.68d+2*t118*t121*t30+3.92d+2*t116*t119*t30+2.24d+2* 3382 8 t114*t117*t30+2.24d+2*t116*t119*t27+5.12d+2*t114*t117*t27 3383 9 +2.88d+2*t112*t115*t27+2.88d+2*t114*t117*t24+6.48d+2*t112 3384 : *t115*t24+3.6d+2*t110*t113*t24+4.4d+2*t111*t153*t21+3.6d+ 3385 ; 2*t112*t115*t21+8.0d+2*t110*t113*t21+5.28d+2*t108*t14*t18 3386 < 6+9.68d+2*t111*t14*t153+4.4d+2*t110*t113*t14)*t95*t96-9.3 3387 = 05257363491002d-1*t104*t132*(8.0d+0*t128*t64+8.0d+0*t107* 3388 > t126*t64+8.0d+0*t128*t63+2.4d+1*t124*t127*t63+3.2d+1*t107 3389 ? *t126*t63+7.2d+1*t124*t127*t62+2.4d+1*t107*t126*t62+4.8d+ 3390 @ 1*t122*t125*t62+4.8d+1*t124*t127*t61+1.28d+2*t122*t125*t6 3391 1 1+8.0d+1*t120*t123*t61+8.0d+1*t122*t125*t60+2.0d+2*t120*t 3392 2 123*t60+1.2d+2*t118*t121*t60+1.2d+2*t120*t123*t59+2.88d+2 3393 3 *t118*t121*t59+1.68d+2*t116*t119*t59+1.68d+2*t118*t121*t5 3394 4 8+3.92d+2*t116*t119*t58+2.24d+2*t114*t117*t58+2.24d+2*t11 3395 5 6*t119*t57+5.12d+2*t114*t117*t57+2.88d+2*t112*t115*t57+2. 3396 6 88d+2*t114*t117*t56+6.48d+2*t112*t115*t56+3.6d+2*t110*t11 3397 7 3*t56+4.4d+2*t111*t153*t55+3.6d+2*t112*t115*t55+8.0d+2*t1 3398 8 10*t113*t55+5.28d+2*t108*t186*t54+9.68d+2*t111*t153*t54+4 3399 9 .4d+2*t110*t113*t54)*t96+t134*(8.0d+0*t128*t78+8.0d+0*t10 3400 : 7*t126*t78+8.0d+0*t128*t77+2.4d+1*t124*t127*t77+3.2d+1*t1 3401 ; 07*t126*t77+7.2d+1*t124*t127*t76+2.4d+1*t107*t126*t76+4.8 3402 < d+1*t122*t125*t76+4.8d+1*t124*t127*t75+1.28d+2*t122*t125* 3403 = t75+8.0d+1*t120*t123*t75+8.0d+1*t122*t125*t74+2.0d+2*t120 3404 > *t123*t74+1.2d+2*t118*t121*t74+1.2d+2*t120*t123*t73+2.88d 3405 ? +2*t118*t121*t73+1.68d+2*t116*t119*t73+1.68d+2*t118*t121* 3406 @ t72+3.92d+2*t116*t119*t72+2.24d+2*t114*t117*t72+2.24d+2*t 3407 1 116*t119*t71+5.12d+2*t114*t117*t71+2.88d+2*t112*t115*t71+ 3408 2 2.88d+2*t114*t117*t70+6.48d+2*t112*t115*t70+3.6d+2*t110*t 3409 3 113*t70+4.4d+2*t111*t153*t69+3.6d+2*t112*t115*t69+8.0d+2* 3410 4 t110*t113*t69+5.28d+2*t108*t186*t68+9.68d+2*t111*t153*t68 3411 5 +4.4d+2*t110*t113*t68)*t95+t132*t134*(8.0d+0*t128*t91+8.0 3412 6 d+0*t107*t126*t91+8.0d+0*t128*t90+2.4d+1*t124*t127*t90+3. 3413 7 2d+1*t107*t126*t90+7.2d+1*t124*t127*t89+2.4d+1*t107*t126* 3414 8 t89+4.8d+1*t122*t125*t89+4.8d+1*t124*t127*t88+1.28d+2*t12 3415 9 2*t125*t88+8.0d+1*t120*t123*t88+8.0d+1*t122*t125*t87+2.0d 3416 : +2*t120*t123*t87+1.2d+2*t118*t121*t87+1.2d+2*t120*t123*t8 3417 ; 6+2.88d+2*t118*t121*t86+1.68d+2*t116*t119*t86+1.68d+2*t11 3418 < 8*t121*t85+3.92d+2*t116*t119*t85+2.24d+2*t114*t117*t85+2. 3419 = 24d+2*t116*t119*t84+5.12d+2*t114*t117*t84+2.88d+2*t112*t1 3420 > 15*t84+2.88d+2*t114*t117*t83+6.48d+2*t112*t115*t83+3.6d+2 3421 ? *t110*t113*t83+4.4d+2*t111*t153*t82+3.6d+2*t112*t115*t82+ 3422 @ 8.0d+2*t110*t113*t82+5.28d+2*t108*t186*t81+9.68d+2*t111*t 3423 1 153*t81+4.4d+2*t110*t113*t81))*wght+Mmat2(iq,D2_TB_TB) 3424 elseif (rhoa.gt.tol_rho.and.rhob.le.tol_rho) then 3425 t1 = 1/rhoa**2.6666666666666666d+0 3426 t2 = 4.492667444378077d-3*gammaaa*t1+1.0d+0 3427 t3 = 8.04d-1*(1.0d+0-1.0d+0/t2)+1.0d+0 3428 t4 = rhoa**1.3333333333333333d+0 3429 t5 = rhoa**3.333333333333333d-1 3430 t6 = 1/t5 3431 t7 = 1/rhoa 3432 t8 = 1.282782438530422d-1*t6-2.63857249068588d-4*t7 3433 t9 = rhoa**6.666666666666666d-1 3434 t10 = exp(-2.4308265985843178d+2*t9) 3435 t11 = t10*t8+2.63857249068588d-4*t7-1.924173657795633d-1*t6+ 3436 1 3.544907701811032d+0*erf(1.5591108358883013d+1*t5) 3437 t12 = 1.0d+0-4.275941461768073d-2*t11*t6 3438 t13 = param(12) 3439 t14 = rhoa**1.6666666666666669d+0 3440 t15 = 9.115599744691192d+0*t14 3441 t16 = t15-2.0d+0*taua 3442 t17 = t16**11 3443 t18 = 2.0d+0*taua+t15 3444 t19 = 1/t18**11 3445 t20 = param(11) 3446 t21 = t16**10 3447 t22 = 1/t18**10 3448 t23 = param(10) 3449 t24 = t16**9 3450 t25 = 1/t18**9 3451 t26 = param(9) 3452 t27 = t16**8 3453 t28 = 1/t18**8 3454 t29 = param(8) 3455 t30 = t16**7 3456 t31 = 1/t18**7 3457 t32 = param(7) 3458 t33 = t16**6 3459 t34 = 1/t18**6 3460 t35 = param(6) 3461 t36 = t16**5 3462 t37 = 1/t18**5 3463 t38 = param(5) 3464 t39 = t16**4 3465 t40 = 1/t18**4 3466 t41 = param(4) 3467 t42 = t16**3 3468 t43 = 1/t18**3 3469 t44 = param(3) 3470 t45 = t16**2 3471 t46 = 1/t18**2 3472 t47 = param(2) 3473 t48 = 1/t18 3474 t49 = t16*t47*t48+t44*t45*t46+t41*t42*t43+t38*t39*t40+t35*t3 3475 1 6*t37+t32*t33*t34+t29*t30*t31+t26*t27*t28+t23*t24*t25+t20 3476 2 *t21*t22+t13*t17*t19+param(1) 3477 t50 = exp(-3.6802889260199856d-3*gammaaa*t1) 3478 t51 = 5.52d-1*(1.0d+0-t50)+1.0d+0 3479 t52 = param(24) 3480 t53 = param(23) 3481 t54 = param(22) 3482 t55 = param(21) 3483 t56 = param(20) 3484 t57 = param(19) 3485 t58 = param(18) 3486 t59 = param(17) 3487 t60 = param(16) 3488 t61 = param(15) 3489 t62 = param(14) 3490 t63 = t16*t48*t62+t45*t46*t61+t42*t43*t60+t39*t40*t59+t36*t3 3491 1 7*t58+t33*t34*t57+t30*t31*t56+t27*t28*t55+t24*t25*t54+t21 3492 2 *t22*t53+t17*t19*t52+param(13) 3493 t64 = 9.305257363491002d-1*t12*t4-9.305257363491002d-1*t4 3494 t65 = param(36) 3495 t66 = param(35) 3496 t67 = param(34) 3497 t68 = param(33) 3498 t69 = param(32) 3499 t70 = param(31) 3500 t71 = param(30) 3501 t72 = param(29) 3502 t73 = param(28) 3503 t74 = param(27) 3504 t75 = param(26) 3505 t76 = t16*t48*t75+t45*t46*t74+t42*t43*t73+t39*t40*t72+t36*t3 3506 1 7*t71+t33*t34*t70+t30*t31*t69+t27*t28*t68+t24*t25*t67+t21 3507 2 *t22*t66+t17*t19*t65+param(25) 3508 t77 = param(48) 3509 t78 = param(47) 3510 t79 = param(46) 3511 t80 = param(45) 3512 t81 = param(44) 3513 t82 = param(43) 3514 t83 = param(42) 3515 t84 = param(41) 3516 t85 = param(40) 3517 t86 = param(39) 3518 t87 = param(38) 3519 t88 = t16*t48*t87+t45*t46*t86+t42*t43*t85+t39*t40*t84+t36*t3 3520 1 7*t83+t33*t34*t82+t30*t31*t81+t27*t28*t80+t24*t25*t79+t21 3521 2 *t22*t78+t17*t19*t77+param(37) 3522 t89 = 1/t18**12 3523 t90 = -1.6711932865267184d+2*t13*t17*t89*t9+1.51926662411519 3524 1 86d+1*t47*t48*t9-1.5192666241151986d+1*t16*t46*t47*t9+3.0 3525 2 38533248230397d+1*t16*t44*t46*t9-3.038533248230397d+1*t43 3526 3 *t44*t45*t9+4.5577998723455965d+1*t41*t43*t45*t9-4.557799 3527 4 8723455965d+1*t40*t41*t42*t9+6.077066496460795d+1*t38*t40 3528 5 *t42*t9-6.077066496460795d+1*t37*t38*t39*t9+7.59633312057 3529 6 5993d+1*t35*t37*t39*t9-7.596333120575993d+1*t34*t35*t36*t 3530 7 9+9.115599744691193d+1*t32*t34*t36*t9-9.115599744691193d+ 3531 8 1*t31*t32*t33*t9+1.0634866368806391d+2*t29*t31*t33*t9-1.0 3532 9 634866368806391d+2*t28*t29*t30*t9+1.2154132992921589d+2*t 3533 : 26*t28*t30*t9-1.2154132992921589d+2*t25*t26*t27*t9+1.3673 3534 ; 399617036788d+2*t23*t25*t27*t9-1.3673399617036788d+2*t22* 3535 < t23*t24*t9+1.5192666241151986d+2*t20*t22*t24*t9-1.5192666 3536 = 241151986d+2*t19*t20*t21*t9+1.6711932865267184d+2*t13*t19 3537 > *t21*t9 3538 t91 = -1.6711932865267184d+2*t17*t52*t89*t9+1.51926662411519 3539 1 86d+1*t48*t62*t9-1.5192666241151986d+1*t16*t46*t62*t9+3.0 3540 2 38533248230397d+1*t16*t46*t61*t9-3.038533248230397d+1*t43 3541 3 *t45*t61*t9+4.5577998723455965d+1*t43*t45*t60*t9-4.557799 3542 4 8723455965d+1*t40*t42*t60*t9+6.077066496460795d+1*t40*t42 3543 5 *t59*t9-6.077066496460795d+1*t37*t39*t59*t9+7.59633312057 3544 6 5993d+1*t37*t39*t58*t9-7.596333120575993d+1*t34*t36*t58*t 3545 7 9+9.115599744691193d+1*t34*t36*t57*t9-9.115599744691193d+ 3546 8 1*t31*t33*t57*t9+1.0634866368806391d+2*t31*t33*t56*t9-1.0 3547 9 634866368806391d+2*t28*t30*t56*t9+1.2154132992921589d+2*t 3548 : 28*t30*t55*t9-1.2154132992921589d+2*t25*t27*t55*t9+1.3673 3549 ; 399617036788d+2*t25*t27*t54*t9-1.3673399617036788d+2*t22* 3550 < t24*t54*t9+1.5192666241151986d+2*t22*t24*t53*t9-1.5192666 3551 = 241151986d+2*t19*t21*t53*t9+1.6711932865267184d+2*t19*t21 3552 > *t52*t9 3553 t92 = -1.6711932865267184d+2*t17*t65*t89*t9+1.51926662411519 3554 1 86d+1*t48*t75*t9-1.5192666241151986d+1*t16*t46*t75*t9+3.0 3555 2 38533248230397d+1*t16*t46*t74*t9-3.038533248230397d+1*t43 3556 3 *t45*t74*t9+4.5577998723455965d+1*t43*t45*t73*t9-4.557799 3557 4 8723455965d+1*t40*t42*t73*t9+6.077066496460795d+1*t40*t42 3558 5 *t72*t9-6.077066496460795d+1*t37*t39*t72*t9+7.59633312057 3559 6 5993d+1*t37*t39*t71*t9-7.596333120575993d+1*t34*t36*t71*t 3560 7 9+9.115599744691193d+1*t34*t36*t70*t9-9.115599744691193d+ 3561 8 1*t31*t33*t70*t9+1.0634866368806391d+2*t31*t33*t69*t9-1.0 3562 9 634866368806391d+2*t28*t30*t69*t9+1.2154132992921589d+2*t 3563 : 28*t30*t68*t9-1.2154132992921589d+2*t25*t27*t68*t9+1.3673 3564 ; 399617036788d+2*t25*t27*t67*t9-1.3673399617036788d+2*t22* 3565 < t24*t67*t9+1.5192666241151986d+2*t22*t24*t66*t9-1.5192666 3566 = 241151986d+2*t19*t21*t66*t9+1.6711932865267184d+2*t19*t21 3567 > *t65*t9 3568 t93 = -1.6711932865267184d+2*t17*t77*t89*t9+1.51926662411519 3569 1 86d+1*t48*t87*t9-1.5192666241151986d+1*t16*t46*t87*t9+3.0 3570 2 38533248230397d+1*t16*t46*t86*t9-3.038533248230397d+1*t43 3571 3 *t45*t86*t9+4.5577998723455965d+1*t43*t45*t85*t9-4.557799 3572 4 8723455965d+1*t40*t42*t85*t9+6.077066496460795d+1*t40*t42 3573 5 *t84*t9-6.077066496460795d+1*t37*t39*t84*t9+7.59633312057 3574 6 5993d+1*t37*t39*t83*t9-7.596333120575993d+1*t34*t36*t83*t 3575 7 9+9.115599744691193d+1*t34*t36*t82*t9-9.115599744691193d+ 3576 8 1*t31*t33*t82*t9+1.0634866368806391d+2*t31*t33*t81*t9-1.0 3577 9 634866368806391d+2*t28*t30*t81*t9+1.2154132992921589d+2*t 3578 : 28*t30*t80*t9-1.2154132992921589d+2*t25*t27*t80*t9+1.3673 3579 ; 399617036788d+2*t25*t27*t79*t9-1.3673399617036788d+2*t22* 3580 < t24*t79*t9+1.5192666241151986d+2*t22*t24*t78*t9-1.5192666 3581 = 241151986d+2*t19*t21*t78*t9+1.6711932865267184d+2*t19*t21 3582 > *t77*t9 3583 t94 = 1/t2**2 3584 t95 = 1/rhoa**2.3333333333333334d+0 3585 t96 = 1/t4 3586 t97 = 1/rhoa**2 3587 t98 = 2.63857249068588d-4*t97-4.2759414617680735d-2*t96 3588 t99 = 5.641895835477563d-1 3589 t100 = 1/t9 3590 t101 = 3.6846026734116505d+1*t10*t100*t99+t10*t98-2.63857249 3591 1 068588d-4*t97+6.41391219265211d-2*t96-1.6205510657228786d 3592 2 +2*t10*t6*t8 3593 t102 = 1.4253138205893576d-2*t11*t96-4.275941461768073d-2*t1 3594 1 01*t6 3595 t103 = 1/rhoa**3.6666666666666664d+0 3596 t104 = 1.2407009817988002d+0*t12*t5-1.2407009817988002d+0*t5 3597 1 +9.305257363491002d-1*t102*t4 3598 t105 = -2.2d+1*t13*t17*t89-2.0d+0*t47*t48-2.0d+0*t16*t46*t47 3599 1 -4.0d+0*t16*t44*t46-4.0d+0*t43*t44*t45-6.0d+0*t41*t43*t45 3600 2 -6.0d+0*t40*t41*t42-8.0d+0*t38*t40*t42-8.0d+0*t37*t38*t39 3601 3 -1.0d+1*t35*t37*t39-1.0d+1*t34*t35*t36-1.2d+1*t32*t34*t36 3602 4 -1.2d+1*t31*t32*t33-1.4d+1*t29*t31*t33-1.4d+1*t28*t29*t30 3603 5 -1.6d+1*t26*t28*t30-1.6d+1*t25*t26*t27-1.8d+1*t23*t25*t27 3604 6 -1.8d+1*t22*t23*t24-2.0d+1*t20*t22*t24-2.0d+1*t19*t20*t21 3605 7 -2.2d+1*t13*t19*t21 3606 t106 = -2.2d+1*t17*t52*t89-2.0d+0*t48*t62-2.0d+0*t16*t46*t62 3607 1 -4.0d+0*t16*t46*t61-4.0d+0*t43*t45*t61-6.0d+0*t43*t45*t60 3608 2 -6.0d+0*t40*t42*t60-8.0d+0*t40*t42*t59-8.0d+0*t37*t39*t59 3609 3 -1.0d+1*t37*t39*t58-1.0d+1*t34*t36*t58-1.2d+1*t34*t36*t57 3610 4 -1.2d+1*t31*t33*t57-1.4d+1*t31*t33*t56-1.4d+1*t28*t30*t56 3611 5 -1.6d+1*t28*t30*t55-1.6d+1*t25*t27*t55-1.8d+1*t25*t27*t54 3612 6 -1.8d+1*t22*t24*t54-2.0d+1*t22*t24*t53-2.0d+1*t19*t21*t53 3613 7 -2.2d+1*t19*t21*t52 3614 t107 = -2.2d+1*t17*t65*t89-2.0d+0*t48*t75-2.0d+0*t16*t46*t75 3615 1 -4.0d+0*t16*t46*t74-4.0d+0*t43*t45*t74-6.0d+0*t43*t45*t73 3616 2 -6.0d+0*t40*t42*t73-8.0d+0*t40*t42*t72-8.0d+0*t37*t39*t72 3617 3 -1.0d+1*t37*t39*t71-1.0d+1*t34*t36*t71-1.2d+1*t34*t36*t70 3618 4 -1.2d+1*t31*t33*t70-1.4d+1*t31*t33*t69-1.4d+1*t28*t30*t69 3619 5 -1.6d+1*t28*t30*t68-1.6d+1*t25*t27*t68-1.8d+1*t25*t27*t67 3620 6 -1.8d+1*t22*t24*t67-2.0d+1*t22*t24*t66-2.0d+1*t19*t21*t66 3621 7 -2.2d+1*t19*t21*t65 3622 t108 = -2.2d+1*t17*t77*t89-2.0d+0*t48*t87-2.0d+0*t16*t46*t87 3623 1 -4.0d+0*t16*t46*t86-4.0d+0*t43*t45*t86-6.0d+0*t43*t45*t85 3624 2 -6.0d+0*t40*t42*t85-8.0d+0*t40*t42*t84-8.0d+0*t37*t39*t84 3625 3 -1.0d+1*t37*t39*t83-1.0d+1*t34*t36*t83-1.2d+1*t34*t36*t82 3626 4 -1.2d+1*t31*t33*t82-1.4d+1*t31*t33*t81-1.4d+1*t28*t30*t81 3627 5 -1.6d+1*t28*t30*t80-1.6d+1*t25*t27*t80-1.8d+1*t25*t27*t79 3628 6 -1.8d+1*t22*t24*t79-2.0d+1*t22*t24*t78-2.0d+1*t19*t21*t78 3629 7 -2.2d+1*t19*t21*t77 3630 t109 = 1/t18**13 3631 t110 = gammaaa**2 3632 t111 = 1/t2**3 3633 t112 = 1/rhoa**6 3634 t113 = 1/rhoa**3.3333333333333337d+0 3635 t114 = 1/rhoa**3 3636 t115 = -4.275941461768073d-2*t6*(-5.971086789162617d+3*t10*t 3637 1 7*t99-2.4564017822744336d+1*t10*t99/t14-3.241102131445757 3638 2 d+2*t10*t6*t98+5.401836885742928d+1*t10*t8*t96-8.55188292 3639 3 3536147d-2*t95+t10*(5.701255282357431d-2*t95-5.2771449813 3640 4 7176d-4*t114)+2.626185756615557d+4*t10*t100*t8+5.27714498 3641 5 137176d-4*t114)+2.850627641178715d-2*t101*t96-1.900418427 3642 6 4524766d-2*t11*t95 3643 t116 = 1/rhoa**7.333333333333333d+0 3644 t117 = 1/rhoa**4.666666666666667d+0 3645 t118 = 2.4814019635976003d+0*t102*t5+9.305257363491002d-1*t1 3646 1 15*t4+4.135669939329334d-1*t100*t12-4.135669939329334d-1* 3647 2 t100 3648 t119 = 1/rhoa**5 3649 t120 = 1/rhoa**6.333333333333333d+0 3650 t121 = 1/rhoa**4 3651 t122 = 1/rhoa**5.333333333333333d+0 3652 fnc(iq) = 1.0d+0*(t51*t64*t88+t3*t64*t76-9.305257363491002d- 3653 1 1*t12*t4*t51*t63-9.305257363491002d-1*t12*t3*t4*t49)*wght 3654 2 +fnc(iq) 3655 Amat(iq,D1_RA) = 1.0d+0*(8.963083509889702d-3*gammaaa*t12*t4 3656 1 9*t94*t95+5.041016444533138d-3*gammaaa*t12*t50*t63*t95-9. 3657 2 632279000746596d-3*gammaaa*t103*t64*t76*t94+t51*t64*t93+t 3658 3 3*t64*t92-9.305257363491002d-1*t12*t4*t51*t91-9.305257363 3659 4 491002d-1*t12*t3*t4*t90-5.417385299101419d-3*gammaaa*t103 3660 5 *t50*t64*t88+t104*t51*t88+t104*t3*t76-1.2407009817988002d 3661 6 +0*t12*t5*t51*t63-9.305257363491002d-1*t102*t4*t51*t63-1. 3662 7 2407009817988002d+0*t12*t3*t49*t5-9.305257363491002d-1*t1 3663 8 02*t3*t4*t49)*wght+Amat(iq,D1_RA) 3664 Cmat(iq,D1_GAA) = 1.0d+0*(-3.361156316208638d-3*t12*t49*t94* 3665 1 t96-1.890381166699927d-3*t12*t50*t63*t96+3.61210462527997 3666 2 4d-3*t1*t64*t76*t94+2.0315194871630324d-3*t1*t50*t64*t88) 3667 3 *wght+Cmat(iq,D1_GAA) 3668 Mmat(iq,D1_TA) = 1.0d+0*(t108*t51*t64+t107*t3*t64-9.30525736 3669 1 3491002d-1*t106*t12*t4*t51-9.305257363491002d-1*t105*t12* 3670 2 t3*t4)*wght+Mmat(iq,D1_TA) 3671 Mmat(iq,D1_TB) = Mmat(iq,D1_TB) 3672 Amat2(iq,D2_RA_RA) = 1.0d+0*((1.7926167019779404d-2*gammaaa* 3673 1 t12*t90+1.7926167019779404d-2*gammaaa*t102*t49)*t94*t95+( 3674 2 1.0082032889066277d-2*gammaaa*t12*t50*t91+1.0082032889066 3675 3 277d-2*gammaaa*t102*t50*t63)*t95+t103*(-1.926455800149319 3676 4 3d-2*gammaaa*t64*t92-1.9264558001493193d-2*gammaaa*t104*t 3677 5 76)*t94+3.5318356336070855d-2*gammaaa*t117*t64*t76*t94-8. 3678 6 963083509889707d-3*gammaaa*t113*t12*t49*t94+t103*(-1.0834 3679 7 770598202839d-2*gammaaa*t50*t64*t93-1.0834770598202839d-2 3680 8 *gammaaa*t104*t50*t88)+2*t104*t51*t93+2*t104*t3*t92-2.481 3681 9 4019635976003d+0*t12*t5*t51*t91-1.8610514726982003d+0*t10 3682 : 2*t4*t51*t91-2.4814019635976003d+0*t12*t3*t5*t90-1.861051 3683 ; 4726982003d+0*t102*t3*t4*t90+t51*t64*(2.5389881826654315d 3684 < +4*t21*t4*t78*t89-1.1141288576844789d+2*t17*t6*t77*t89-5. 3685 = 585774001863949d+4*t21*t4*t77*t89+1.0128444160767991d+1*t 3686 > 48*t6*t87-1.0128444160767991d+1*t16*t46*t6*t87-4.61634215 3687 ? 03007845d+2*t4*t46*t87+4.6163421503007845d+2*t16*t4*t43*t 3688 @ 87+2.0256888321535982d+1*t16*t46*t6*t86-2.025688832153598 3689 1 2d+1*t43*t45*t6*t86+4.6163421503007845d+2*t4*t46*t86+1.38 3690 2 49026450902355d+3*t4*t40*t45*t86-1.846536860120314d+3*t16 3691 3 *t4*t43*t86+3.038533248230397d+1*t43*t45*t6*t85-3.0385332 3692 4 48230397d+1*t40*t42*t6*t85-4.1547079352707067d+3*t4*t40*t 3693 5 45*t85+1.3849026450902355d+3*t16*t4*t43*t85+2.76980529018 3694 6 0471d+3*t37*t4*t42*t85+4.0513776643071964d+1*t40*t42*t6*t 3695 7 84-4.0513776643071964d+1*t37*t39*t6*t84+2.769805290180471 3696 8 d+3*t4*t40*t45*t84-7.386147440481255d+3*t37*t4*t42*t84+4. 3697 9 616342150300784d+3*t34*t39*t4*t84+5.064222080383994d+1*t3 3698 : 7*t39*t6*t83-5.064222080383994d+1*t34*t36*t6*t83+4.616342 3699 ; 150300784d+3*t37*t4*t42*t83-1.154085537575196d+4*t34*t39* 3700 < t4*t83+6.924513225451178d+3*t31*t36*t4*t83+6.077066496460 3701 = 795d+1*t34*t36*t6*t82-6.077066496460795d+1*t31*t33*t6*t82 3702 > +6.924513225451178d+3*t34*t39*t4*t82-1.661883174108283d+4 3703 ? *t31*t36*t4*t82+9.694318515631648d+3*t28*t33*t4*t82+7.089 3704 @ 910912537593d+1*t31*t33*t6*t81-7.089910912537593d+1*t28*t 3705 1 30*t6*t81+9.694318515631648d+3*t31*t36*t4*t81-2.262007653 3706 2 6473846d+4*t28*t33*t4*t81+1.2925758020842196d+4*t25*t30*t 3707 3 4*t81+8.102755328614393d+1*t28*t30*t6*t80-8.1027553286143 3708 4 93d+1*t25*t27*t6*t80+1.2925758020842196d+4*t28*t33*t4*t80 3709 5 -2.954458976192502d+4*t25*t30*t4*t80+1.6618831741082823d+ 3710 6 4*t22*t27*t4*t80+9.115599744691191d+1*t25*t27*t6*t79-9.11 3711 7 5599744691191d+1*t22*t24*t6*t79+1.6618831741082823d+4*t25 3712 8 *t30*t4*t79-3.7392371417436354d+4*t22*t27*t4*t79+2.077353 3713 9 9676353528d+4*t19*t24*t4*t79+1.012844416076799d+2*t22*t24 3714 : *t6*t78-1.012844416076799d+2*t19*t21*t6*t78+2.07735396763 3715 ; 53528d+4*t22*t27*t4*t78-4.616342150300784d+4*t19*t24*t4*t 3716 < 78+1.1141288576844789d+2*t19*t21*t6*t77+2.538988182665431 3717 = 5d+4*t19*t24*t4*t77+3.046785819198518d+4*t109*t17*t4*t77) 3718 > +t3*t64*(2.5389881826654315d+4*t21*t4*t66*t89-1.114128857 3719 ? 6844789d+2*t17*t6*t65*t89-5.585774001863949d+4*t21*t4*t65 3720 @ *t89+1.0128444160767991d+1*t48*t6*t75-1.0128444160767991d 3721 1 +1*t16*t46*t6*t75-4.6163421503007845d+2*t4*t46*t75+4.6163 3722 2 421503007845d+2*t16*t4*t43*t75+2.0256888321535982d+1*t16* 3723 3 t46*t6*t74-2.0256888321535982d+1*t43*t45*t6*t74+4.6163421 3724 4 503007845d+2*t4*t46*t74+1.3849026450902355d+3*t4*t40*t45* 3725 5 t74-1.846536860120314d+3*t16*t4*t43*t74+3.038533248230397 3726 6 d+1*t43*t45*t6*t73-3.038533248230397d+1*t40*t42*t6*t73-4. 3727 7 1547079352707067d+3*t4*t40*t45*t73+1.3849026450902355d+3* 3728 8 t16*t4*t43*t73+2.769805290180471d+3*t37*t4*t42*t73+4.0513 3729 9 776643071964d+1*t40*t42*t6*t72-4.0513776643071964d+1*t37* 3730 : t39*t6*t72+2.769805290180471d+3*t4*t40*t45*t72-7.38614744 3731 ; 0481255d+3*t37*t4*t42*t72+4.616342150300784d+3*t34*t39*t4 3732 < *t72+5.064222080383994d+1*t37*t39*t6*t71-5.06422208038399 3733 = 4d+1*t34*t36*t6*t71+4.616342150300784d+3*t37*t4*t42*t71-1 3734 > .154085537575196d+4*t34*t39*t4*t71+6.924513225451178d+3*t 3735 ? 31*t36*t4*t71+6.077066496460795d+1*t34*t36*t6*t70-6.07706 3736 @ 6496460795d+1*t31*t33*t6*t70+6.924513225451178d+3*t34*t39 3737 1 *t4*t70-1.661883174108283d+4*t31*t36*t4*t70+9.69431851563 3738 2 1648d+3*t28*t33*t4*t70+7.089910912537593d+1*t31*t33*t6*t6 3739 3 9-7.089910912537593d+1*t28*t30*t6*t69+9.694318515631648d+ 3740 4 3*t31*t36*t4*t69-2.2620076536473846d+4*t28*t33*t4*t69+1.2 3741 5 925758020842196d+4*t25*t30*t4*t69+8.102755328614393d+1*t2 3742 6 8*t30*t6*t68-8.102755328614393d+1*t25*t27*t6*t68+1.292575 3743 7 8020842196d+4*t28*t33*t4*t68-2.954458976192502d+4*t25*t30 3744 8 *t4*t68+1.6618831741082823d+4*t22*t27*t4*t68+9.1155997446 3745 9 91191d+1*t25*t27*t6*t67-9.115599744691191d+1*t22*t24*t6*t 3746 : 67+1.6618831741082823d+4*t25*t30*t4*t67-3.739237141743635 3747 ; 4d+4*t22*t27*t4*t67+2.0773539676353528d+4*t19*t24*t4*t67+ 3748 < 1.012844416076799d+2*t22*t24*t6*t66-1.012844416076799d+2* 3749 = t19*t21*t6*t66+2.0773539676353528d+4*t22*t27*t4*t66-4.616 3750 > 342150300784d+4*t19*t24*t4*t66+1.1141288576844789d+2*t19* 3751 ? t21*t6*t65+2.5389881826654315d+4*t19*t24*t4*t65+3.0467858 3752 @ 19198518d+4*t109*t17*t4*t65)-9.305257363491002d-1*t12*t4* 3753 1 t51*(-1.1141288576844789d+2*t17*t52*t6*t89+2.538988182665 3754 2 4315d+4*t21*t4*t53*t89-5.585774001863949d+4*t21*t4*t52*t8 3755 3 9+1.0128444160767991d+1*t48*t6*t62-1.0128444160767991d+1* 3756 4 t16*t46*t6*t62-4.6163421503007845d+2*t4*t46*t62+4.6163421 3757 5 503007845d+2*t16*t4*t43*t62+2.0256888321535982d+1*t16*t46 3758 6 *t6*t61-2.0256888321535982d+1*t43*t45*t6*t61+4.6163421503 3759 7 007845d+2*t4*t46*t61+1.3849026450902355d+3*t4*t40*t45*t61 3760 8 -1.846536860120314d+3*t16*t4*t43*t61+3.038533248230397d+1 3761 9 *t43*t45*t6*t60-3.038533248230397d+1*t40*t42*t6*t60-4.154 3762 : 7079352707067d+3*t4*t40*t45*t60+1.3849026450902355d+3*t16 3763 ; *t4*t43*t60+2.769805290180471d+3*t37*t4*t42*t60+4.0513776 3764 < 643071964d+1*t40*t42*t59*t6-4.0513776643071964d+1*t37*t39 3765 = *t59*t6+5.064222080383994d+1*t37*t39*t58*t6-5.06422208038 3766 > 3994d+1*t34*t36*t58*t6+6.077066496460795d+1*t34*t36*t57*t 3767 ? 6-6.077066496460795d+1*t31*t33*t57*t6+7.089910912537593d+ 3768 @ 1*t31*t33*t56*t6-7.089910912537593d+1*t28*t30*t56*t6+8.10 3769 1 2755328614393d+1*t28*t30*t55*t6-8.102755328614393d+1*t25* 3770 2 t27*t55*t6+9.115599744691191d+1*t25*t27*t54*t6-9.11559974 3771 3 4691191d+1*t22*t24*t54*t6+1.012844416076799d+2*t22*t24*t5 3772 4 3*t6-1.012844416076799d+2*t19*t21*t53*t6+1.11412885768447 3773 5 89d+2*t19*t21*t52*t6+2.769805290180471d+3*t4*t40*t45*t59- 3774 6 7.386147440481255d+3*t37*t4*t42*t59+4.616342150300784d+3* 3775 7 t34*t39*t4*t59+4.616342150300784d+3*t37*t4*t42*t58-1.1540 3776 8 85537575196d+4*t34*t39*t4*t58+6.924513225451178d+3*t31*t3 3777 9 6*t4*t58+6.924513225451178d+3*t34*t39*t4*t57-1.6618831741 3778 : 08283d+4*t31*t36*t4*t57+9.694318515631648d+3*t28*t33*t4*t 3779 ; 57+9.694318515631648d+3*t31*t36*t4*t56-2.2620076536473846 3780 < d+4*t28*t33*t4*t56+1.2925758020842196d+4*t25*t30*t4*t56+1 3781 = .2925758020842196d+4*t28*t33*t4*t55-2.954458976192502d+4* 3782 > t25*t30*t4*t55+1.6618831741082823d+4*t22*t27*t4*t55+1.661 3783 ? 8831741082823d+4*t25*t30*t4*t54-3.7392371417436354d+4*t22 3784 @ *t27*t4*t54+2.0773539676353528d+4*t19*t24*t4*t54+2.077353 3785 1 9676353528d+4*t22*t27*t4*t53-4.616342150300784d+4*t19*t24 3786 2 *t4*t53+2.5389881826654315d+4*t19*t24*t4*t52+3.0467858191 3787 3 98518d+4*t109*t17*t4*t52)-9.305257363491002d-1*t12*t3*t4* 3788 4 (-1.1141288576844789d+2*t13*t17*t6*t89+2.5389881826654315 3789 5 d+4*t20*t21*t4*t89-5.585774001863949d+4*t13*t21*t4*t89+1. 3790 6 0128444160767991d+1*t47*t48*t6-1.0128444160767991d+1*t16* 3791 7 t46*t47*t6+2.0256888321535982d+1*t16*t44*t46*t6-2.0256888 3792 8 321535982d+1*t43*t44*t45*t6+3.038533248230397d+1*t41*t43* 3793 9 t45*t6-3.038533248230397d+1*t40*t41*t42*t6+4.051377664307 3794 : 1964d+1*t38*t40*t42*t6-4.0513776643071964d+1*t37*t38*t39* 3795 ; t6+5.064222080383994d+1*t35*t37*t39*t6-5.064222080383994d 3796 < +1*t34*t35*t36*t6+6.077066496460795d+1*t32*t34*t36*t6-6.0 3797 = 77066496460795d+1*t31*t32*t33*t6+7.089910912537593d+1*t29 3798 > *t31*t33*t6-7.089910912537593d+1*t28*t29*t30*t6+8.1027553 3799 ? 28614393d+1*t26*t28*t30*t6-8.102755328614393d+1*t25*t26*t 3800 @ 27*t6+9.115599744691191d+1*t23*t25*t27*t6-9.1155997446911 3801 1 91d+1*t22*t23*t24*t6+1.012844416076799d+2*t20*t22*t24*t6- 3802 2 1.012844416076799d+2*t19*t20*t21*t6+1.1141288576844789d+2 3803 3 *t13*t19*t21*t6-4.6163421503007845d+2*t4*t46*t47+4.616342 3804 4 1503007845d+2*t16*t4*t43*t47+4.6163421503007845d+2*t4*t44 3805 5 *t46+1.3849026450902355d+3*t4*t40*t44*t45-4.1547079352707 3806 6 067d+3*t4*t40*t41*t45+2.769805290180471d+3*t38*t4*t40*t45 3807 7 -1.846536860120314d+3*t16*t4*t43*t44+1.3849026450902355d+ 3808 8 3*t16*t4*t41*t43+2.769805290180471d+3*t37*t4*t41*t42-7.38 3809 9 6147440481255d+3*t37*t38*t4*t42+4.616342150300784d+3*t35* 3810 : t37*t4*t42+4.616342150300784d+3*t34*t38*t39*t4-1.15408553 3811 ; 7575196d+4*t34*t35*t39*t4+6.924513225451178d+3*t32*t34*t3 3812 < 9*t4+6.924513225451178d+3*t31*t35*t36*t4-1.66188317410828 3813 = 3d+4*t31*t32*t36*t4+9.694318515631648d+3*t29*t31*t36*t4+9 3814 > .694318515631648d+3*t28*t32*t33*t4-2.2620076536473846d+4* 3815 ? t28*t29*t33*t4+1.2925758020842196d+4*t26*t28*t33*t4+1.292 3816 @ 5758020842196d+4*t25*t29*t30*t4-2.954458976192502d+4*t25* 3817 1 t26*t30*t4+1.6618831741082823d+4*t23*t25*t30*t4+1.6618831 3818 2 741082823d+4*t22*t26*t27*t4-3.7392371417436354d+4*t22*t23 3819 3 *t27*t4+2.0773539676353528d+4*t20*t22*t27*t4+2.0773539676 3820 4 353528d+4*t19*t23*t24*t4-4.616342150300784d+4*t19*t20*t24 3821 5 *t4+2.5389881826654315d+4*t13*t19*t24*t4+3.04678581919851 3822 6 8d+4*t109*t13*t17*t4)+1.9863746096705204d-2*gammaaa*t117* 3823 7 t50*t64*t88-5.316678166471045d-5*t110*t116*t50*t64*t88+t1 3824 8 18*t51*t88-2.3079800683637772d-4*t110*t111*t116*t64*t76+t 3825 9 118*t3*t76+t100*(-4.135669939329334d-1*t12*t51*t63-4.1356 3826 : 69939329334d-1*t12*t3*t49)-2.4814019635976003d+0*t102*t5* 3827 ; t51*t63-9.305257363491002d-1*t115*t4*t51*t63-5.0410164445 3828 < 33138d-3*gammaaa*t113*t12*t50*t63+4.947305865786653d-5*t1 3829 = 10*t112*t12*t50*t63-2.4814019635976003d+0*t102*t3*t49*t5- 3830 > 9.305257363491002d-1*t115*t3*t4*t49+2.1476348525932504d-4 3831 ? *t110*t111*t112*t12*t49)*wght+Amat2(iq,D2_RA_RA) 3832 Cmat2(iq,D2_RA_GAA) = 1.0d+0*((-3.361156316208638d-3*t12*t90 3833 1 -3.361156316208638d-3*t102*t49)*t94*t96+(-1.8903811666999 3834 2 27d-3*t12*t50*t91-1.890381166699927d-3*t102*t50*t63)*t96+ 3835 3 4.481541754944851d-3*t12*t49*t94*t95+2.520508222266569d-3 3836 4 *t12*t50*t63*t95+t1*(3.612104625279974d-3*t64*t92+3.61210 3837 5 4625279974d-3*t104*t76)*t94-9.632279000746596d-3*t103*t64 3838 6 *t76*t94+t1*(2.0315194871630324d-3*t50*t64*t93+2.03151948 3839 7 71630324d-3*t104*t50*t88)+1.9937543124266421d-5*gammaaa*t 3840 8 120*t50*t64*t88-5.417385299101419d-3*t103*t50*t64*t88+8.6 3841 9 54925256364164d-5*gammaaa*t111*t120*t64*t76-1.85523969966 3842 : 9995d-5*gammaaa*t119*t12*t50*t63-8.05363069722469d-5*gamm 3843 ; aaa*t111*t119*t12*t49)*wght+Cmat2(iq,D2_RA_GAA) 3844 Cmat2(iq,D2_GAA_GAA) = 1.0d+0*(-7.476578671599909d-6*t122*t5 3845 1 0*t64*t88-3.245596971136562d-5*t111*t122*t64*t76+6.957148 3846 2 873762482d-6*t12*t121*t50*t63+3.020111511459258d-5*t111*t 3847 3 12*t121*t49)*wght+Cmat2(iq,D2_GAA_GAA) 3848 Mmat2(iq,D2_RA_TA) = 1.0d+0*(8.963083509889702d-3*gammaaa*t1 3849 1 05*t12*t94*t95+5.041016444533138d-3*gammaaa*t106*t12*t50* 3850 2 t95-9.632279000746596d-3*gammaaa*t103*t107*t64*t94+t51*t6 3851 3 4*(3.342386573053437d+3*t21*t78*t89*t9+6.077066496460795d 3852 4 +1*t16*t43*t87*t9-6.077066496460795d+1*t46*t86*t9+1.82311 3853 5 99489382385d+2*t40*t45*t86*t9-1.8231199489382385d+2*t16*t 3854 6 43*t85*t9+3.646239897876477d+2*t37*t42*t85*t9-3.646239897 3855 7 876477d+2*t40*t45*t84*t9+6.077066496460795d+2*t34*t39*t84 3856 8 *t9-6.077066496460795d+2*t37*t42*t83*t9+9.115599744691192 3857 9 d+2*t31*t36*t83*t9-9.115599744691192d+2*t34*t39*t82*t9+1. 3858 : 276183964256767d+3*t28*t33*t82*t9-1.276183964256767d+3*t3 3859 ; 1*t36*t81*t9+1.7015786190090226d+3*t25*t30*t81*t9-1.70157 3860 < 86190090226d+3*t28*t33*t80*t9+2.187743938725886d+3*t22*t2 3861 = 7*t80*t9-2.187743938725886d+3*t25*t30*t79*t9+2.7346799234 3862 > 07357d+3*t19*t24*t79*t9-2.734679923407357d+3*t22*t27*t78* 3863 ? t9-3.342386573053437d+3*t19*t24*t77*t9+4.0108638876641245 3864 @ d+3*t109*t17*t77*t9)+t3*t64*(3.342386573053437d+3*t21*t66 3865 1 *t89*t9+6.077066496460795d+1*t16*t43*t75*t9-6.07706649646 3866 2 0795d+1*t46*t74*t9+1.8231199489382385d+2*t40*t45*t74*t9-1 3867 3 .8231199489382385d+2*t16*t43*t73*t9+3.646239897876477d+2* 3868 4 t37*t42*t73*t9-3.646239897876477d+2*t40*t45*t72*t9+6.0770 3869 5 66496460795d+2*t34*t39*t72*t9-6.077066496460795d+2*t37*t4 3870 6 2*t71*t9+9.115599744691192d+2*t31*t36*t71*t9-9.1155997446 3871 7 91192d+2*t34*t39*t70*t9+1.276183964256767d+3*t28*t33*t70* 3872 8 t9-1.276183964256767d+3*t31*t36*t69*t9+1.7015786190090226 3873 9 d+3*t25*t30*t69*t9-1.7015786190090226d+3*t28*t33*t68*t9+2 3874 : .187743938725886d+3*t22*t27*t68*t9-2.187743938725886d+3*t 3875 ; 25*t30*t67*t9+2.734679923407357d+3*t19*t24*t67*t9-2.73467 3876 < 9923407357d+3*t22*t27*t66*t9-3.342386573053437d+3*t19*t24 3877 = *t65*t9+4.0108638876641245d+3*t109*t17*t65*t9)-9.30525736 3878 > 3491002d-1*t12*t4*t51*(3.342386573053437d+3*t21*t53*t89*t 3879 ? 9+6.077066496460795d+1*t16*t43*t62*t9-6.077066496460795d+ 3880 @ 1*t46*t61*t9+1.8231199489382385d+2*t40*t45*t61*t9-1.82311 3881 1 99489382385d+2*t16*t43*t60*t9+3.646239897876477d+2*t37*t4 3882 2 2*t60*t9-3.646239897876477d+2*t40*t45*t59*t9+6.0770664964 3883 3 60795d+2*t34*t39*t59*t9-6.077066496460795d+2*t37*t42*t58* 3884 4 t9+9.115599744691192d+2*t31*t36*t58*t9-9.115599744691192d 3885 5 +2*t34*t39*t57*t9+1.276183964256767d+3*t28*t33*t57*t9-1.2 3886 6 76183964256767d+3*t31*t36*t56*t9+1.7015786190090226d+3*t2 3887 7 5*t30*t56*t9-1.7015786190090226d+3*t28*t33*t55*t9+2.18774 3888 8 3938725886d+3*t22*t27*t55*t9-2.187743938725886d+3*t25*t30 3889 9 *t54*t9+2.734679923407357d+3*t19*t24*t54*t9-2.73467992340 3890 : 7357d+3*t22*t27*t53*t9-3.342386573053437d+3*t19*t24*t52*t 3891 ; 9+4.0108638876641245d+3*t109*t17*t52*t9)-9.30525736349100 3892 < 2d-1*t12*t3*t4*(3.342386573053437d+3*t20*t21*t89*t9+6.077 3893 = 066496460795d+1*t16*t43*t47*t9-6.077066496460795d+1*t44*t 3894 > 46*t9+1.8231199489382385d+2*t40*t44*t45*t9-3.646239897876 3895 ? 477d+2*t38*t40*t45*t9-1.8231199489382385d+2*t16*t41*t43*t 3896 @ 9+3.646239897876477d+2*t37*t41*t42*t9-6.077066496460795d+ 3897 1 2*t35*t37*t42*t9+6.077066496460795d+2*t34*t38*t39*t9-9.11 3898 2 5599744691192d+2*t32*t34*t39*t9+9.115599744691192d+2*t31* 3899 3 t35*t36*t9-1.276183964256767d+3*t29*t31*t36*t9+1.27618396 3900 4 4256767d+3*t28*t32*t33*t9-1.7015786190090226d+3*t26*t28*t 3901 5 33*t9+1.7015786190090226d+3*t25*t29*t30*t9-2.187743938725 3902 6 886d+3*t23*t25*t30*t9+2.187743938725886d+3*t22*t26*t27*t9 3903 7 -2.734679923407357d+3*t20*t22*t27*t9+2.734679923407357d+3 3904 8 *t19*t23*t24*t9-3.342386573053437d+3*t13*t19*t24*t9+4.010 3905 9 8638876641245d+3*t109*t13*t17*t9)-5.417385299101419d-3*ga 3906 : mmaaa*t103*t108*t50*t64-1.2407009817988002d+0*t106*t12*t5 3907 ; *t51-9.305257363491002d-1*t102*t106*t4*t51+t104*t108*t51- 3908 < 1.2407009817988002d+0*t105*t12*t3*t5-9.305257363491002d-1 3909 = *t102*t105*t3*t4+t104*t107*t3)*wght+Mmat2(iq,D2_RA_TA) 3910 Mmat2(iq,D2_RA_TB) = Mmat2(iq,D2_RA_TB) 3911 Mmat2(iq,D2_GAA_TA) = 1.0d+0*(-3.361156316208638d-3*t105*t12 3912 1 *t94*t96-1.890381166699927d-3*t106*t12*t50*t96+3.61210462 3913 2 5279974d-3*t1*t107*t64*t94+2.0315194871630324d-3*t1*t108* 3914 3 t50*t64)*wght+Mmat2(iq,D2_GAA_TA) 3915 Mmat2(iq,D2_GAA_TB) = Mmat2(iq,D2_GAA_TB) 3916 Mmat2(iq,D2_TA_TA) = 1.0d+0*(t51*t64*(4.4d+2*t21*t78*t89+9.6 3917 1 8d+2*t21*t77*t89+8.0d+0*t46*t87+8.0d+0*t16*t43*t87+8.0d+0 3918 2 *t46*t86+2.4d+1*t40*t45*t86+3.2d+1*t16*t43*t86+7.2d+1*t40 3919 3 *t45*t85+2.4d+1*t16*t43*t85+4.8d+1*t37*t42*t85+4.8d+1*t40 3920 4 *t45*t84+1.28d+2*t37*t42*t84+8.0d+1*t34*t39*t84+8.0d+1*t3 3921 5 7*t42*t83+2.0d+2*t34*t39*t83+1.2d+2*t31*t36*t83+1.2d+2*t3 3922 6 4*t39*t82+2.88d+2*t31*t36*t82+1.68d+2*t28*t33*t82+1.68d+2 3923 7 *t31*t36*t81+3.92d+2*t28*t33*t81+2.24d+2*t25*t30*t81+2.24 3924 8 d+2*t28*t33*t80+5.12d+2*t25*t30*t80+2.88d+2*t22*t27*t80+2 3925 9 .88d+2*t25*t30*t79+6.48d+2*t22*t27*t79+3.6d+2*t19*t24*t79 3926 : +3.6d+2*t22*t27*t78+8.0d+2*t19*t24*t78+4.4d+2*t19*t24*t77 3927 ; +5.28d+2*t109*t17*t77)+t3*t64*(4.4d+2*t21*t66*t89+9.68d+2 3928 < *t21*t65*t89+8.0d+0*t46*t75+8.0d+0*t16*t43*t75+8.0d+0*t46 3929 = *t74+2.4d+1*t40*t45*t74+3.2d+1*t16*t43*t74+7.2d+1*t40*t45 3930 > *t73+2.4d+1*t16*t43*t73+4.8d+1*t37*t42*t73+4.8d+1*t40*t45 3931 ? *t72+1.28d+2*t37*t42*t72+8.0d+1*t34*t39*t72+8.0d+1*t37*t4 3932 @ 2*t71+2.0d+2*t34*t39*t71+1.2d+2*t31*t36*t71+1.2d+2*t34*t3 3933 1 9*t70+2.88d+2*t31*t36*t70+1.68d+2*t28*t33*t70+1.68d+2*t31 3934 2 *t36*t69+3.92d+2*t28*t33*t69+2.24d+2*t25*t30*t69+2.24d+2* 3935 3 t28*t33*t68+5.12d+2*t25*t30*t68+2.88d+2*t22*t27*t68+2.88d 3936 4 +2*t25*t30*t67+6.48d+2*t22*t27*t67+3.6d+2*t19*t24*t67+3.6 3937 5 d+2*t22*t27*t66+8.0d+2*t19*t24*t66+4.4d+2*t19*t24*t65+5.2 3938 6 8d+2*t109*t17*t65)-9.305257363491002d-1*t12*t4*t51*(4.4d+ 3939 7 2*t21*t53*t89+9.68d+2*t21*t52*t89+8.0d+0*t46*t62+8.0d+0*t 3940 8 16*t43*t62+8.0d+0*t46*t61+2.4d+1*t40*t45*t61+3.2d+1*t16*t 3941 9 43*t61+7.2d+1*t40*t45*t60+2.4d+1*t16*t43*t60+4.8d+1*t37*t 3942 : 42*t60+4.8d+1*t40*t45*t59+1.28d+2*t37*t42*t59+8.0d+1*t34* 3943 ; t39*t59+8.0d+1*t37*t42*t58+2.0d+2*t34*t39*t58+1.2d+2*t31* 3944 < t36*t58+1.2d+2*t34*t39*t57+2.88d+2*t31*t36*t57+1.68d+2*t2 3945 = 8*t33*t57+1.68d+2*t31*t36*t56+3.92d+2*t28*t33*t56+2.24d+2 3946 > *t25*t30*t56+2.24d+2*t28*t33*t55+5.12d+2*t25*t30*t55+2.88 3947 ? d+2*t22*t27*t55+2.88d+2*t25*t30*t54+6.48d+2*t22*t27*t54+3 3948 @ .6d+2*t19*t24*t54+3.6d+2*t22*t27*t53+8.0d+2*t19*t24*t53+4 3949 1 .4d+2*t19*t24*t52+5.28d+2*t109*t17*t52)-9.305257363491002 3950 2 d-1*t12*t3*t4*(4.4d+2*t20*t21*t89+9.68d+2*t13*t21*t89+8.0 3951 3 d+0*t46*t47+8.0d+0*t16*t43*t47+8.0d+0*t44*t46+2.4d+1*t40* 3952 4 t44*t45+7.2d+1*t40*t41*t45+4.8d+1*t38*t40*t45+3.2d+1*t16* 3953 5 t43*t44+2.4d+1*t16*t41*t43+4.8d+1*t37*t41*t42+1.28d+2*t37 3954 6 *t38*t42+8.0d+1*t35*t37*t42+8.0d+1*t34*t38*t39+2.0d+2*t34 3955 7 *t35*t39+1.2d+2*t32*t34*t39+1.2d+2*t31*t35*t36+2.88d+2*t3 3956 8 1*t32*t36+1.68d+2*t29*t31*t36+1.68d+2*t28*t32*t33+3.92d+2 3957 9 *t28*t29*t33+2.24d+2*t26*t28*t33+2.24d+2*t25*t29*t30+5.12 3958 : d+2*t25*t26*t30+2.88d+2*t23*t25*t30+2.88d+2*t22*t26*t27+6 3959 ; .48d+2*t22*t23*t27+3.6d+2*t20*t22*t27+3.6d+2*t19*t23*t24+ 3960 < 8.0d+2*t19*t20*t24+4.4d+2*t13*t19*t24+5.28d+2*t109*t13*t1 3961 = 7))*wght+Mmat2(iq,D2_TA_TA) 3962 Mmat2(iq,D2_TA_TB) = Mmat2(iq,D2_TA_TB) 3963 Mmat2(iq,D2_TB_TB) = Mmat2(iq,D2_TB_TB) 3964 elseif (rhoa.le.tol_rho.and.rhob.gt.tol_rho) then 3965 t1 = 1/rhob**2.6666666666666666d+0 3966 t2 = 4.492667444378077d-3*gammabb*t1+1.0d+0 3967 t3 = 8.04d-1*(1.0d+0-1.0d+0/t2)+1.0d+0 3968 t4 = rhob**1.3333333333333333d+0 3969 t5 = rhob**3.333333333333333d-1 3970 t6 = 1/t5 3971 t7 = 1/rhob 3972 t8 = 1.282782438530422d-1*t6-2.63857249068588d-4*t7 3973 t9 = rhob**6.666666666666666d-1 3974 t10 = exp(-2.4308265985843178d+2*t9) 3975 t11 = t10*t8+2.63857249068588d-4*t7-1.924173657795633d-1*t6+ 3976 1 3.544907701811032d+0*erf(1.5591108358883013d+1*t5) 3977 t12 = 1.0d+0-4.275941461768073d-2*t11*t6 3978 t13 = param(12) 3979 t14 = rhob**1.6666666666666669d+0 3980 t15 = 9.115599744691192d+0*t14 3981 t16 = t15-2.0d+0*taub 3982 t17 = t16**11 3983 t18 = 2.0d+0*taub+t15 3984 t19 = 1/t18**11 3985 t20 = param(11) 3986 t21 = t16**10 3987 t22 = 1/t18**10 3988 t23 = param(10) 3989 t24 = t16**9 3990 t25 = 1/t18**9 3991 t26 = param(9) 3992 t27 = t16**8 3993 t28 = 1/t18**8 3994 t29 = param(8) 3995 t30 = t16**7 3996 t31 = 1/t18**7 3997 t32 = param(7) 3998 t33 = t16**6 3999 t34 = 1/t18**6 4000 t35 = param(6) 4001 t36 = t16**5 4002 t37 = 1/t18**5 4003 t38 = param(5) 4004 t39 = t16**4 4005 t40 = 1/t18**4 4006 t41 = param(4) 4007 t42 = t16**3 4008 t43 = 1/t18**3 4009 t44 = param(3) 4010 t45 = t16**2 4011 t46 = 1/t18**2 4012 t47 = param(2) 4013 t48 = 1/t18 4014 t49 = t16*t47*t48+t44*t45*t46+t41*t42*t43+t38*t39*t40+t35*t3 4015 1 6*t37+t32*t33*t34+t29*t30*t31+t26*t27*t28+t23*t24*t25+t20 4016 2 *t21*t22+t13*t17*t19+param(1) 4017 t50 = exp(-3.6802889260199856d-3*gammabb*t1) 4018 t51 = 5.52d-1*(1.0d+0-t50)+1.0d+0 4019 t52 = param(24) 4020 t53 = param(23) 4021 t54 = param(22) 4022 t55 = param(21) 4023 t56 = param(20) 4024 t57 = param(19) 4025 t58 = param(18) 4026 t59 = param(17) 4027 t60 = param(16) 4028 t61 = param(15) 4029 t62 = param(14) 4030 t63 = t16*t48*t62+t45*t46*t61+t42*t43*t60+t39*t40*t59+t36*t3 4031 1 7*t58+t33*t34*t57+t30*t31*t56+t27*t28*t55+t24*t25*t54+t21 4032 2 *t22*t53+t17*t19*t52+param(13) 4033 t64 = 9.305257363491002d-1*t12*t4-9.305257363491002d-1*t4 4034 t65 = param(36) 4035 t66 = param(35) 4036 t67 = param(34) 4037 t68 = param(33) 4038 t69 = param(32) 4039 t70 = param(31) 4040 t71 = param(30) 4041 t72 = param(29) 4042 t73 = param(28) 4043 t74 = param(27) 4044 t75 = param(26) 4045 t76 = t16*t48*t75+t45*t46*t74+t42*t43*t73+t39*t40*t72+t36*t3 4046 1 7*t71+t33*t34*t70+t30*t31*t69+t27*t28*t68+t24*t25*t67+t21 4047 2 *t22*t66+t17*t19*t65+param(25) 4048 t77 = param(48) 4049 t78 = param(47) 4050 t79 = param(46) 4051 t80 = param(45) 4052 t81 = param(44) 4053 t82 = param(43) 4054 t83 = param(42) 4055 t84 = param(41) 4056 t85 = param(40) 4057 t86 = param(39) 4058 t87 = param(38) 4059 t88 = t16*t48*t87+t45*t46*t86+t42*t43*t85+t39*t40*t84+t36*t3 4060 1 7*t83+t33*t34*t82+t30*t31*t81+t27*t28*t80+t24*t25*t79+t21 4061 2 *t22*t78+t17*t19*t77+param(37) 4062 t89 = 1/t18**12 4063 t90 = -1.6711932865267184d+2*t13*t17*t89*t9+1.51926662411519 4064 1 86d+1*t47*t48*t9-1.5192666241151986d+1*t16*t46*t47*t9+3.0 4065 2 38533248230397d+1*t16*t44*t46*t9-3.038533248230397d+1*t43 4066 3 *t44*t45*t9+4.5577998723455965d+1*t41*t43*t45*t9-4.557799 4067 4 8723455965d+1*t40*t41*t42*t9+6.077066496460795d+1*t38*t40 4068 5 *t42*t9-6.077066496460795d+1*t37*t38*t39*t9+7.59633312057 4069 6 5993d+1*t35*t37*t39*t9-7.596333120575993d+1*t34*t35*t36*t 4070 7 9+9.115599744691193d+1*t32*t34*t36*t9-9.115599744691193d+ 4071 8 1*t31*t32*t33*t9+1.0634866368806391d+2*t29*t31*t33*t9-1.0 4072 9 634866368806391d+2*t28*t29*t30*t9+1.2154132992921589d+2*t 4073 : 26*t28*t30*t9-1.2154132992921589d+2*t25*t26*t27*t9+1.3673 4074 ; 399617036788d+2*t23*t25*t27*t9-1.3673399617036788d+2*t22* 4075 < t23*t24*t9+1.5192666241151986d+2*t20*t22*t24*t9-1.5192666 4076 = 241151986d+2*t19*t20*t21*t9+1.6711932865267184d+2*t13*t19 4077 > *t21*t9 4078 t91 = -1.6711932865267184d+2*t17*t52*t89*t9+1.51926662411519 4079 1 86d+1*t48*t62*t9-1.5192666241151986d+1*t16*t46*t62*t9+3.0 4080 2 38533248230397d+1*t16*t46*t61*t9-3.038533248230397d+1*t43 4081 3 *t45*t61*t9+4.5577998723455965d+1*t43*t45*t60*t9-4.557799 4082 4 8723455965d+1*t40*t42*t60*t9+6.077066496460795d+1*t40*t42 4083 5 *t59*t9-6.077066496460795d+1*t37*t39*t59*t9+7.59633312057 4084 6 5993d+1*t37*t39*t58*t9-7.596333120575993d+1*t34*t36*t58*t 4085 7 9+9.115599744691193d+1*t34*t36*t57*t9-9.115599744691193d+ 4086 8 1*t31*t33*t57*t9+1.0634866368806391d+2*t31*t33*t56*t9-1.0 4087 9 634866368806391d+2*t28*t30*t56*t9+1.2154132992921589d+2*t 4088 : 28*t30*t55*t9-1.2154132992921589d+2*t25*t27*t55*t9+1.3673 4089 ; 399617036788d+2*t25*t27*t54*t9-1.3673399617036788d+2*t22* 4090 < t24*t54*t9+1.5192666241151986d+2*t22*t24*t53*t9-1.5192666 4091 = 241151986d+2*t19*t21*t53*t9+1.6711932865267184d+2*t19*t21 4092 > *t52*t9 4093 t92 = -1.6711932865267184d+2*t17*t65*t89*t9+1.51926662411519 4094 1 86d+1*t48*t75*t9-1.5192666241151986d+1*t16*t46*t75*t9+3.0 4095 2 38533248230397d+1*t16*t46*t74*t9-3.038533248230397d+1*t43 4096 3 *t45*t74*t9+4.5577998723455965d+1*t43*t45*t73*t9-4.557799 4097 4 8723455965d+1*t40*t42*t73*t9+6.077066496460795d+1*t40*t42 4098 5 *t72*t9-6.077066496460795d+1*t37*t39*t72*t9+7.59633312057 4099 6 5993d+1*t37*t39*t71*t9-7.596333120575993d+1*t34*t36*t71*t 4100 7 9+9.115599744691193d+1*t34*t36*t70*t9-9.115599744691193d+ 4101 8 1*t31*t33*t70*t9+1.0634866368806391d+2*t31*t33*t69*t9-1.0 4102 9 634866368806391d+2*t28*t30*t69*t9+1.2154132992921589d+2*t 4103 : 28*t30*t68*t9-1.2154132992921589d+2*t25*t27*t68*t9+1.3673 4104 ; 399617036788d+2*t25*t27*t67*t9-1.3673399617036788d+2*t22* 4105 < t24*t67*t9+1.5192666241151986d+2*t22*t24*t66*t9-1.5192666 4106 = 241151986d+2*t19*t21*t66*t9+1.6711932865267184d+2*t19*t21 4107 > *t65*t9 4108 t93 = -1.6711932865267184d+2*t17*t77*t89*t9+1.51926662411519 4109 1 86d+1*t48*t87*t9-1.5192666241151986d+1*t16*t46*t87*t9+3.0 4110 2 38533248230397d+1*t16*t46*t86*t9-3.038533248230397d+1*t43 4111 3 *t45*t86*t9+4.5577998723455965d+1*t43*t45*t85*t9-4.557799 4112 4 8723455965d+1*t40*t42*t85*t9+6.077066496460795d+1*t40*t42 4113 5 *t84*t9-6.077066496460795d+1*t37*t39*t84*t9+7.59633312057 4114 6 5993d+1*t37*t39*t83*t9-7.596333120575993d+1*t34*t36*t83*t 4115 7 9+9.115599744691193d+1*t34*t36*t82*t9-9.115599744691193d+ 4116 8 1*t31*t33*t82*t9+1.0634866368806391d+2*t31*t33*t81*t9-1.0 4117 9 634866368806391d+2*t28*t30*t81*t9+1.2154132992921589d+2*t 4118 : 28*t30*t80*t9-1.2154132992921589d+2*t25*t27*t80*t9+1.3673 4119 ; 399617036788d+2*t25*t27*t79*t9-1.3673399617036788d+2*t22* 4120 < t24*t79*t9+1.5192666241151986d+2*t22*t24*t78*t9-1.5192666 4121 = 241151986d+2*t19*t21*t78*t9+1.6711932865267184d+2*t19*t21 4122 > *t77*t9 4123 t94 = 1/t2**2 4124 t95 = 1/rhob**2.3333333333333334d+0 4125 t96 = 1/t4 4126 t97 = 1/rhob**2 4127 t98 = 2.63857249068588d-4*t97-4.2759414617680735d-2*t96 4128 t99 = 5.641895835477563d-1 4129 t100 = 1/t9 4130 t101 = 3.6846026734116505d+1*t10*t100*t99+t10*t98-2.63857249 4131 1 068588d-4*t97+6.41391219265211d-2*t96-1.6205510657228786d 4132 2 +2*t10*t6*t8 4133 t102 = 1.4253138205893576d-2*t11*t96-4.275941461768073d-2*t1 4134 1 01*t6 4135 t103 = 1/rhob**3.6666666666666664d+0 4136 t104 = 1.2407009817988002d+0*t12*t5-1.2407009817988002d+0*t5 4137 1 +9.305257363491002d-1*t102*t4 4138 t105 = -2.2d+1*t13*t17*t89-2.0d+0*t47*t48-2.0d+0*t16*t46*t47 4139 1 -4.0d+0*t16*t44*t46-4.0d+0*t43*t44*t45-6.0d+0*t41*t43*t45 4140 2 -6.0d+0*t40*t41*t42-8.0d+0*t38*t40*t42-8.0d+0*t37*t38*t39 4141 3 -1.0d+1*t35*t37*t39-1.0d+1*t34*t35*t36-1.2d+1*t32*t34*t36 4142 4 -1.2d+1*t31*t32*t33-1.4d+1*t29*t31*t33-1.4d+1*t28*t29*t30 4143 5 -1.6d+1*t26*t28*t30-1.6d+1*t25*t26*t27-1.8d+1*t23*t25*t27 4144 6 -1.8d+1*t22*t23*t24-2.0d+1*t20*t22*t24-2.0d+1*t19*t20*t21 4145 7 -2.2d+1*t13*t19*t21 4146 t106 = -2.2d+1*t17*t52*t89-2.0d+0*t48*t62-2.0d+0*t16*t46*t62 4147 1 -4.0d+0*t16*t46*t61-4.0d+0*t43*t45*t61-6.0d+0*t43*t45*t60 4148 2 -6.0d+0*t40*t42*t60-8.0d+0*t40*t42*t59-8.0d+0*t37*t39*t59 4149 3 -1.0d+1*t37*t39*t58-1.0d+1*t34*t36*t58-1.2d+1*t34*t36*t57 4150 4 -1.2d+1*t31*t33*t57-1.4d+1*t31*t33*t56-1.4d+1*t28*t30*t56 4151 5 -1.6d+1*t28*t30*t55-1.6d+1*t25*t27*t55-1.8d+1*t25*t27*t54 4152 6 -1.8d+1*t22*t24*t54-2.0d+1*t22*t24*t53-2.0d+1*t19*t21*t53 4153 7 -2.2d+1*t19*t21*t52 4154 t107 = -2.2d+1*t17*t65*t89-2.0d+0*t48*t75-2.0d+0*t16*t46*t75 4155 1 -4.0d+0*t16*t46*t74-4.0d+0*t43*t45*t74-6.0d+0*t43*t45*t73 4156 2 -6.0d+0*t40*t42*t73-8.0d+0*t40*t42*t72-8.0d+0*t37*t39*t72 4157 3 -1.0d+1*t37*t39*t71-1.0d+1*t34*t36*t71-1.2d+1*t34*t36*t70 4158 4 -1.2d+1*t31*t33*t70-1.4d+1*t31*t33*t69-1.4d+1*t28*t30*t69 4159 5 -1.6d+1*t28*t30*t68-1.6d+1*t25*t27*t68-1.8d+1*t25*t27*t67 4160 6 -1.8d+1*t22*t24*t67-2.0d+1*t22*t24*t66-2.0d+1*t19*t21*t66 4161 7 -2.2d+1*t19*t21*t65 4162 t108 = -2.2d+1*t17*t77*t89-2.0d+0*t48*t87-2.0d+0*t16*t46*t87 4163 1 -4.0d+0*t16*t46*t86-4.0d+0*t43*t45*t86-6.0d+0*t43*t45*t85 4164 2 -6.0d+0*t40*t42*t85-8.0d+0*t40*t42*t84-8.0d+0*t37*t39*t84 4165 3 -1.0d+1*t37*t39*t83-1.0d+1*t34*t36*t83-1.2d+1*t34*t36*t82 4166 4 -1.2d+1*t31*t33*t82-1.4d+1*t31*t33*t81-1.4d+1*t28*t30*t81 4167 5 -1.6d+1*t28*t30*t80-1.6d+1*t25*t27*t80-1.8d+1*t25*t27*t79 4168 6 -1.8d+1*t22*t24*t79-2.0d+1*t22*t24*t78-2.0d+1*t19*t21*t78 4169 7 -2.2d+1*t19*t21*t77 4170 t109 = 1/t18**13 4171 t110 = gammabb**2 4172 t111 = 1/t2**3 4173 t112 = 1/rhob**6 4174 t113 = 1/rhob**3.3333333333333337d+0 4175 t114 = 1/rhob**3 4176 t115 = -4.275941461768073d-2*t6*(-5.971086789162617d+3*t10*t 4177 1 7*t99-2.4564017822744336d+1*t10*t99/t14-3.241102131445757 4178 2 d+2*t10*t6*t98+5.401836885742928d+1*t10*t8*t96-8.55188292 4179 3 3536147d-2*t95+t10*(5.701255282357431d-2*t95-5.2771449813 4180 4 7176d-4*t114)+2.626185756615557d+4*t10*t100*t8+5.27714498 4181 5 137176d-4*t114)+2.850627641178715d-2*t101*t96-1.900418427 4182 6 4524766d-2*t11*t95 4183 t116 = 1/rhob**7.333333333333333d+0 4184 t117 = 1/rhob**4.666666666666667d+0 4185 t118 = 2.4814019635976003d+0*t102*t5+9.305257363491002d-1*t1 4186 1 15*t4+4.135669939329334d-1*t100*t12-4.135669939329334d-1* 4187 2 t100 4188 t119 = 1/rhob**5 4189 t120 = 1/rhob**6.333333333333333d+0 4190 t121 = 1/rhob**4 4191 t122 = 1/rhob**5.333333333333333d+0 4192 fnc(iq) = 1.0d+0*(t51*t64*t88+t3*t64*t76-9.305257363491002d- 4193 1 1*t12*t4*t51*t63-9.305257363491002d-1*t12*t3*t4*t49)*wght 4194 2 +fnc(iq) 4195 Amat(iq,D1_RB) = 1.0d+0*(8.963083509889702d-3*gammabb*t12*t4 4196 1 9*t94*t95+5.041016444533138d-3*gammabb*t12*t50*t63*t95-9. 4197 2 632279000746596d-3*gammabb*t103*t64*t76*t94+t51*t64*t93+t 4198 3 3*t64*t92-9.305257363491002d-1*t12*t4*t51*t91-9.305257363 4199 4 491002d-1*t12*t3*t4*t90-5.417385299101419d-3*gammabb*t103 4200 5 *t50*t64*t88+t104*t51*t88+t104*t3*t76-1.2407009817988002d 4201 6 +0*t12*t5*t51*t63-9.305257363491002d-1*t102*t4*t51*t63-1. 4202 7 2407009817988002d+0*t12*t3*t49*t5-9.305257363491002d-1*t1 4203 8 02*t3*t4*t49)*wght+Amat(iq,D1_RB) 4204 Cmat(iq,D1_GBB) = 1.0d+0*(-3.361156316208638d-3*t12*t49*t94* 4205 1 t96-1.890381166699927d-3*t12*t50*t63*t96+3.61210462527997 4206 2 4d-3*t1*t64*t76*t94+2.0315194871630324d-3*t1*t50*t64*t88) 4207 3 *wght+Cmat(iq,D1_GBB) 4208 Mmat(iq,D1_TB) = 1.0d+0*(t108*t51*t64+t107*t3*t64-9.30525736 4209 1 3491002d-1*t106*t12*t4*t51-9.305257363491002d-1*t105*t12* 4210 2 t3*t4)*wght+Mmat(iq,D1_TB) 4211 Mmat(iq,D1_TA) = Mmat(iq,D1_TA) 4212 Amat2(iq,D2_RB_RB) = 1.0d+0*((1.7926167019779404d-2*gammabb* 4213 1 t12*t90+1.7926167019779404d-2*gammabb*t102*t49)*t94*t95+( 4214 2 1.0082032889066277d-2*gammabb*t12*t50*t91+1.0082032889066 4215 3 277d-2*gammabb*t102*t50*t63)*t95+t103*(-1.926455800149319 4216 4 3d-2*gammabb*t64*t92-1.9264558001493193d-2*gammabb*t104*t 4217 5 76)*t94+3.5318356336070855d-2*gammabb*t117*t64*t76*t94-8. 4218 6 963083509889707d-3*gammabb*t113*t12*t49*t94+t103*(-1.0834 4219 7 770598202839d-2*gammabb*t50*t64*t93-1.0834770598202839d-2 4220 8 *gammabb*t104*t50*t88)+2*t104*t51*t93+2*t104*t3*t92-2.481 4221 9 4019635976003d+0*t12*t5*t51*t91-1.8610514726982003d+0*t10 4222 : 2*t4*t51*t91-2.4814019635976003d+0*t12*t3*t5*t90-1.861051 4223 ; 4726982003d+0*t102*t3*t4*t90+t51*t64*(2.5389881826654315d 4224 < +4*t21*t4*t78*t89-1.1141288576844789d+2*t17*t6*t77*t89-5. 4225 = 585774001863949d+4*t21*t4*t77*t89+1.0128444160767991d+1*t 4226 > 48*t6*t87-1.0128444160767991d+1*t16*t46*t6*t87-4.61634215 4227 ? 03007845d+2*t4*t46*t87+4.6163421503007845d+2*t16*t4*t43*t 4228 @ 87+2.0256888321535982d+1*t16*t46*t6*t86-2.025688832153598 4229 1 2d+1*t43*t45*t6*t86+4.6163421503007845d+2*t4*t46*t86+1.38 4230 2 49026450902355d+3*t4*t40*t45*t86-1.846536860120314d+3*t16 4231 3 *t4*t43*t86+3.038533248230397d+1*t43*t45*t6*t85-3.0385332 4232 4 48230397d+1*t40*t42*t6*t85-4.1547079352707067d+3*t4*t40*t 4233 5 45*t85+1.3849026450902355d+3*t16*t4*t43*t85+2.76980529018 4234 6 0471d+3*t37*t4*t42*t85+4.0513776643071964d+1*t40*t42*t6*t 4235 7 84-4.0513776643071964d+1*t37*t39*t6*t84+2.769805290180471 4236 8 d+3*t4*t40*t45*t84-7.386147440481255d+3*t37*t4*t42*t84+4. 4237 9 616342150300784d+3*t34*t39*t4*t84+5.064222080383994d+1*t3 4238 : 7*t39*t6*t83-5.064222080383994d+1*t34*t36*t6*t83+4.616342 4239 ; 150300784d+3*t37*t4*t42*t83-1.154085537575196d+4*t34*t39* 4240 < t4*t83+6.924513225451178d+3*t31*t36*t4*t83+6.077066496460 4241 = 795d+1*t34*t36*t6*t82-6.077066496460795d+1*t31*t33*t6*t82 4242 > +6.924513225451178d+3*t34*t39*t4*t82-1.661883174108283d+4 4243 ? *t31*t36*t4*t82+9.694318515631648d+3*t28*t33*t4*t82+7.089 4244 @ 910912537593d+1*t31*t33*t6*t81-7.089910912537593d+1*t28*t 4245 1 30*t6*t81+9.694318515631648d+3*t31*t36*t4*t81-2.262007653 4246 2 6473846d+4*t28*t33*t4*t81+1.2925758020842196d+4*t25*t30*t 4247 3 4*t81+8.102755328614393d+1*t28*t30*t6*t80-8.1027553286143 4248 4 93d+1*t25*t27*t6*t80+1.2925758020842196d+4*t28*t33*t4*t80 4249 5 -2.954458976192502d+4*t25*t30*t4*t80+1.6618831741082823d+ 4250 6 4*t22*t27*t4*t80+9.115599744691191d+1*t25*t27*t6*t79-9.11 4251 7 5599744691191d+1*t22*t24*t6*t79+1.6618831741082823d+4*t25 4252 8 *t30*t4*t79-3.7392371417436354d+4*t22*t27*t4*t79+2.077353 4253 9 9676353528d+4*t19*t24*t4*t79+1.012844416076799d+2*t22*t24 4254 : *t6*t78-1.012844416076799d+2*t19*t21*t6*t78+2.07735396763 4255 ; 53528d+4*t22*t27*t4*t78-4.616342150300784d+4*t19*t24*t4*t 4256 < 78+1.1141288576844789d+2*t19*t21*t6*t77+2.538988182665431 4257 = 5d+4*t19*t24*t4*t77+3.046785819198518d+4*t109*t17*t4*t77) 4258 > +t3*t64*(2.5389881826654315d+4*t21*t4*t66*t89-1.114128857 4259 ? 6844789d+2*t17*t6*t65*t89-5.585774001863949d+4*t21*t4*t65 4260 @ *t89+1.0128444160767991d+1*t48*t6*t75-1.0128444160767991d 4261 1 +1*t16*t46*t6*t75-4.6163421503007845d+2*t4*t46*t75+4.6163 4262 2 421503007845d+2*t16*t4*t43*t75+2.0256888321535982d+1*t16* 4263 3 t46*t6*t74-2.0256888321535982d+1*t43*t45*t6*t74+4.6163421 4264 4 503007845d+2*t4*t46*t74+1.3849026450902355d+3*t4*t40*t45* 4265 5 t74-1.846536860120314d+3*t16*t4*t43*t74+3.038533248230397 4266 6 d+1*t43*t45*t6*t73-3.038533248230397d+1*t40*t42*t6*t73-4. 4267 7 1547079352707067d+3*t4*t40*t45*t73+1.3849026450902355d+3* 4268 8 t16*t4*t43*t73+2.769805290180471d+3*t37*t4*t42*t73+4.0513 4269 9 776643071964d+1*t40*t42*t6*t72-4.0513776643071964d+1*t37* 4270 : t39*t6*t72+2.769805290180471d+3*t4*t40*t45*t72-7.38614744 4271 ; 0481255d+3*t37*t4*t42*t72+4.616342150300784d+3*t34*t39*t4 4272 < *t72+5.064222080383994d+1*t37*t39*t6*t71-5.06422208038399 4273 = 4d+1*t34*t36*t6*t71+4.616342150300784d+3*t37*t4*t42*t71-1 4274 > .154085537575196d+4*t34*t39*t4*t71+6.924513225451178d+3*t 4275 ? 31*t36*t4*t71+6.077066496460795d+1*t34*t36*t6*t70-6.07706 4276 @ 6496460795d+1*t31*t33*t6*t70+6.924513225451178d+3*t34*t39 4277 1 *t4*t70-1.661883174108283d+4*t31*t36*t4*t70+9.69431851563 4278 2 1648d+3*t28*t33*t4*t70+7.089910912537593d+1*t31*t33*t6*t6 4279 3 9-7.089910912537593d+1*t28*t30*t6*t69+9.694318515631648d+ 4280 4 3*t31*t36*t4*t69-2.2620076536473846d+4*t28*t33*t4*t69+1.2 4281 5 925758020842196d+4*t25*t30*t4*t69+8.102755328614393d+1*t2 4282 6 8*t30*t6*t68-8.102755328614393d+1*t25*t27*t6*t68+1.292575 4283 7 8020842196d+4*t28*t33*t4*t68-2.954458976192502d+4*t25*t30 4284 8 *t4*t68+1.6618831741082823d+4*t22*t27*t4*t68+9.1155997446 4285 9 91191d+1*t25*t27*t6*t67-9.115599744691191d+1*t22*t24*t6*t 4286 : 67+1.6618831741082823d+4*t25*t30*t4*t67-3.739237141743635 4287 ; 4d+4*t22*t27*t4*t67+2.0773539676353528d+4*t19*t24*t4*t67+ 4288 < 1.012844416076799d+2*t22*t24*t6*t66-1.012844416076799d+2* 4289 = t19*t21*t6*t66+2.0773539676353528d+4*t22*t27*t4*t66-4.616 4290 > 342150300784d+4*t19*t24*t4*t66+1.1141288576844789d+2*t19* 4291 ? t21*t6*t65+2.5389881826654315d+4*t19*t24*t4*t65+3.0467858 4292 @ 19198518d+4*t109*t17*t4*t65)-9.305257363491002d-1*t12*t4* 4293 1 t51*(-1.1141288576844789d+2*t17*t52*t6*t89+2.538988182665 4294 2 4315d+4*t21*t4*t53*t89-5.585774001863949d+4*t21*t4*t52*t8 4295 3 9+1.0128444160767991d+1*t48*t6*t62-1.0128444160767991d+1* 4296 4 t16*t46*t6*t62-4.6163421503007845d+2*t4*t46*t62+4.6163421 4297 5 503007845d+2*t16*t4*t43*t62+2.0256888321535982d+1*t16*t46 4298 6 *t6*t61-2.0256888321535982d+1*t43*t45*t6*t61+4.6163421503 4299 7 007845d+2*t4*t46*t61+1.3849026450902355d+3*t4*t40*t45*t61 4300 8 -1.846536860120314d+3*t16*t4*t43*t61+3.038533248230397d+1 4301 9 *t43*t45*t6*t60-3.038533248230397d+1*t40*t42*t6*t60-4.154 4302 : 7079352707067d+3*t4*t40*t45*t60+1.3849026450902355d+3*t16 4303 ; *t4*t43*t60+2.769805290180471d+3*t37*t4*t42*t60+4.0513776 4304 < 643071964d+1*t40*t42*t59*t6-4.0513776643071964d+1*t37*t39 4305 = *t59*t6+5.064222080383994d+1*t37*t39*t58*t6-5.06422208038 4306 > 3994d+1*t34*t36*t58*t6+6.077066496460795d+1*t34*t36*t57*t 4307 ? 6-6.077066496460795d+1*t31*t33*t57*t6+7.089910912537593d+ 4308 @ 1*t31*t33*t56*t6-7.089910912537593d+1*t28*t30*t56*t6+8.10 4309 1 2755328614393d+1*t28*t30*t55*t6-8.102755328614393d+1*t25* 4310 2 t27*t55*t6+9.115599744691191d+1*t25*t27*t54*t6-9.11559974 4311 3 4691191d+1*t22*t24*t54*t6+1.012844416076799d+2*t22*t24*t5 4312 4 3*t6-1.012844416076799d+2*t19*t21*t53*t6+1.11412885768447 4313 5 89d+2*t19*t21*t52*t6+2.769805290180471d+3*t4*t40*t45*t59- 4314 6 7.386147440481255d+3*t37*t4*t42*t59+4.616342150300784d+3* 4315 7 t34*t39*t4*t59+4.616342150300784d+3*t37*t4*t42*t58-1.1540 4316 8 85537575196d+4*t34*t39*t4*t58+6.924513225451178d+3*t31*t3 4317 9 6*t4*t58+6.924513225451178d+3*t34*t39*t4*t57-1.6618831741 4318 : 08283d+4*t31*t36*t4*t57+9.694318515631648d+3*t28*t33*t4*t 4319 ; 57+9.694318515631648d+3*t31*t36*t4*t56-2.2620076536473846 4320 < d+4*t28*t33*t4*t56+1.2925758020842196d+4*t25*t30*t4*t56+1 4321 = .2925758020842196d+4*t28*t33*t4*t55-2.954458976192502d+4* 4322 > t25*t30*t4*t55+1.6618831741082823d+4*t22*t27*t4*t55+1.661 4323 ? 8831741082823d+4*t25*t30*t4*t54-3.7392371417436354d+4*t22 4324 @ *t27*t4*t54+2.0773539676353528d+4*t19*t24*t4*t54+2.077353 4325 1 9676353528d+4*t22*t27*t4*t53-4.616342150300784d+4*t19*t24 4326 2 *t4*t53+2.5389881826654315d+4*t19*t24*t4*t52+3.0467858191 4327 3 98518d+4*t109*t17*t4*t52)-9.305257363491002d-1*t12*t3*t4* 4328 4 (-1.1141288576844789d+2*t13*t17*t6*t89+2.5389881826654315 4329 5 d+4*t20*t21*t4*t89-5.585774001863949d+4*t13*t21*t4*t89+1. 4330 6 0128444160767991d+1*t47*t48*t6-1.0128444160767991d+1*t16* 4331 7 t46*t47*t6+2.0256888321535982d+1*t16*t44*t46*t6-2.0256888 4332 8 321535982d+1*t43*t44*t45*t6+3.038533248230397d+1*t41*t43* 4333 9 t45*t6-3.038533248230397d+1*t40*t41*t42*t6+4.051377664307 4334 : 1964d+1*t38*t40*t42*t6-4.0513776643071964d+1*t37*t38*t39* 4335 ; t6+5.064222080383994d+1*t35*t37*t39*t6-5.064222080383994d 4336 < +1*t34*t35*t36*t6+6.077066496460795d+1*t32*t34*t36*t6-6.0 4337 = 77066496460795d+1*t31*t32*t33*t6+7.089910912537593d+1*t29 4338 > *t31*t33*t6-7.089910912537593d+1*t28*t29*t30*t6+8.1027553 4339 ? 28614393d+1*t26*t28*t30*t6-8.102755328614393d+1*t25*t26*t 4340 @ 27*t6+9.115599744691191d+1*t23*t25*t27*t6-9.1155997446911 4341 1 91d+1*t22*t23*t24*t6+1.012844416076799d+2*t20*t22*t24*t6- 4342 2 1.012844416076799d+2*t19*t20*t21*t6+1.1141288576844789d+2 4343 3 *t13*t19*t21*t6-4.6163421503007845d+2*t4*t46*t47+4.616342 4344 4 1503007845d+2*t16*t4*t43*t47+4.6163421503007845d+2*t4*t44 4345 5 *t46+1.3849026450902355d+3*t4*t40*t44*t45-4.1547079352707 4346 6 067d+3*t4*t40*t41*t45+2.769805290180471d+3*t38*t4*t40*t45 4347 7 -1.846536860120314d+3*t16*t4*t43*t44+1.3849026450902355d+ 4348 8 3*t16*t4*t41*t43+2.769805290180471d+3*t37*t4*t41*t42-7.38 4349 9 6147440481255d+3*t37*t38*t4*t42+4.616342150300784d+3*t35* 4350 : t37*t4*t42+4.616342150300784d+3*t34*t38*t39*t4-1.15408553 4351 ; 7575196d+4*t34*t35*t39*t4+6.924513225451178d+3*t32*t34*t3 4352 < 9*t4+6.924513225451178d+3*t31*t35*t36*t4-1.66188317410828 4353 = 3d+4*t31*t32*t36*t4+9.694318515631648d+3*t29*t31*t36*t4+9 4354 > .694318515631648d+3*t28*t32*t33*t4-2.2620076536473846d+4* 4355 ? t28*t29*t33*t4+1.2925758020842196d+4*t26*t28*t33*t4+1.292 4356 @ 5758020842196d+4*t25*t29*t30*t4-2.954458976192502d+4*t25* 4357 1 t26*t30*t4+1.6618831741082823d+4*t23*t25*t30*t4+1.6618831 4358 2 741082823d+4*t22*t26*t27*t4-3.7392371417436354d+4*t22*t23 4359 3 *t27*t4+2.0773539676353528d+4*t20*t22*t27*t4+2.0773539676 4360 4 353528d+4*t19*t23*t24*t4-4.616342150300784d+4*t19*t20*t24 4361 5 *t4+2.5389881826654315d+4*t13*t19*t24*t4+3.04678581919851 4362 6 8d+4*t109*t13*t17*t4)+1.9863746096705204d-2*gammabb*t117* 4363 7 t50*t64*t88-5.316678166471045d-5*t110*t116*t50*t64*t88+t1 4364 8 18*t51*t88-2.3079800683637772d-4*t110*t111*t116*t64*t76+t 4365 9 118*t3*t76+t100*(-4.135669939329334d-1*t12*t51*t63-4.1356 4366 : 69939329334d-1*t12*t3*t49)-2.4814019635976003d+0*t102*t5* 4367 ; t51*t63-9.305257363491002d-1*t115*t4*t51*t63-5.0410164445 4368 < 33138d-3*gammabb*t113*t12*t50*t63+4.947305865786653d-5*t1 4369 = 10*t112*t12*t50*t63-2.4814019635976003d+0*t102*t3*t49*t5- 4370 > 9.305257363491002d-1*t115*t3*t4*t49+2.1476348525932504d-4 4371 ? *t110*t111*t112*t12*t49)*wght+Amat2(iq,D2_RB_RB) 4372 Cmat2(iq,D2_RB_GBB) = 1.0d+0*((-3.361156316208638d-3*t12*t90 4373 1 -3.361156316208638d-3*t102*t49)*t94*t96+(-1.8903811666999 4374 2 27d-3*t12*t50*t91-1.890381166699927d-3*t102*t50*t63)*t96+ 4375 3 4.481541754944851d-3*t12*t49*t94*t95+2.520508222266569d-3 4376 4 *t12*t50*t63*t95+t1*(3.612104625279974d-3*t64*t92+3.61210 4377 5 4625279974d-3*t104*t76)*t94-9.632279000746596d-3*t103*t64 4378 6 *t76*t94+t1*(2.0315194871630324d-3*t50*t64*t93+2.03151948 4379 7 71630324d-3*t104*t50*t88)+1.9937543124266421d-5*gammabb*t 4380 8 120*t50*t64*t88-5.417385299101419d-3*t103*t50*t64*t88+8.6 4381 9 54925256364164d-5*gammabb*t111*t120*t64*t76-1.85523969966 4382 : 9995d-5*gammabb*t119*t12*t50*t63-8.05363069722469d-5*gamm 4383 ; abb*t111*t119*t12*t49)*wght+Cmat2(iq,D2_RB_GBB) 4384 Cmat2(iq,D2_GBB_GBB) = 1.0d+0*(-7.476578671599909d-6*t122*t5 4385 1 0*t64*t88-3.245596971136562d-5*t111*t122*t64*t76+6.957148 4386 2 873762482d-6*t12*t121*t50*t63+3.020111511459258d-5*t111*t 4387 3 12*t121*t49)*wght+Cmat2(iq,D2_GBB_GBB) 4388 Mmat2(iq,D2_RB_TA) = Mmat2(iq,D2_RB_TA) 4389 Mmat2(iq,D2_RB_TB) = 1.0d+0*(8.963083509889702d-3*gammabb*t1 4390 1 05*t12*t94*t95+5.041016444533138d-3*gammabb*t106*t12*t50* 4391 2 t95-9.632279000746596d-3*gammabb*t103*t107*t64*t94+t51*t6 4392 3 4*(3.342386573053437d+3*t21*t78*t89*t9+6.077066496460795d 4393 4 +1*t16*t43*t87*t9-6.077066496460795d+1*t46*t86*t9+1.82311 4394 5 99489382385d+2*t40*t45*t86*t9-1.8231199489382385d+2*t16*t 4395 6 43*t85*t9+3.646239897876477d+2*t37*t42*t85*t9-3.646239897 4396 7 876477d+2*t40*t45*t84*t9+6.077066496460795d+2*t34*t39*t84 4397 8 *t9-6.077066496460795d+2*t37*t42*t83*t9+9.115599744691192 4398 9 d+2*t31*t36*t83*t9-9.115599744691192d+2*t34*t39*t82*t9+1. 4399 : 276183964256767d+3*t28*t33*t82*t9-1.276183964256767d+3*t3 4400 ; 1*t36*t81*t9+1.7015786190090226d+3*t25*t30*t81*t9-1.70157 4401 < 86190090226d+3*t28*t33*t80*t9+2.187743938725886d+3*t22*t2 4402 = 7*t80*t9-2.187743938725886d+3*t25*t30*t79*t9+2.7346799234 4403 > 07357d+3*t19*t24*t79*t9-2.734679923407357d+3*t22*t27*t78* 4404 ? t9-3.342386573053437d+3*t19*t24*t77*t9+4.0108638876641245 4405 @ d+3*t109*t17*t77*t9)+t3*t64*(3.342386573053437d+3*t21*t66 4406 1 *t89*t9+6.077066496460795d+1*t16*t43*t75*t9-6.07706649646 4407 2 0795d+1*t46*t74*t9+1.8231199489382385d+2*t40*t45*t74*t9-1 4408 3 .8231199489382385d+2*t16*t43*t73*t9+3.646239897876477d+2* 4409 4 t37*t42*t73*t9-3.646239897876477d+2*t40*t45*t72*t9+6.0770 4410 5 66496460795d+2*t34*t39*t72*t9-6.077066496460795d+2*t37*t4 4411 6 2*t71*t9+9.115599744691192d+2*t31*t36*t71*t9-9.1155997446 4412 7 91192d+2*t34*t39*t70*t9+1.276183964256767d+3*t28*t33*t70* 4413 8 t9-1.276183964256767d+3*t31*t36*t69*t9+1.7015786190090226 4414 9 d+3*t25*t30*t69*t9-1.7015786190090226d+3*t28*t33*t68*t9+2 4415 : .187743938725886d+3*t22*t27*t68*t9-2.187743938725886d+3*t 4416 ; 25*t30*t67*t9+2.734679923407357d+3*t19*t24*t67*t9-2.73467 4417 < 9923407357d+3*t22*t27*t66*t9-3.342386573053437d+3*t19*t24 4418 = *t65*t9+4.0108638876641245d+3*t109*t17*t65*t9)-9.30525736 4419 > 3491002d-1*t12*t4*t51*(3.342386573053437d+3*t21*t53*t89*t 4420 ? 9+6.077066496460795d+1*t16*t43*t62*t9-6.077066496460795d+ 4421 @ 1*t46*t61*t9+1.8231199489382385d+2*t40*t45*t61*t9-1.82311 4422 1 99489382385d+2*t16*t43*t60*t9+3.646239897876477d+2*t37*t4 4423 2 2*t60*t9-3.646239897876477d+2*t40*t45*t59*t9+6.0770664964 4424 3 60795d+2*t34*t39*t59*t9-6.077066496460795d+2*t37*t42*t58* 4425 4 t9+9.115599744691192d+2*t31*t36*t58*t9-9.115599744691192d 4426 5 +2*t34*t39*t57*t9+1.276183964256767d+3*t28*t33*t57*t9-1.2 4427 6 76183964256767d+3*t31*t36*t56*t9+1.7015786190090226d+3*t2 4428 7 5*t30*t56*t9-1.7015786190090226d+3*t28*t33*t55*t9+2.18774 4429 8 3938725886d+3*t22*t27*t55*t9-2.187743938725886d+3*t25*t30 4430 9 *t54*t9+2.734679923407357d+3*t19*t24*t54*t9-2.73467992340 4431 : 7357d+3*t22*t27*t53*t9-3.342386573053437d+3*t19*t24*t52*t 4432 ; 9+4.0108638876641245d+3*t109*t17*t52*t9)-9.30525736349100 4433 < 2d-1*t12*t3*t4*(3.342386573053437d+3*t20*t21*t89*t9+6.077 4434 = 066496460795d+1*t16*t43*t47*t9-6.077066496460795d+1*t44*t 4435 > 46*t9+1.8231199489382385d+2*t40*t44*t45*t9-3.646239897876 4436 ? 477d+2*t38*t40*t45*t9-1.8231199489382385d+2*t16*t41*t43*t 4437 @ 9+3.646239897876477d+2*t37*t41*t42*t9-6.077066496460795d+ 4438 1 2*t35*t37*t42*t9+6.077066496460795d+2*t34*t38*t39*t9-9.11 4439 2 5599744691192d+2*t32*t34*t39*t9+9.115599744691192d+2*t31* 4440 3 t35*t36*t9-1.276183964256767d+3*t29*t31*t36*t9+1.27618396 4441 4 4256767d+3*t28*t32*t33*t9-1.7015786190090226d+3*t26*t28*t 4442 5 33*t9+1.7015786190090226d+3*t25*t29*t30*t9-2.187743938725 4443 6 886d+3*t23*t25*t30*t9+2.187743938725886d+3*t22*t26*t27*t9 4444 7 -2.734679923407357d+3*t20*t22*t27*t9+2.734679923407357d+3 4445 8 *t19*t23*t24*t9-3.342386573053437d+3*t13*t19*t24*t9+4.010 4446 9 8638876641245d+3*t109*t13*t17*t9)-5.417385299101419d-3*ga 4447 : mmabb*t103*t108*t50*t64-1.2407009817988002d+0*t106*t12*t5 4448 ; *t51-9.305257363491002d-1*t102*t106*t4*t51+t104*t108*t51- 4449 < 1.2407009817988002d+0*t105*t12*t3*t5-9.305257363491002d-1 4450 = *t102*t105*t3*t4+t104*t107*t3)*wght+Mmat2(iq,D2_RB_TB) 4451 Mmat2(iq,D2_GBB_TA) = Mmat2(iq,D2_GBB_TA) 4452 Mmat2(iq,D2_GBB_TB) = 1.0d+0*(-3.361156316208638d-3*t105*t12 4453 1 *t94*t96-1.890381166699927d-3*t106*t12*t50*t96+3.61210462 4454 2 5279974d-3*t1*t107*t64*t94+2.0315194871630324d-3*t1*t108* 4455 3 t50*t64)*wght+Mmat2(iq,D2_GBB_TB) 4456 Mmat2(iq,D2_TA_TA) = Mmat2(iq,D2_TA_TA) 4457 Mmat2(iq,D2_TA_TB) = Mmat2(iq,D2_TA_TB) 4458 Mmat2(iq,D2_TB_TB) = 1.0d+0*(t51*t64*(4.4d+2*t21*t78*t89+9.6 4459 1 8d+2*t21*t77*t89+8.0d+0*t46*t87+8.0d+0*t16*t43*t87+8.0d+0 4460 2 *t46*t86+2.4d+1*t40*t45*t86+3.2d+1*t16*t43*t86+7.2d+1*t40 4461 3 *t45*t85+2.4d+1*t16*t43*t85+4.8d+1*t37*t42*t85+4.8d+1*t40 4462 4 *t45*t84+1.28d+2*t37*t42*t84+8.0d+1*t34*t39*t84+8.0d+1*t3 4463 5 7*t42*t83+2.0d+2*t34*t39*t83+1.2d+2*t31*t36*t83+1.2d+2*t3 4464 6 4*t39*t82+2.88d+2*t31*t36*t82+1.68d+2*t28*t33*t82+1.68d+2 4465 7 *t31*t36*t81+3.92d+2*t28*t33*t81+2.24d+2*t25*t30*t81+2.24 4466 8 d+2*t28*t33*t80+5.12d+2*t25*t30*t80+2.88d+2*t22*t27*t80+2 4467 9 .88d+2*t25*t30*t79+6.48d+2*t22*t27*t79+3.6d+2*t19*t24*t79 4468 : +3.6d+2*t22*t27*t78+8.0d+2*t19*t24*t78+4.4d+2*t19*t24*t77 4469 ; +5.28d+2*t109*t17*t77)+t3*t64*(4.4d+2*t21*t66*t89+9.68d+2 4470 < *t21*t65*t89+8.0d+0*t46*t75+8.0d+0*t16*t43*t75+8.0d+0*t46 4471 = *t74+2.4d+1*t40*t45*t74+3.2d+1*t16*t43*t74+7.2d+1*t40*t45 4472 > *t73+2.4d+1*t16*t43*t73+4.8d+1*t37*t42*t73+4.8d+1*t40*t45 4473 ? *t72+1.28d+2*t37*t42*t72+8.0d+1*t34*t39*t72+8.0d+1*t37*t4 4474 @ 2*t71+2.0d+2*t34*t39*t71+1.2d+2*t31*t36*t71+1.2d+2*t34*t3 4475 1 9*t70+2.88d+2*t31*t36*t70+1.68d+2*t28*t33*t70+1.68d+2*t31 4476 2 *t36*t69+3.92d+2*t28*t33*t69+2.24d+2*t25*t30*t69+2.24d+2* 4477 3 t28*t33*t68+5.12d+2*t25*t30*t68+2.88d+2*t22*t27*t68+2.88d 4478 4 +2*t25*t30*t67+6.48d+2*t22*t27*t67+3.6d+2*t19*t24*t67+3.6 4479 5 d+2*t22*t27*t66+8.0d+2*t19*t24*t66+4.4d+2*t19*t24*t65+5.2 4480 6 8d+2*t109*t17*t65)-9.305257363491002d-1*t12*t4*t51*(4.4d+ 4481 7 2*t21*t53*t89+9.68d+2*t21*t52*t89+8.0d+0*t46*t62+8.0d+0*t 4482 8 16*t43*t62+8.0d+0*t46*t61+2.4d+1*t40*t45*t61+3.2d+1*t16*t 4483 9 43*t61+7.2d+1*t40*t45*t60+2.4d+1*t16*t43*t60+4.8d+1*t37*t 4484 : 42*t60+4.8d+1*t40*t45*t59+1.28d+2*t37*t42*t59+8.0d+1*t34* 4485 ; t39*t59+8.0d+1*t37*t42*t58+2.0d+2*t34*t39*t58+1.2d+2*t31* 4486 < t36*t58+1.2d+2*t34*t39*t57+2.88d+2*t31*t36*t57+1.68d+2*t2 4487 = 8*t33*t57+1.68d+2*t31*t36*t56+3.92d+2*t28*t33*t56+2.24d+2 4488 > *t25*t30*t56+2.24d+2*t28*t33*t55+5.12d+2*t25*t30*t55+2.88 4489 ? d+2*t22*t27*t55+2.88d+2*t25*t30*t54+6.48d+2*t22*t27*t54+3 4490 @ .6d+2*t19*t24*t54+3.6d+2*t22*t27*t53+8.0d+2*t19*t24*t53+4 4491 1 .4d+2*t19*t24*t52+5.28d+2*t109*t17*t52)-9.305257363491002 4492 2 d-1*t12*t3*t4*(4.4d+2*t20*t21*t89+9.68d+2*t13*t21*t89+8.0 4493 3 d+0*t46*t47+8.0d+0*t16*t43*t47+8.0d+0*t44*t46+2.4d+1*t40* 4494 4 t44*t45+7.2d+1*t40*t41*t45+4.8d+1*t38*t40*t45+3.2d+1*t16* 4495 5 t43*t44+2.4d+1*t16*t41*t43+4.8d+1*t37*t41*t42+1.28d+2*t37 4496 6 *t38*t42+8.0d+1*t35*t37*t42+8.0d+1*t34*t38*t39+2.0d+2*t34 4497 7 *t35*t39+1.2d+2*t32*t34*t39+1.2d+2*t31*t35*t36+2.88d+2*t3 4498 8 1*t32*t36+1.68d+2*t29*t31*t36+1.68d+2*t28*t32*t33+3.92d+2 4499 9 *t28*t29*t33+2.24d+2*t26*t28*t33+2.24d+2*t25*t29*t30+5.12 4500 : d+2*t25*t26*t30+2.88d+2*t23*t25*t30+2.88d+2*t22*t26*t27+6 4501 ; .48d+2*t22*t23*t27+3.6d+2*t20*t22*t27+3.6d+2*t19*t23*t24+ 4502 < 8.0d+2*t19*t20*t24+4.4d+2*t13*t19*t24+5.28d+2*t109*t13*t1 4503 = 7))*wght+Mmat2(iq,D2_TB_TB) 4504 endif ! rhoa.gt.tol_rho.and.rhob.gt.tol_rho 4505 endif ! ipol.eq.1 4506 enddo ! iq 4507 end 4508C> 4509C> \brief Evaluate the nwxcm_x_m11 functional [1] 4510C> 4511C> \f{eqnarray*}{ 4512C> {\it t_1} &=& \rho_\alpha^{{{4}\over{3}}}\\\\ 4513C> {\it t_2} &=& \rho_\alpha^{{{1}\over{3}}}\\\\ 4514C> {\it t_3} &=& {{1}\over{{\it t_2}}}\\\\ 4515C> {\it t_4} &=& {{1}\over{\rho_\alpha}}\\\\ 4516C> {\it t_5} &=& 1.0-0.04275941461768073\,{\it t_3}\, 4517C> \left({{0.1282782438530422\,{\it t_3} 4518C> -2.63857249068588 \times 10^{-4}\,{\it t_4}} 4519C> \over{e^{243.0826598584318\,\rho_\alpha^{{{2}\over{3}}}}}} 4520C> -0.1924173657795633\,{\it t_3}+2.63857249068588 \times 10^{-4} 4521C> \,{\it t_4}+3.544907701811032\,\mathrm{erf} 4522C> \left(15.59110835888301\,{\it t_2}\right)\right)\\\\ 4523C> {\it t_6} &=& {{1}\over{\rho_\alpha^{{{8}\over{3}}}}}\\\\ 4524C> {\it t_7} &=& 0.804\,\left(1.0-{{1.0}\over{0.004492667444378077 4525C> \,{\it t_6}\,\sigma_{\alpha\alpha}+1.0}}\right)+1.0\\\\ 4526C> {\it t_8} &=& {\it param}\left(1\right)\\\\ 4527C> {\it t_9} &=& {\it param}\left(12\right)\\\\ 4528C> {\it t_{10}} &=& 9.115599744691192\,\rho_\alpha^{{{5} 4529C> \over{3}}}\\\\ 4530C> {\it t_{11}} &=& {\it t_{10}}-2.0\,\tau_\alpha\\\\ 4531C> {\it t_{12}} &=& {\it t_{11}}^{11}\\\\ 4532C> {\it t_{13}} &=& 2.0\,\tau_\alpha+{\it t_{10}}\\\\ 4533C> {\it t_{14}} &=& {{1}\over{{\it t_{13}}^{11}}}\\\\ 4534C> {\it t_{15}} &=& {\it param}\left(11\right)\\\\ 4535C> {\it t_{16}} &=& {\it t_{11}}^{10}\\\\ 4536C> {\it t_{17}} &=& {{1}\over{{\it t_{13}}^{10}}}\\\\ 4537C> {\it t_{18}} &=& {\it param}\left(10\right)\\\\ 4538C> {\it t_{19}} &=& {\it t_{11}}^9\\\\ 4539C> {\it t_{20}} &=& {{1}\over{{\it t_{13}}^9}}\\\\ 4540C> {\it t_{21}} &=& {\it param}\left(9\right)\\\\ 4541C> {\it t_{22}} &=& {\it t_{11}}^8\\\\ 4542C> {\it t_{23}} &=& {{1}\over{{\it t_{13}}^8}}\\\\ 4543C> {\it t_{24}} &=& {\it param}\left(8\right)\\\\ 4544C> {\it t_{25}} &=& {\it t_{11}}^7\\\\ 4545C> {\it t_{26}} &=& {{1}\over{{\it t_{13}}^7}}\\\\ 4546C> {\it t_{27}} &=& {\it param}\left(7\right)\\\\ 4547C> {\it t_{28}} &=& {\it t_{11}}^6\\\\ 4548C> {\it t_{29}} &=& {{1}\over{{\it t_{13}}^6}}\\\\ 4549C> {\it t_{30}} &=& {\it param}\left(6\right)\\\\ 4550C> {\it t_{31}} &=& {\it t_{11}}^5\\\\ 4551C> {\it t_{32}} &=& {{1}\over{{\it t_{13}}^5}}\\\\ 4552C> {\it t_{33}} &=& {\it param}\left(5\right)\\\\ 4553C> {\it t_{34}} &=& {\it t_{11}}^4\\\\ 4554C> {\it t_{35}} &=& {{1}\over{{\it t_{13}}^4}}\\\\ 4555C> {\it t_{36}} &=& {\it param}\left(4\right)\\\\ 4556C> {\it t_{37}} &=& {\it t_{11}}^3\\\\ 4557C> {\it t_{38}} &=& {{1}\over{{\it t_{13}}^3}}\\\\ 4558C> {\it t_{39}} &=& {\it param}\left(3\right)\\\\ 4559C> {\it t_{40}} &=& {\it t_{11}}^2\\\\ 4560C> {\it t_{41}} &=& {{1}\over{{\it t_{13}}^2}}\\\\ 4561C> {\it t_{42}} &=& {\it param}\left(2\right)\\\\ 4562C> {\it t_{43}} &=& {{1}\over{{\it t_{13}}}}\\\\ 4563C> {\it t_{44}} &=& 0.552\,\left(1.0-{{1} 4564C> \over{e^{0.003680288926019986\,{\it t_6}\, 4565C> \sigma_{\alpha\alpha}}}}\right)+1.0\\\\ 4566C> {\it t_{45}} &=& {\it param}\left(13\right)\\\\ 4567C> {\it t_{46}} &=& {\it param}\left(24\right)\\\\ 4568C> {\it t_{47}} &=& {\it param}\left(23\right)\\\\ 4569C> {\it t_{48}} &=& {\it param}\left(22\right)\\\\ 4570C> {\it t_{49}} &=& {\it param}\left(21\right)\\\\ 4571C> {\it t_{50}} &=& {\it param}\left(20\right)\\\\ 4572C> {\it t_{51}} &=& {\it param}\left(19\right)\\\\ 4573C> {\it t_{52}} &=& {\it param}\left(18\right)\\\\ 4574C> {\it t_{53}} &=& {\it param}\left(17\right)\\\\ 4575C> {\it t_{54}} &=& {\it param}\left(16\right)\\\\ 4576C> {\it t_{55}} &=& {\it param}\left(15\right)\\\\ 4577C> {\it t_{56}} &=& {\it param}\left(14\right)\\\\ 4578C> {\it t_{57}} &=& 0.9305257363491002\,{\it t_1}\,{\it t_5} 4579C> -0.9305257363491002\,{\it t_1}\\\\ 4580C> {\it t_{58}} &=& {\it param}\left(25\right)\\\\ 4581C> {\it t_{59}} &=& {\it param}\left(36\right)\\\\ 4582C> {\it t_{60}} &=& {\it param}\left(35\right)\\\\ 4583C> {\it t_{61}} &=& {\it param}\left(34\right)\\\\ 4584C> {\it t_{62}} &=& {\it param}\left(33\right)\\\\ 4585C> {\it t_{63}} &=& {\it param}\left(32\right)\\\\ 4586C> {\it t_{64}} &=& {\it param}\left(31\right)\\\\ 4587C> {\it t_{65}} &=& {\it param}\left(30\right)\\\\ 4588C> {\it t_{66}} &=& {\it param}\left(29\right)\\\\ 4589C> {\it t_{67}} &=& {\it param}\left(28\right)\\\\ 4590C> {\it t_{68}} &=& {\it param}\left(27\right)\\\\ 4591C> {\it t_{69}} &=& {\it param}\left(26\right)\\\\ 4592C> {\it t_{70}} &=& {\it param}\left(37\right)\\\\ 4593C> {\it t_{71}} &=& {\it param}\left(48\right)\\\\ 4594C> {\it t_{72}} &=& {\it param}\left(47\right)\\\\ 4595C> {\it t_{73}} &=& {\it param}\left(46\right)\\\\ 4596C> {\it t_{74}} &=& {\it param}\left(45\right)\\\\ 4597C> {\it t_{75}} &=& {\it param}\left(44\right)\\\\ 4598C> {\it t_{76}} &=& {\it param}\left(43\right)\\\\ 4599C> {\it t_{77}} &=& {\it param}\left(42\right)\\\\ 4600C> {\it t_{78}} &=& {\it param}\left(41\right)\\\\ 4601C> {\it t_{79}} &=& {\it param}\left(40\right)\\\\ 4602C> {\it t_{80}} &=& {\it param}\left(39\right)\\\\ 4603C> {\it t_{81}} &=& {\it param}\left(38\right)\\\\ 4604C> {\it t_{82}} &=& \rho_\beta^{{{4}\over{3}}}\\\\ 4605C> {\it t_{83}} &=& \rho_\beta^{{{1}\over{3}}}\\\\ 4606C> {\it t_{84}} &=& {{1}\over{{\it t_{83}}}}\\\\ 4607C> {\it t_{85}} &=& {{1}\over{\rho_\beta}}\\\\ 4608C> {\it t_{86}} &=& 1.0-0.04275941461768073\,{\it t_{84}}\, 4609C> \left({{0.1282782438530422\,{\it t_{84}} 4610C> -2.63857249068588 \times 10^{-4}\,{\it t_{85}}} 4611C> \over{e^{243.0826598584318\,\rho_\beta^{{{2}\over{3}}}}}} 4612C> -0.1924173657795633\,{\it t_{84}}+2.63857249068588 \times 10^{ 4613C> -4}\,{\it t_{85}}+3.544907701811032\,\mathrm{erf} 4614C> \left(15.59110835888301\,{\it t_{83}}\right)\right)\\\\ 4615C> {\it t_{87}} &=& {{1}\over{\rho_\beta^{{{8}\over{3}}}}}\\\\ 4616C> {\it t_{88}} &=& 0.804\,\left(1.0-{{1.0} 4617C> \over{0.004492667444378077\,{\it t_{87}}\,\sigma_{\beta\beta} 4618C> +1.0}}\right)+1.0\\\\ 4619C> {\it t_{89}} &=& 9.115599744691192\,\rho_\beta^{{{5}\over{3}}}\\\\ 4620C> {\it t_{90}} &=& {\it t_{89}}-2.0\,\tau_\beta\\\\ 4621C> {\it t_{91}} &=& {\it t_{90}}^{11}\\\\ 4622C> {\it t_{92}} &=& 2.0\,\tau_\beta+{\it t_{89}}\\\\ 4623C> {\it t_{93}} &=& {{1}\over{{\it t_{92}}^{11}}}\\\\ 4624C> {\it t_{94}} &=& {\it t_{90}}^{10}\\\\ 4625C> {\it t_{95}} &=& {{1}\over{{\it t_{92}}^{10}}}\\\\ 4626C> {\it t_{96}} &=& {\it t_{90}}^9\\\\ 4627C> {\it t_{97}} &=& {{1}\over{{\it t_{92}}^9}}\\\\ 4628C> {\it t_{98}} &=& {\it t_{90}}^8\\\\ 4629C> {\it t_{99}} &=& {{1}\over{{\it t_{92}}^8}}\\\\ 4630C> {\it t_{100}} &=& {\it t_{90}}^7\\\\ 4631C> {\it t_{101}} &=& {{1}\over{{\it t_{92}}^7}}\\\\ 4632C> {\it t_{102}} &=& {\it t_{90}}^6\\\\ 4633C> {\it t_{103}} &=& {{1}\over{{\it t_{92}}^6}}\\\\ 4634C> {\it t_{104}} &=& {\it t_{90}}^5\\\\ 4635C> {\it t_{105}} &=& {{1}\over{{\it t_{92}}^5}}\\\\ 4636C> {\it t_{106}} &=& {\it t_{90}}^4\\\\ 4637C> {\it t_{107}} &=& {{1}\over{{\it t_{92}}^4}}\\\\ 4638C> {\it t_{108}} &=& {\it t_{90}}^3\\\\ 4639C> {\it t_{109}} &=& {{1}\over{{\it t_{92}}^3}}\\\\ 4640C> {\it t_{110}} &=& {\it t_{90}}^2\\\\ 4641C> {\it t_{111}} &=& {{1}\over{{\it t_{92}}^2}}\\\\ 4642C> {\it t_{112}} &=& {{1}\over{{\it t_{92}}}}\\\\ 4643C> {\it t_{113}} &=& 0.552\,\left(1.0-{{1} 4644C> \over{e^{0.003680288926019986\,{\it t_{87}}\, 4645C> \sigma_{\beta\beta}}}}\right)+1.0\\\\ 4646C> {\it t_{114}} &=& 0.9305257363491002\,{\it t_{82}}\,{\it t_{86}} 4647C> -0.9305257363491002\,{\it t_{82}}\\\\ 4648C> {\it t_{115}} &=& \rho_s^{{{4}\over{3}}}\\\\ 4649C> {\it t_{116}} &=& \rho_s^{{{1}\over{3}}}\\\\ 4650C> {\it t_{117}} &=& {{1}\over{{\it t_{116}}}}\\\\ 4651C> {\it t_{118}} &=& {{1}\over{\rho_s}}\\\\ 4652C> {\it t_{119}} &=& 1.0-0.04275941461768073\,{\it t_{117}} 4653C> \,\left({{0.1282782438530422\,{\it t_{117}} 4654C> -2.63857249068588 \times 10^{-4}\,{\it t_{118}}} 4655C> \over{e^{243.0826598584318\,\rho_s^{{{2}\over{3}}}}}} 4656C> -0.1924173657795633\,{\it t_{117}}+2.63857249068588 \times 10^{ 4657C> -4}\,{\it t_{118}}+3.544907701811032\,\mathrm{erf} 4658C> \left(15.59110835888301\,{\it t_{116}}\right)\right)\\\\ 4659C> {\it t_{120}} &=& {{1}\over{\rho_s^{{{8}\over{3}}}}}\\\\ 4660C> {\it t_{121}} &=& 0.804\,\left(1.0-{{1.0} 4661C> \over{0.004492667444378077\,{\it t_{120}}\,\sigma_{ss} 4662C> +1.0}}\right)+1.0\\\\ 4663C> {\it t_{122}} &=& 9.115599744691192\,\rho_s^{{{5}\over{3}}}\\\\ 4664C> {\it t_{123}} &=& {\it t_{122}}-2.0\,\tau_s\\\\ 4665C> {\it t_{124}} &=& {\it t_{123}}^{11}\\\\ 4666C> {\it t_{125}} &=& 2.0\,\tau_s+{\it t_{122}}\\\\ 4667C> {\it t_{126}} &=& {{1}\over{{\it t_{125}}^{11}}}\\\\ 4668C> {\it t_{127}} &=& {\it t_{123}}^{10}\\\\ 4669C> {\it t_{128}} &=& {{1}\over{{\it t_{125}}^{10}}}\\\\ 4670C> {\it t_{129}} &=& {\it t_{123}}^9\\\\ 4671C> {\it t_{130}} &=& {{1}\over{{\it t_{125}}^9}}\\\\ 4672C> {\it t_{131}} &=& {\it t_{123}}^8\\\\ 4673C> {\it t_{132}} &=& {{1}\over{{\it t_{125}}^8}}\\\\ 4674C> {\it t_{133}} &=& {\it t_{123}}^7\\\\ 4675C> {\it t_{134}} &=& {{1}\over{{\it t_{125}}^7}}\\\\ 4676C> {\it t_{135}} &=& {\it t_{123}}^6\\\\ 4677C> {\it t_{136}} &=& {{1}\over{{\it t_{125}}^6}}\\\\ 4678C> {\it t_{137}} &=& {\it t_{123}}^5\\\\ 4679C> {\it t_{138}} &=& {{1}\over{{\it t_{125}}^5}}\\\\ 4680C> {\it t_{139}} &=& {\it t_{123}}^4\\\\ 4681C> {\it t_{140}} &=& {{1}\over{{\it t_{125}}^4}}\\\\ 4682C> {\it t_{141}} &=& {\it t_{123}}^3\\\\ 4683C> {\it t_{142}} &=& {{1}\over{{\it t_{125}}^3}}\\\\ 4684C> {\it t_{143}} &=& {\it t_{123}}^2\\\\ 4685C> {\it t_{144}} &=& {{1}\over{{\it t_{125}}^2}}\\\\ 4686C> {\it t_{145}} &=& {{1}\over{{\it t_{125}}}}\\\\ 4687C> {\it t_{146}} &=& 0.552\,\left(1.0-{{1} 4688C> \over{e^{0.003680288926019986\,{\it t_{120}}\, 4689C> \sigma_{ss}}}}\right)+1.0\\\\ 4690C> {\it t_{147}} &=& 0.9305257363491002\,{\it t_{115}}\,{ 4691C> \it t_{119}}-0.9305257363491002\,{\it t_{115}}\\\\ 4692C> f &=& 1.0\,\left({\it t_{114}}\,{\it t_{113}}\,\left({ 4693C> \it t_{81}}\,{\it t_{90}}\,{\it t_{112}}+{\it t_{80}}\,{ 4694C> \it t_{110}}\,{\it t_{111}}+{\it t_{79}}\,{\it t_{108}}\,{ 4695C> \it t_{109}}+{\it t_{78}}\,{\it t_{106}}\,{\it t_{107}}+{ 4696C> \it t_{77}}\,{\it t_{104}}\,{\it t_{105}}+{\it t_{76}}\,{ 4697C> \it t_{102}}\,{\it t_{103}}+{\it t_{75}}\,{\it t_{100}}\,{ 4698C> \it t_{101}}+{\it t_{74}}\,{\it t_{98}}\,{\it t_{99}}+{ 4699C> \it t_{73}}\,{\it t_{96}}\,{\it t_{97}}+{\it t_{72}}\,{ 4700C> \it t_{94}}\,{\it t_{95}}+{\it t_{71}}\,{\it t_{91}}\,{ 4701C> \it t_{93}}+{\it t_{70}}\right)+{\it t_{114}}\,{\it t_{88}} 4702C> \,\left({\it t_{69}}\,{\it t_{90}}\,{\it t_{112}}+{\it t_{68}} 4703C> \,{\it t_{110}}\,{\it t_{111}}+{\it t_{67}}\,{\it t_{108}} 4704C> \,{\it t_{109}}+{\it t_{66}}\,{\it t_{106}}\,{\it t_{107}}+{ 4705C> \it t_{65}}\,{\it t_{104}}\,{\it t_{105}}+{\it t_{64}}\,{ 4706C> \it t_{102}}\,{\it t_{103}}+{\it t_{63}}\,{\it t_{100}}\,{ 4707C> \it t_{101}}+{\it t_{62}}\,{\it t_{98}}\,{\it t_{99}}+{ 4708C> \it t_{61}}\,{\it t_{96}}\,{\it t_{97}}+{\it t_{60}}\,{ 4709C> \it t_{94}}\,{\it t_{95}}+{\it t_{59}}\,{\it t_{91}}\,{ 4710C> \it t_{93}}+{\it t_{58}}\right)-0.9305257363491002\,{ 4711C> \it t_{82}}\,{\it t_{86}}\,{\it t_{113}}\,\left({\it t_{56}} 4712C> \,{\it t_{90}}\,{\it t_{112}}+{\it t_{55}}\,{\it t_{110}}\,{ 4713C> \it t_{111}}+{\it t_{54}}\,{\it t_{108}}\,{\it t_{109}}+{ 4714C> \it t_{53}}\,{\it t_{106}}\,{\it t_{107}}+{\it t_{52}}\,{ 4715C> \it t_{104}}\,{\it t_{105}}+{\it t_{51}}\,{\it t_{102}}\,{ 4716C> \it t_{103}}+{\it t_{50}}\,{\it t_{100}}\,{\it t_{101}}+{ 4717C> \it t_{49}}\,{\it t_{98}}\,{\it t_{99}}+{\it t_{48}}\,{ 4718C> \it t_{96}}\,{\it t_{97}}+{\it t_{47}}\,{\it t_{94}}\,{ 4719C> \it t_{95}}+{\it t_{46}}\,{\it t_{91}}\,{\it t_{93}}+{ 4720C> \it t_{45}}\right)-0.9305257363491002\,{\it t_{82}}\,{ 4721C> \it t_{86}}\,{\it t_{88}}\,\left({\it t_{42}}\,{\it t_{90}} 4722C> \,{\it t_{112}}+{\it t_{39}}\,{\it t_{110}}\,{\it t_{111}}+{ 4723C> \it t_{36}}\,{\it t_{108}}\,{\it t_{109}}+{\it t_{33}}\,{ 4724C> \it t_{106}}\,{\it t_{107}}+{\it t_{30}}\,{\it t_{104}}\,{ 4725C> \it t_{105}}+{\it t_{27}}\,{\it t_{102}}\,{\it t_{103}}+{ 4726C> \it t_{24}}\,{\it t_{100}}\,{\it t_{101}}+{\it t_{21}}\,{ 4727C> \it t_{98}}\,{\it t_{99}}+{\it t_{18}}\,{\it t_{96}}\,{ 4728C> \it t_{97}}+{\it t_{15}}\,{\it t_{94}}\,{\it t_{95}}+{\it t_9} 4729C> \,{\it t_{91}}\,{\it t_{93}}+{\it t_8}\right)\right)+1.0 4730C> \,\left({\it t_{57}}\,{\it t_{44}}\,\left({\it t_{81}}\,{ 4731C> \it t_{11}}\,{\it t_{43}}+{\it t_{80}}\,{\it t_{40}}\,{ 4732C> \it t_{41}}+{\it t_{79}}\,{\it t_{37}}\,{\it t_{38}}+{ 4733C> \it t_{78}}\,{\it t_{34}}\,{\it t_{35}}+{\it t_{77}}\,{ 4734C> \it t_{31}}\,{\it t_{32}}+{\it t_{76}}\,{\it t_{28}}\,{ 4735C> \it t_{29}}+{\it t_{75}}\,{\it t_{25}}\,{\it t_{26}}+{ 4736C> \it t_{74}}\,{\it t_{22}}\,{\it t_{23}}+{\it t_{73}}\,{ 4737C> \it t_{19}}\,{\it t_{20}}+{\it t_{72}}\,{\it t_{16}}\,{ 4738C> \it t_{17}}+{\it t_{71}}\,{\it t_{12}}\,{\it t_{14}}+{ 4739C> \it t_{70}}\right)+{\it t_{57}}\,{\it t_7}\,\left({\it t_{69}} 4740C> \,{\it t_{11}}\,{\it t_{43}}+{\it t_{68}}\,{\it t_{40}}\,{ 4741C> \it t_{41}}+{\it t_{67}}\,{\it t_{37}}\,{\it t_{38}}+{ 4742C> \it t_{66}}\,{\it t_{34}}\,{\it t_{35}}+{\it t_{65}}\,{ 4743C> \it t_{31}}\,{\it t_{32}}+{\it t_{64}}\,{\it t_{28}}\,{ 4744C> \it t_{29}}+{\it t_{63}}\,{\it t_{25}}\,{\it t_{26}}+{ 4745C> \it t_{62}}\,{\it t_{22}}\,{\it t_{23}}+{\it t_{61}}\,{ 4746C> \it t_{19}}\,{\it t_{20}}+{\it t_{60}}\,{\it t_{16}}\,{ 4747C> \it t_{17}}+{\it t_{59}}\,{\it t_{12}}\,{\it t_{14}}+{ 4748C> \it t_{58}}\right)-0.9305257363491002\,{\it t_1}\,{\it t_5} 4749C> \,{\it t_{44}}\,\left({\it t_{56}}\,{\it t_{11}}\,{\it t_{43}} 4750C> +{\it t_{55}}\,{\it t_{40}}\,{\it t_{41}}+{\it t_{54}}\,{ 4751C> \it t_{37}}\,{\it t_{38}}+{\it t_{53}}\,{\it t_{34}}\,{ 4752C> \it t_{35}}+{\it t_{52}}\,{\it t_{31}}\,{\it t_{32}}+{ 4753C> \it t_{51}}\,{\it t_{28}}\,{\it t_{29}}+{\it t_{50}}\,{ 4754C> \it t_{25}}\,{\it t_{26}}+{\it t_{49}}\,{\it t_{22}}\,{ 4755C> \it t_{23}}+{\it t_{48}}\,{\it t_{19}}\,{\it t_{20}}+{ 4756C> \it t_{47}}\,{\it t_{16}}\,{\it t_{17}}+{\it t_{46}}\,{ 4757C> \it t_{12}}\,{\it t_{14}}+{\it t_{45}}\right) 4758C> -0.9305257363491002\,{\it t_1}\,{\it t_5}\,{\it t_7}\, 4759C> \left({\it t_{42}}\,{\it t_{11}}\,{\it t_{43}}+{\it t_{39}} 4760C> \,{\it t_{40}}\,{\it t_{41}}+{\it t_{36}}\,{\it t_{37}}\,{ 4761C> \it t_{38}}+{\it t_{33}}\,{\it t_{34}}\,{\it t_{35}}+{ 4762C> \it t_{30}}\,{\it t_{31}}\,{\it t_{32}}+{\it t_{27}}\,{ 4763C> \it t_{28}}\,{\it t_{29}}+{\it t_{24}}\,{\it t_{25}}\,{ 4764C> \it t_{26}}+{\it t_{21}}\,{\it t_{22}}\,{\it t_{23}}+{ 4765C> \it t_{18}}\,{\it t_{19}}\,{\it t_{20}}+{\it t_{15}}\,{ 4766C> \it t_{16}}\,{\it t_{17}}+{\it t_9}\,{\it t_{12}}\,{\it t_{14}} 4767C> +{\it t_8}\right)\right)\\\\ 4768C> g &=& 0\\\\ 4769C> G &=& 1.0\,\left({\it t_{147}}\,{\it t_{146}}\,\left({ 4770C> \it t_{81}}\,{\it t_{123}}\,{\it t_{145}}+{\it t_{80}}\,{ 4771C> \it t_{143}}\,{\it t_{144}}+{\it t_{79}}\,{\it t_{141}}\,{ 4772C> \it t_{142}}+{\it t_{78}}\,{\it t_{139}}\,{\it t_{140}}+{ 4773C> \it t_{77}}\,{\it t_{137}}\,{\it t_{138}}+{\it t_{76}}\,{ 4774C> \it t_{135}}\,{\it t_{136}}+{\it t_{75}}\,{\it t_{133}}\,{ 4775C> \it t_{134}}+{\it t_{74}}\,{\it t_{131}}\,{\it t_{132}}+{ 4776C> \it t_{73}}\,{\it t_{129}}\,{\it t_{130}}+{\it t_{72}}\,{ 4777C> \it t_{127}}\,{\it t_{128}}+{\it t_{71}}\,{\it t_{124}}\,{ 4778C> \it t_{126}}+{\it t_{70}}\right)+{\it t_{147}}\,{\it t_{121}} 4779C> \,\left({\it t_{69}}\,{\it t_{123}}\,{\it t_{145}}+{ 4780C> \it t_{68}}\,{\it t_{143}}\,{\it t_{144}}+{\it t_{67}}\,{ 4781C> \it t_{141}}\,{\it t_{142}}+{\it t_{66}}\,{\it t_{139}}\,{ 4782C> \it t_{140}}+{\it t_{65}}\,{\it t_{137}}\,{\it t_{138}}+{ 4783C> \it t_{64}}\,{\it t_{135}}\,{\it t_{136}}+{\it t_{63}}\,{ 4784C> \it t_{133}}\,{\it t_{134}}+{\it t_{62}}\,{\it t_{131}}\,{ 4785C> \it t_{132}}+{\it t_{61}}\,{\it t_{129}}\,{\it t_{130}}+{ 4786C> \it t_{60}}\,{\it t_{127}}\,{\it t_{128}}+{\it t_{59}}\,{ 4787C> \it t_{124}}\,{\it t_{126}}+{\it t_{58}}\right) 4788C> -0.9305257363491002\,{\it t_{115}}\,{\it t_{119}}\,{ 4789C> \it t_{146}}\,\left({\it t_{56}}\,{\it t_{123}}\,{\it t_{145}} 4790C> +{\it t_{55}}\,{\it t_{143}}\,{\it t_{144}}+{\it t_{54}}\,{ 4791C> \it t_{141}}\,{\it t_{142}}+{\it t_{53}}\,{\it t_{139}}\,{ 4792C> \it t_{140}}+{\it t_{52}}\,{\it t_{137}}\,{\it t_{138}}+{ 4793C> \it t_{51}}\,{\it t_{135}}\,{\it t_{136}}+{\it t_{50}}\,{ 4794C> \it t_{133}}\,{\it t_{134}}+{\it t_{49}}\,{\it t_{131}}\,{ 4795C> \it t_{132}}+{\it t_{48}}\,{\it t_{129}}\,{\it t_{130}}+{ 4796C> \it t_{47}}\,{\it t_{127}}\,{\it t_{128}}+{\it t_{46}}\,{ 4797C> \it t_{124}}\,{\it t_{126}}+{\it t_{45}}\right) 4798C> -0.9305257363491002\,{\it t_{115}}\,{\it t_{119}}\,{ 4799C> \it t_{121}}\,\left({\it t_{42}}\,{\it t_{123}}\,{\it t_{145}} 4800C> +{\it t_{39}}\,{\it t_{143}}\,{\it t_{144}}+{\it t_{36}}\,{ 4801C> \it t_{141}}\,{\it t_{142}}+{\it t_{33}}\,{\it t_{139}}\,{ 4802C> \it t_{140}}+{\it t_{30}}\,{\it t_{137}}\,{\it t_{138}}+{ 4803C> \it t_{27}}\,{\it t_{135}}\,{\it t_{136}}+{\it t_{24}}\,{ 4804C> \it t_{133}}\,{\it t_{134}}+{\it t_{21}}\,{\it t_{131}}\,{ 4805C> \it t_{132}}+{\it t_{18}}\,{\it t_{129}}\,{\it t_{130}}+{ 4806C> \it t_{15}}\,{\it t_{127}}\,{\it t_{128}}+{\it t_9}\,{ 4807C> \it t_{124}}\,{\it t_{126}}+{\it t_8}\right)\right)\\\\ 4808C> \f} 4809C> 4810C> Code generated with Maxima 5.34.0 [2] 4811C> driven by autoxc [3]. 4812C> 4813C> ### References ### 4814C> 4815C> [1] R Peverati, DG Truhlar, J.Phys.Chem.Lett. 2, 2810 (2011) , DOI: 4816C> <a href="https://doi.org/10.1021/jz201170d "> 4817C> 10.1021/jz201170d </a> 4818C> 4819C> [2] Maxima, a computer algebra system, 4820C> <a href="http://maxima.sourceforge.net/"> 4821C> http://maxima.sourceforge.net/</a> 4822C> 4823C> [3] autoxc, revision 27097 2015-05-08 4824C> 4825 subroutine nwxcm_x_m11_d3(param,tol_rho,ipol,nq,wght, 4826 +rho,rgamma,tau,fnc,Amat,Amat2,Amat3, 4827 +Cmat,Cmat2,Cmat3,Mmat,Mmat2,Mmat3) 4828c $Id: $ 4829#ifdef NWXC_QUAD_PREC 4830 implicit real(kind=selected_real_kind(30))(a-h,o-z),integer(i-n) 4831 integer, parameter :: rk=selected_real_kind(30) 4832#else 4833 implicit real(kind=selected_real_kind(15))(a-h,o-z),integer(i-n) 4834 integer, parameter :: rk=selected_real_kind(15) 4835#endif 4836#include "nwxc_param.fh" 4837 double precision param(*) !< [Input] Parameters of functional 4838 double precision tol_rho !< [Input] The lower limit on the density 4839 integer ipol !< [Input] The number of spin channels 4840 integer nq !< [Input] The number of points 4841 double precision wght !< [Input] The weight of the functional 4842 double precision rho(nq,NCOL_RHO) !< [Input] The density 4843 double precision rgamma(nq,NCOL_GAMMA) !< [Input] The norm of the density 4844 !< gradients 4845 double precision tau(nq,NCOL_TAU) !< [Input] The kinetic energy density 4846 double precision fnc(nq) !< [Output] The value of the functional 4847c 4848c Sampling Matrices for the XC Kernel 4849c 4850 double precision Amat(nq,NCOL_AMAT) !< [Output] The derivative wrt rho 4851 double precision Cmat(nq,NCOL_CMAT) !< [Output] The derivative wrt rgamma 4852 double precision Mmat(nq,NCOL_MMAT) !< [Output] The derivative wrt tau 4853c 4854c Sampling Matrices for the XC Kernel 4855c 4856 double precision Amat2(nq,NCOL_AMAT2) !< [Output] The 2nd derivative wrt rho 4857 double precision Cmat2(nq,NCOL_CMAT2) !< [Output] The 2nd derivative wrt rgamma 4858 !< and possibly rho 4859 double precision Mmat2(nq,NCOL_MMAT2) !< [Output] The 2nd derivative wrt tau 4860 !< and possibly rho 4861c 4862c Sampling Matrices for the XC Kernel 4863c 4864 double precision Amat3(nq,NCOL_AMAT3) !< [Output] The 3rd derivative wrt rho 4865 double precision Cmat3(nq,NCOL_CMAT3) !< [Output] The 3rd derivative wrt rgamma 4866 !< and possibly rho 4867 double precision Mmat3(nq,NCOL_MMAT3) !< [Output] The 3rd derivative wrt tau 4868 !< and possibly rho 4869 integer iq 4870 double precision tmp 4871 double precision rhoa,rhob 4872 double precision gammaaa,gammaab,gammabb 4873 double precision taua,taub 4874 double precision nwxcm_heaviside 4875 external nwxcm_heaviside 4876CDIR$ NOVECTOR 4877 do iq = 1, nq 4878 if (ipol.eq.1) then 4879 rhoa = 0.5d0*rho(iq,R_T) 4880 gammaaa = 0.25d0*rgamma(iq,G_TT) 4881 taua = 0.5d0*tau(iq,T_T) 4882 if (rhoa.gt.tol_rho) then 4883 t1 = 1/rhoa**2.6666666666666666d+0 4884 t2 = 4.492667444378077d-3*gammaaa*t1+1.0d+0 4885 t3 = 8.04d-1*(1.0d+0-1.0d+0/t2)+1.0d+0 4886 t4 = rhoa**1.3333333333333333d+0 4887 t5 = rhoa**3.333333333333333d-1 4888 t6 = 1/t5 4889 t7 = 1/rhoa 4890 t8 = 1.282782438530422d-1*t6-2.63857249068588d-4*t7 4891 t9 = rhoa**6.666666666666666d-1 4892 t10 = exp(-2.4308265985843178d+2*t9) 4893 t11 = t10*t8+2.63857249068588d-4*t7-1.924173657795633d-1*t6+ 4894 1 3.544907701811032d+0*erf(1.5591108358883013d+1*t5) 4895 t12 = 1.0d+0-4.275941461768073d-2*t11*t6 4896 t13 = param(12) 4897 t14 = rhoa**1.6666666666666669d+0 4898 t15 = 9.115599744691192d+0*t14 4899 t16 = t15-2.0d+0*taua 4900 t17 = t16**11 4901 t18 = 2.0d+0*taua+t15 4902 t19 = 1/t18**11 4903 t20 = param(11) 4904 t21 = t16**10 4905 t22 = 1/t18**10 4906 t23 = param(10) 4907 t24 = t16**9 4908 t25 = 1/t18**9 4909 t26 = param(9) 4910 t27 = t16**8 4911 t28 = 1/t18**8 4912 t29 = param(8) 4913 t30 = t16**7 4914 t31 = 1/t18**7 4915 t32 = param(7) 4916 t33 = t16**6 4917 t34 = 1/t18**6 4918 t35 = param(6) 4919 t36 = t16**5 4920 t37 = 1/t18**5 4921 t38 = param(5) 4922 t39 = t16**4 4923 t40 = 1/t18**4 4924 t41 = param(4) 4925 t42 = t16**3 4926 t43 = 1/t18**3 4927 t44 = param(3) 4928 t45 = t16**2 4929 t46 = 1/t18**2 4930 t47 = param(2) 4931 t48 = 1/t18 4932 t49 = t16*t47*t48+t44*t45*t46+t41*t42*t43+t38*t39*t40+t35*t3 4933 1 6*t37+t32*t33*t34+t29*t30*t31+t26*t27*t28+t23*t24*t25+t20 4934 2 *t21*t22+t13*t17*t19+param(1) 4935 t50 = exp(-3.6802889260199856d-3*gammaaa*t1) 4936 t51 = 5.52d-1*(1.0d+0-t50)+1.0d+0 4937 t52 = param(24) 4938 t53 = param(23) 4939 t54 = param(22) 4940 t55 = param(21) 4941 t56 = param(20) 4942 t57 = param(19) 4943 t58 = param(18) 4944 t59 = param(17) 4945 t60 = param(16) 4946 t61 = param(15) 4947 t62 = param(14) 4948 t63 = t16*t48*t62+t45*t46*t61+t42*t43*t60+t39*t40*t59+t36*t3 4949 1 7*t58+t33*t34*t57+t30*t31*t56+t27*t28*t55+t24*t25*t54+t21 4950 2 *t22*t53+t17*t19*t52+param(13) 4951 t64 = 9.305257363491002d-1*t12*t4-9.305257363491002d-1*t4 4952 t65 = param(36) 4953 t66 = param(35) 4954 t67 = param(34) 4955 t68 = param(33) 4956 t69 = param(32) 4957 t70 = param(31) 4958 t71 = param(30) 4959 t72 = param(29) 4960 t73 = param(28) 4961 t74 = param(27) 4962 t75 = param(26) 4963 t76 = t16*t48*t75+t45*t46*t74+t42*t43*t73+t39*t40*t72+t36*t3 4964 1 7*t71+t33*t34*t70+t30*t31*t69+t27*t28*t68+t24*t25*t67+t21 4965 2 *t22*t66+t17*t19*t65+param(25) 4966 t77 = param(48) 4967 t78 = param(47) 4968 t79 = param(46) 4969 t80 = param(45) 4970 t81 = param(44) 4971 t82 = param(43) 4972 t83 = param(42) 4973 t84 = param(41) 4974 t85 = param(40) 4975 t86 = param(39) 4976 t87 = param(38) 4977 t88 = t16*t48*t87+t45*t46*t86+t42*t43*t85+t39*t40*t84+t36*t3 4978 1 7*t83+t33*t34*t82+t30*t31*t81+t27*t28*t80+t24*t25*t79+t21 4979 2 *t22*t78+t17*t19*t77+param(37) 4980 t89 = 1/t18**12 4981 t90 = -1.6711932865267184d+2*t13*t17*t89*t9+1.51926662411519 4982 1 86d+1*t47*t48*t9-1.5192666241151986d+1*t16*t46*t47*t9+3.0 4983 2 38533248230397d+1*t16*t44*t46*t9-3.038533248230397d+1*t43 4984 3 *t44*t45*t9+4.5577998723455965d+1*t41*t43*t45*t9-4.557799 4985 4 8723455965d+1*t40*t41*t42*t9+6.077066496460795d+1*t38*t40 4986 5 *t42*t9-6.077066496460795d+1*t37*t38*t39*t9+7.59633312057 4987 6 5993d+1*t35*t37*t39*t9-7.596333120575993d+1*t34*t35*t36*t 4988 7 9+9.115599744691193d+1*t32*t34*t36*t9-9.115599744691193d+ 4989 8 1*t31*t32*t33*t9+1.0634866368806391d+2*t29*t31*t33*t9-1.0 4990 9 634866368806391d+2*t28*t29*t30*t9+1.2154132992921589d+2*t 4991 : 26*t28*t30*t9-1.2154132992921589d+2*t25*t26*t27*t9+1.3673 4992 ; 399617036788d+2*t23*t25*t27*t9-1.3673399617036788d+2*t22* 4993 < t23*t24*t9+1.5192666241151986d+2*t20*t22*t24*t9-1.5192666 4994 = 241151986d+2*t19*t20*t21*t9+1.6711932865267184d+2*t13*t19 4995 > *t21*t9 4996 t91 = -1.6711932865267184d+2*t17*t52*t89*t9+1.51926662411519 4997 1 86d+1*t48*t62*t9-1.5192666241151986d+1*t16*t46*t62*t9+3.0 4998 2 38533248230397d+1*t16*t46*t61*t9-3.038533248230397d+1*t43 4999 3 *t45*t61*t9+4.5577998723455965d+1*t43*t45*t60*t9-4.557799 5000 4 8723455965d+1*t40*t42*t60*t9+6.077066496460795d+1*t40*t42 5001 5 *t59*t9-6.077066496460795d+1*t37*t39*t59*t9+7.59633312057 5002 6 5993d+1*t37*t39*t58*t9-7.596333120575993d+1*t34*t36*t58*t 5003 7 9+9.115599744691193d+1*t34*t36*t57*t9-9.115599744691193d+ 5004 8 1*t31*t33*t57*t9+1.0634866368806391d+2*t31*t33*t56*t9-1.0 5005 9 634866368806391d+2*t28*t30*t56*t9+1.2154132992921589d+2*t 5006 : 28*t30*t55*t9-1.2154132992921589d+2*t25*t27*t55*t9+1.3673 5007 ; 399617036788d+2*t25*t27*t54*t9-1.3673399617036788d+2*t22* 5008 < t24*t54*t9+1.5192666241151986d+2*t22*t24*t53*t9-1.5192666 5009 = 241151986d+2*t19*t21*t53*t9+1.6711932865267184d+2*t19*t21 5010 > *t52*t9 5011 t92 = -1.6711932865267184d+2*t17*t65*t89*t9+1.51926662411519 5012 1 86d+1*t48*t75*t9-1.5192666241151986d+1*t16*t46*t75*t9+3.0 5013 2 38533248230397d+1*t16*t46*t74*t9-3.038533248230397d+1*t43 5014 3 *t45*t74*t9+4.5577998723455965d+1*t43*t45*t73*t9-4.557799 5015 4 8723455965d+1*t40*t42*t73*t9+6.077066496460795d+1*t40*t42 5016 5 *t72*t9-6.077066496460795d+1*t37*t39*t72*t9+7.59633312057 5017 6 5993d+1*t37*t39*t71*t9-7.596333120575993d+1*t34*t36*t71*t 5018 7 9+9.115599744691193d+1*t34*t36*t70*t9-9.115599744691193d+ 5019 8 1*t31*t33*t70*t9+1.0634866368806391d+2*t31*t33*t69*t9-1.0 5020 9 634866368806391d+2*t28*t30*t69*t9+1.2154132992921589d+2*t 5021 : 28*t30*t68*t9-1.2154132992921589d+2*t25*t27*t68*t9+1.3673 5022 ; 399617036788d+2*t25*t27*t67*t9-1.3673399617036788d+2*t22* 5023 < t24*t67*t9+1.5192666241151986d+2*t22*t24*t66*t9-1.5192666 5024 = 241151986d+2*t19*t21*t66*t9+1.6711932865267184d+2*t19*t21 5025 > *t65*t9 5026 t93 = -1.6711932865267184d+2*t17*t77*t89*t9+1.51926662411519 5027 1 86d+1*t48*t87*t9-1.5192666241151986d+1*t16*t46*t87*t9+3.0 5028 2 38533248230397d+1*t16*t46*t86*t9-3.038533248230397d+1*t43 5029 3 *t45*t86*t9+4.5577998723455965d+1*t43*t45*t85*t9-4.557799 5030 4 8723455965d+1*t40*t42*t85*t9+6.077066496460795d+1*t40*t42 5031 5 *t84*t9-6.077066496460795d+1*t37*t39*t84*t9+7.59633312057 5032 6 5993d+1*t37*t39*t83*t9-7.596333120575993d+1*t34*t36*t83*t 5033 7 9+9.115599744691193d+1*t34*t36*t82*t9-9.115599744691193d+ 5034 8 1*t31*t33*t82*t9+1.0634866368806391d+2*t31*t33*t81*t9-1.0 5035 9 634866368806391d+2*t28*t30*t81*t9+1.2154132992921589d+2*t 5036 : 28*t30*t80*t9-1.2154132992921589d+2*t25*t27*t80*t9+1.3673 5037 ; 399617036788d+2*t25*t27*t79*t9-1.3673399617036788d+2*t22* 5038 < t24*t79*t9+1.5192666241151986d+2*t22*t24*t78*t9-1.5192666 5039 = 241151986d+2*t19*t21*t78*t9+1.6711932865267184d+2*t19*t21 5040 > *t77*t9 5041 t94 = 1/t2**2 5042 t95 = 1/rhoa**2.3333333333333334d+0 5043 t96 = 1/t4 5044 t97 = rhoa**2 5045 t98 = 1/t97 5046 t99 = 2.63857249068588d-4*t98-4.2759414617680735d-2*t96 5047 t100 = 5.641895835477563d-1 5048 t101 = 1/t9 5049 t102 = t10*t99-2.63857249068588d-4*t98+6.41391219265211d-2*t 5050 1 96-1.6205510657228786d+2*t10*t6*t8+3.6846026734116505d+1* 5051 2 t10*t100*t101 5052 t103 = 1.4253138205893576d-2*t11*t96-4.275941461768073d-2*t1 5053 1 02*t6 5054 t104 = 1/rhoa**3.6666666666666664d+0 5055 t105 = 1.2407009817988002d+0*t12*t5-1.2407009817988002d+0*t5 5056 1 +9.305257363491002d-1*t103*t4 5057 t106 = -2.2d+1*t13*t17*t89-2.0d+0*t47*t48-2.0d+0*t16*t46*t47 5058 1 -4.0d+0*t16*t44*t46-4.0d+0*t43*t44*t45-6.0d+0*t41*t43*t45 5059 2 -6.0d+0*t40*t41*t42-8.0d+0*t38*t40*t42-8.0d+0*t37*t38*t39 5060 3 -1.0d+1*t35*t37*t39-1.0d+1*t34*t35*t36-1.2d+1*t32*t34*t36 5061 4 -1.2d+1*t31*t32*t33-1.4d+1*t29*t31*t33-1.4d+1*t28*t29*t30 5062 5 -1.6d+1*t26*t28*t30-1.6d+1*t25*t26*t27-1.8d+1*t23*t25*t27 5063 6 -1.8d+1*t22*t23*t24-2.0d+1*t20*t22*t24-2.0d+1*t19*t20*t21 5064 7 -2.2d+1*t13*t19*t21 5065 t107 = -2.2d+1*t17*t52*t89-2.0d+0*t48*t62-2.0d+0*t16*t46*t62 5066 1 -4.0d+0*t16*t46*t61-4.0d+0*t43*t45*t61-6.0d+0*t43*t45*t60 5067 2 -6.0d+0*t40*t42*t60-8.0d+0*t40*t42*t59-8.0d+0*t37*t39*t59 5068 3 -1.0d+1*t37*t39*t58-1.0d+1*t34*t36*t58-1.2d+1*t34*t36*t57 5069 4 -1.2d+1*t31*t33*t57-1.4d+1*t31*t33*t56-1.4d+1*t28*t30*t56 5070 5 -1.6d+1*t28*t30*t55-1.6d+1*t25*t27*t55-1.8d+1*t25*t27*t54 5071 6 -1.8d+1*t22*t24*t54-2.0d+1*t22*t24*t53-2.0d+1*t19*t21*t53 5072 7 -2.2d+1*t19*t21*t52 5073 t108 = -2.2d+1*t17*t65*t89-2.0d+0*t48*t75-2.0d+0*t16*t46*t75 5074 1 -4.0d+0*t16*t46*t74-4.0d+0*t43*t45*t74-6.0d+0*t43*t45*t73 5075 2 -6.0d+0*t40*t42*t73-8.0d+0*t40*t42*t72-8.0d+0*t37*t39*t72 5076 3 -1.0d+1*t37*t39*t71-1.0d+1*t34*t36*t71-1.2d+1*t34*t36*t70 5077 4 -1.2d+1*t31*t33*t70-1.4d+1*t31*t33*t69-1.4d+1*t28*t30*t69 5078 5 -1.6d+1*t28*t30*t68-1.6d+1*t25*t27*t68-1.8d+1*t25*t27*t67 5079 6 -1.8d+1*t22*t24*t67-2.0d+1*t22*t24*t66-2.0d+1*t19*t21*t66 5080 7 -2.2d+1*t19*t21*t65 5081 t109 = -2.2d+1*t17*t77*t89-2.0d+0*t48*t87-2.0d+0*t16*t46*t87 5082 1 -4.0d+0*t16*t46*t86-4.0d+0*t43*t45*t86-6.0d+0*t43*t45*t85 5083 2 -6.0d+0*t40*t42*t85-8.0d+0*t40*t42*t84-8.0d+0*t37*t39*t84 5084 3 -1.0d+1*t37*t39*t83-1.0d+1*t34*t36*t83-1.2d+1*t34*t36*t82 5085 4 -1.2d+1*t31*t33*t82-1.4d+1*t31*t33*t81-1.4d+1*t28*t30*t81 5086 5 -1.6d+1*t28*t30*t80-1.6d+1*t25*t27*t80-1.8d+1*t25*t27*t79 5087 6 -1.8d+1*t22*t24*t79-2.0d+1*t22*t24*t78-2.0d+1*t19*t21*t78 5088 7 -2.2d+1*t19*t21*t77 5089 t110 = 1/t18**13 5090 t111 = -1.1141288576844789d+2*t13*t17*t6*t89+2.5389881826654 5091 1 315d+4*t20*t21*t4*t89-5.585774001863949d+4*t13*t21*t4*t89 5092 2 +1.0128444160767991d+1*t47*t48*t6-1.0128444160767991d+1*t 5093 3 16*t46*t47*t6+2.0256888321535982d+1*t16*t44*t46*t6-2.0256 5094 4 888321535982d+1*t43*t44*t45*t6+3.038533248230397d+1*t41*t 5095 5 43*t45*t6-3.038533248230397d+1*t40*t41*t42*t6+4.051377664 5096 6 3071964d+1*t38*t40*t42*t6-4.0513776643071964d+1*t37*t38*t 5097 7 39*t6+5.064222080383994d+1*t35*t37*t39*t6-5.0642220803839 5098 8 94d+1*t34*t35*t36*t6+6.077066496460795d+1*t32*t34*t36*t6- 5099 9 6.077066496460795d+1*t31*t32*t33*t6+7.089910912537593d+1* 5100 : t29*t31*t33*t6-7.089910912537593d+1*t28*t29*t30*t6+8.1027 5101 ; 55328614393d+1*t26*t28*t30*t6-8.102755328614393d+1*t25*t2 5102 < 6*t27*t6+9.115599744691191d+1*t23*t25*t27*t6-9.1155997446 5103 = 91191d+1*t22*t23*t24*t6+1.012844416076799d+2*t20*t22*t24* 5104 > t6-1.012844416076799d+2*t19*t20*t21*t6+1.1141288576844789 5105 ? d+2*t13*t19*t21*t6-4.6163421503007845d+2*t4*t46*t47+4.616 5106 @ 3421503007845d+2*t16*t4*t43*t47+4.6163421503007845d+2*t4* 5107 1 t44*t46+1.3849026450902355d+3*t4*t40*t44*t45-4.1547079352 5108 2 707067d+3*t4*t40*t41*t45+2.769805290180471d+3*t38*t4*t40* 5109 3 t45-1.846536860120314d+3*t16*t4*t43*t44+1.384902645090235 5110 4 5d+3*t16*t4*t41*t43+2.769805290180471d+3*t37*t4*t41*t42-7 5111 5 .386147440481255d+3*t37*t38*t4*t42+4.616342150300784d+3*t 5112 6 35*t37*t4*t42+4.616342150300784d+3*t34*t38*t39*t4-1.15408 5113 7 5537575196d+4*t34*t35*t39*t4+6.924513225451178d+3*t32*t34 5114 8 *t39*t4+6.924513225451178d+3*t31*t35*t36*t4-1.66188317410 5115 9 8283d+4*t31*t32*t36*t4+9.694318515631648d+3*t29*t31*t36*t 5116 : 4+9.694318515631648d+3*t28*t32*t33*t4-2.2620076536473846d 5117 ; +4*t28*t29*t33*t4+1.2925758020842196d+4*t26*t28*t33*t4+1. 5118 < 2925758020842196d+4*t25*t29*t30*t4-2.954458976192502d+4*t 5119 = 25*t26*t30*t4+1.6618831741082823d+4*t23*t25*t30*t4+1.6618 5120 > 831741082823d+4*t22*t26*t27*t4-3.7392371417436354d+4*t22* 5121 ? t23*t27*t4+2.0773539676353528d+4*t20*t22*t27*t4+2.0773539 5122 @ 676353528d+4*t19*t23*t24*t4-4.616342150300784d+4*t19*t20* 5123 1 t24*t4+2.5389881826654315d+4*t13*t19*t24*t4+3.04678581919 5124 2 8518d+4*t110*t13*t17*t4 5125 t112 = -1.1141288576844789d+2*t17*t52*t6*t89+2.5389881826654 5126 1 315d+4*t21*t4*t53*t89-5.585774001863949d+4*t21*t4*t52*t89 5127 2 +1.0128444160767991d+1*t48*t6*t62-1.0128444160767991d+1*t 5128 3 16*t46*t6*t62-4.6163421503007845d+2*t4*t46*t62+4.61634215 5129 4 03007845d+2*t16*t4*t43*t62+2.0256888321535982d+1*t16*t46* 5130 5 t6*t61-2.0256888321535982d+1*t43*t45*t6*t61+4.61634215030 5131 6 07845d+2*t4*t46*t61+1.3849026450902355d+3*t4*t40*t45*t61- 5132 7 1.846536860120314d+3*t16*t4*t43*t61+3.038533248230397d+1* 5133 8 t43*t45*t6*t60-3.038533248230397d+1*t40*t42*t6*t60-4.1547 5134 9 079352707067d+3*t4*t40*t45*t60+1.3849026450902355d+3*t16* 5135 : t4*t43*t60+2.769805290180471d+3*t37*t4*t42*t60+4.05137766 5136 ; 43071964d+1*t40*t42*t59*t6-4.0513776643071964d+1*t37*t39* 5137 < t59*t6+5.064222080383994d+1*t37*t39*t58*t6-5.064222080383 5138 = 994d+1*t34*t36*t58*t6+6.077066496460795d+1*t34*t36*t57*t6 5139 > -6.077066496460795d+1*t31*t33*t57*t6+7.089910912537593d+1 5140 ? *t31*t33*t56*t6-7.089910912537593d+1*t28*t30*t56*t6+8.102 5141 @ 755328614393d+1*t28*t30*t55*t6-8.102755328614393d+1*t25*t 5142 1 27*t55*t6+9.115599744691191d+1*t25*t27*t54*t6-9.115599744 5143 2 691191d+1*t22*t24*t54*t6+1.012844416076799d+2*t22*t24*t53 5144 3 *t6-1.012844416076799d+2*t19*t21*t53*t6+1.114128857684478 5145 4 9d+2*t19*t21*t52*t6+2.769805290180471d+3*t4*t40*t45*t59-7 5146 5 .386147440481255d+3*t37*t4*t42*t59+4.616342150300784d+3*t 5147 6 34*t39*t4*t59+4.616342150300784d+3*t37*t4*t42*t58-1.15408 5148 7 5537575196d+4*t34*t39*t4*t58+6.924513225451178d+3*t31*t36 5149 8 *t4*t58+6.924513225451178d+3*t34*t39*t4*t57-1.66188317410 5150 9 8283d+4*t31*t36*t4*t57+9.694318515631648d+3*t28*t33*t4*t5 5151 : 7+9.694318515631648d+3*t31*t36*t4*t56-2.2620076536473846d 5152 ; +4*t28*t33*t4*t56+1.2925758020842196d+4*t25*t30*t4*t56+1. 5153 < 2925758020842196d+4*t28*t33*t4*t55-2.954458976192502d+4*t 5154 = 25*t30*t4*t55+1.6618831741082823d+4*t22*t27*t4*t55+1.6618 5155 > 831741082823d+4*t25*t30*t4*t54-3.7392371417436354d+4*t22* 5156 ? t27*t4*t54+2.0773539676353528d+4*t19*t24*t4*t54+2.0773539 5157 @ 676353528d+4*t22*t27*t4*t53-4.616342150300784d+4*t19*t24* 5158 1 t4*t53+2.5389881826654315d+4*t19*t24*t4*t52+3.04678581919 5159 2 8518d+4*t110*t17*t4*t52 5160 t113 = 2.5389881826654315d+4*t21*t4*t66*t89-1.11412885768447 5161 1 89d+2*t17*t6*t65*t89-5.585774001863949d+4*t21*t4*t65*t89+ 5162 2 1.0128444160767991d+1*t48*t6*t75-1.0128444160767991d+1*t1 5163 3 6*t46*t6*t75-4.6163421503007845d+2*t4*t46*t75+4.616342150 5164 4 3007845d+2*t16*t4*t43*t75+2.0256888321535982d+1*t16*t46*t 5165 5 6*t74-2.0256888321535982d+1*t43*t45*t6*t74+4.616342150300 5166 6 7845d+2*t4*t46*t74+1.3849026450902355d+3*t4*t40*t45*t74-1 5167 7 .846536860120314d+3*t16*t4*t43*t74+3.038533248230397d+1*t 5168 8 43*t45*t6*t73-3.038533248230397d+1*t40*t42*t6*t73-4.15470 5169 9 79352707067d+3*t4*t40*t45*t73+1.3849026450902355d+3*t16*t 5170 : 4*t43*t73+2.769805290180471d+3*t37*t4*t42*t73+4.051377664 5171 ; 3071964d+1*t40*t42*t6*t72-4.0513776643071964d+1*t37*t39*t 5172 < 6*t72+2.769805290180471d+3*t4*t40*t45*t72-7.3861474404812 5173 = 55d+3*t37*t4*t42*t72+4.616342150300784d+3*t34*t39*t4*t72+ 5174 > 5.064222080383994d+1*t37*t39*t6*t71-5.064222080383994d+1* 5175 ? t34*t36*t6*t71+4.616342150300784d+3*t37*t4*t42*t71-1.1540 5176 @ 85537575196d+4*t34*t39*t4*t71+6.924513225451178d+3*t31*t3 5177 1 6*t4*t71+6.077066496460795d+1*t34*t36*t6*t70-6.0770664964 5178 2 60795d+1*t31*t33*t6*t70+6.924513225451178d+3*t34*t39*t4*t 5179 3 70-1.661883174108283d+4*t31*t36*t4*t70+9.694318515631648d 5180 4 +3*t28*t33*t4*t70+7.089910912537593d+1*t31*t33*t6*t69-7.0 5181 5 89910912537593d+1*t28*t30*t6*t69+9.694318515631648d+3*t31 5182 6 *t36*t4*t69-2.2620076536473846d+4*t28*t33*t4*t69+1.292575 5183 7 8020842196d+4*t25*t30*t4*t69+8.102755328614393d+1*t28*t30 5184 8 *t6*t68-8.102755328614393d+1*t25*t27*t6*t68+1.29257580208 5185 9 42196d+4*t28*t33*t4*t68-2.954458976192502d+4*t25*t30*t4*t 5186 : 68+1.6618831741082823d+4*t22*t27*t4*t68+9.115599744691191 5187 ; d+1*t25*t27*t6*t67-9.115599744691191d+1*t22*t24*t6*t67+1. 5188 < 6618831741082823d+4*t25*t30*t4*t67-3.7392371417436354d+4* 5189 = t22*t27*t4*t67+2.0773539676353528d+4*t19*t24*t4*t67+1.012 5190 > 844416076799d+2*t22*t24*t6*t66-1.012844416076799d+2*t19*t 5191 ? 21*t6*t66+2.0773539676353528d+4*t22*t27*t4*t66-4.61634215 5192 @ 0300784d+4*t19*t24*t4*t66+1.1141288576844789d+2*t19*t21*t 5193 1 6*t65+2.5389881826654315d+4*t19*t24*t4*t65+3.046785819198 5194 2 518d+4*t110*t17*t4*t65 5195 t114 = 2.5389881826654315d+4*t21*t4*t78*t89-1.11412885768447 5196 1 89d+2*t17*t6*t77*t89-5.585774001863949d+4*t21*t4*t77*t89+ 5197 2 1.0128444160767991d+1*t48*t6*t87-1.0128444160767991d+1*t1 5198 3 6*t46*t6*t87-4.6163421503007845d+2*t4*t46*t87+4.616342150 5199 4 3007845d+2*t16*t4*t43*t87+2.0256888321535982d+1*t16*t46*t 5200 5 6*t86-2.0256888321535982d+1*t43*t45*t6*t86+4.616342150300 5201 6 7845d+2*t4*t46*t86+1.3849026450902355d+3*t4*t40*t45*t86-1 5202 7 .846536860120314d+3*t16*t4*t43*t86+3.038533248230397d+1*t 5203 8 43*t45*t6*t85-3.038533248230397d+1*t40*t42*t6*t85-4.15470 5204 9 79352707067d+3*t4*t40*t45*t85+1.3849026450902355d+3*t16*t 5205 : 4*t43*t85+2.769805290180471d+3*t37*t4*t42*t85+4.051377664 5206 ; 3071964d+1*t40*t42*t6*t84-4.0513776643071964d+1*t37*t39*t 5207 < 6*t84+2.769805290180471d+3*t4*t40*t45*t84-7.3861474404812 5208 = 55d+3*t37*t4*t42*t84+4.616342150300784d+3*t34*t39*t4*t84+ 5209 > 5.064222080383994d+1*t37*t39*t6*t83-5.064222080383994d+1* 5210 ? t34*t36*t6*t83+4.616342150300784d+3*t37*t4*t42*t83-1.1540 5211 @ 85537575196d+4*t34*t39*t4*t83+6.924513225451178d+3*t31*t3 5212 1 6*t4*t83+6.077066496460795d+1*t34*t36*t6*t82-6.0770664964 5213 2 60795d+1*t31*t33*t6*t82+6.924513225451178d+3*t34*t39*t4*t 5214 3 82-1.661883174108283d+4*t31*t36*t4*t82+9.694318515631648d 5215 4 +3*t28*t33*t4*t82+7.089910912537593d+1*t31*t33*t6*t81-7.0 5216 5 89910912537593d+1*t28*t30*t6*t81+9.694318515631648d+3*t31 5217 6 *t36*t4*t81-2.2620076536473846d+4*t28*t33*t4*t81+1.292575 5218 7 8020842196d+4*t25*t30*t4*t81+8.102755328614393d+1*t28*t30 5219 8 *t6*t80-8.102755328614393d+1*t25*t27*t6*t80+1.29257580208 5220 9 42196d+4*t28*t33*t4*t80-2.954458976192502d+4*t25*t30*t4*t 5221 : 80+1.6618831741082823d+4*t22*t27*t4*t80+9.115599744691191 5222 ; d+1*t25*t27*t6*t79-9.115599744691191d+1*t22*t24*t6*t79+1. 5223 < 6618831741082823d+4*t25*t30*t4*t79-3.7392371417436354d+4* 5224 = t22*t27*t4*t79+2.0773539676353528d+4*t19*t24*t4*t79+1.012 5225 > 844416076799d+2*t22*t24*t6*t78-1.012844416076799d+2*t19*t 5226 ? 21*t6*t78+2.0773539676353528d+4*t22*t27*t4*t78-4.61634215 5227 @ 0300784d+4*t19*t24*t4*t78+1.1141288576844789d+2*t19*t21*t 5228 1 6*t77+2.5389881826654315d+4*t19*t24*t4*t77+3.046785819198 5229 2 518d+4*t110*t17*t4*t77 5230 t115 = gammaaa**2 5231 t116 = 1/t2**3 5232 t117 = 1/rhoa**6 5233 t118 = 1/rhoa**3.3333333333333337d+0 5234 t119 = 1/rhoa**3 5235 t120 = 5.701255282357431d-2*t95-5.27714498137176d-4*t119 5236 t121 = 1/t14 5237 t122 = -3.241102131445757d+2*t10*t6*t99+5.401836885742928d+1 5238 1 *t10*t8*t96-8.551882923536147d-2*t95+2.626185756615557d+4 5239 2 *t10*t101*t8-5.971086789162617d+3*t10*t100*t7-2.456401782 5240 3 2744336d+1*t10*t100*t121+t10*t120+5.27714498137176d-4*t11 5241 4 9 5242 t123 = 2.850627641178715d-2*t102*t96-1.9004184274524766d-2*t 5243 1 11*t95-4.275941461768073d-2*t122*t6 5244 t124 = 1/rhoa**7.333333333333333d+0 5245 t125 = 1/rhoa**4.666666666666667d+0 5246 t126 = 2.4814019635976003d+0*t103*t5+9.305257363491002d-1*t1 5247 1 23*t4+4.135669939329334d-1*t101*t12-4.135669939329334d-1* 5248 2 t101 5249 t127 = 1.7926167019779404d-2*gammaaa*t12*t90+1.7926167019779 5250 1 404d-2*gammaaa*t103*t49 5251 t128 = -4.135669939329334d-1*t12*t51*t63-4.135669939329334d- 5252 1 1*t12*t3*t49 5253 t129 = 1.0082032889066277d-2*gammaaa*t12*t50*t91+1.008203288 5254 1 9066277d-2*gammaaa*t103*t50*t63 5255 t130 = -1.9264558001493193d-2*gammaaa*t64*t92-1.926455800149 5256 1 3193d-2*gammaaa*t105*t76 5257 t131 = -1.0834770598202839d-2*gammaaa*t50*t64*t93-1.08347705 5258 1 98202839d-2*gammaaa*t105*t50*t88 5259 t132 = 1/rhoa**5 5260 t133 = 1/rhoa**6.333333333333333d+0 5261 t134 = -3.361156316208638d-3*t12*t90-3.361156316208638d-3*t1 5262 1 03*t49 5263 t135 = 3.612104625279974d-3*t64*t92+3.612104625279974d-3*t10 5264 1 5*t76 5265 t136 = 1/rhoa**4 5266 t137 = 1/rhoa**5.333333333333333d+0 5267 t138 = 3.342386573053437d+3*t20*t21*t89*t9+6.077066496460795 5268 1 d+1*t16*t43*t47*t9-6.077066496460795d+1*t44*t46*t9+1.8231 5269 2 199489382385d+2*t40*t44*t45*t9-3.646239897876477d+2*t38*t 5270 3 40*t45*t9-1.8231199489382385d+2*t16*t41*t43*t9+3.64623989 5271 4 7876477d+2*t37*t41*t42*t9-6.077066496460795d+2*t35*t37*t4 5272 5 2*t9+6.077066496460795d+2*t34*t38*t39*t9-9.11559974469119 5273 6 2d+2*t32*t34*t39*t9+9.115599744691192d+2*t31*t35*t36*t9-1 5274 7 .276183964256767d+3*t29*t31*t36*t9+1.276183964256767d+3*t 5275 8 28*t32*t33*t9-1.7015786190090226d+3*t26*t28*t33*t9+1.7015 5276 9 786190090226d+3*t25*t29*t30*t9-2.187743938725886d+3*t23*t 5277 : 25*t30*t9+2.187743938725886d+3*t22*t26*t27*t9-2.734679923 5278 ; 407357d+3*t20*t22*t27*t9+2.734679923407357d+3*t19*t23*t24 5279 < *t9-3.342386573053437d+3*t13*t19*t24*t9+4.010863887664124 5280 = 5d+3*t110*t13*t17*t9 5281 t139 = 3.342386573053437d+3*t21*t53*t89*t9+6.077066496460795 5282 1 d+1*t16*t43*t62*t9-6.077066496460795d+1*t46*t61*t9+1.8231 5283 2 199489382385d+2*t40*t45*t61*t9-1.8231199489382385d+2*t16* 5284 3 t43*t60*t9+3.646239897876477d+2*t37*t42*t60*t9-3.64623989 5285 4 7876477d+2*t40*t45*t59*t9+6.077066496460795d+2*t34*t39*t5 5286 5 9*t9-6.077066496460795d+2*t37*t42*t58*t9+9.11559974469119 5287 6 2d+2*t31*t36*t58*t9-9.115599744691192d+2*t34*t39*t57*t9+1 5288 7 .276183964256767d+3*t28*t33*t57*t9-1.276183964256767d+3*t 5289 8 31*t36*t56*t9+1.7015786190090226d+3*t25*t30*t56*t9-1.7015 5290 9 786190090226d+3*t28*t33*t55*t9+2.187743938725886d+3*t22*t 5291 : 27*t55*t9-2.187743938725886d+3*t25*t30*t54*t9+2.734679923 5292 ; 407357d+3*t19*t24*t54*t9-2.734679923407357d+3*t22*t27*t53 5293 < *t9-3.342386573053437d+3*t19*t24*t52*t9+4.010863887664124 5294 = 5d+3*t110*t17*t52*t9 5295 t140 = 3.342386573053437d+3*t21*t66*t89*t9+6.077066496460795 5296 1 d+1*t16*t43*t75*t9-6.077066496460795d+1*t46*t74*t9+1.8231 5297 2 199489382385d+2*t40*t45*t74*t9-1.8231199489382385d+2*t16* 5298 3 t43*t73*t9+3.646239897876477d+2*t37*t42*t73*t9-3.64623989 5299 4 7876477d+2*t40*t45*t72*t9+6.077066496460795d+2*t34*t39*t7 5300 5 2*t9-6.077066496460795d+2*t37*t42*t71*t9+9.11559974469119 5301 6 2d+2*t31*t36*t71*t9-9.115599744691192d+2*t34*t39*t70*t9+1 5302 7 .276183964256767d+3*t28*t33*t70*t9-1.276183964256767d+3*t 5303 8 31*t36*t69*t9+1.7015786190090226d+3*t25*t30*t69*t9-1.7015 5304 9 786190090226d+3*t28*t33*t68*t9+2.187743938725886d+3*t22*t 5305 : 27*t68*t9-2.187743938725886d+3*t25*t30*t67*t9+2.734679923 5306 ; 407357d+3*t19*t24*t67*t9-2.734679923407357d+3*t22*t27*t66 5307 < *t9-3.342386573053437d+3*t19*t24*t65*t9+4.010863887664124 5308 = 5d+3*t110*t17*t65*t9 5309 t141 = 3.342386573053437d+3*t21*t78*t89*t9+6.077066496460795 5310 1 d+1*t16*t43*t87*t9-6.077066496460795d+1*t46*t86*t9+1.8231 5311 2 199489382385d+2*t40*t45*t86*t9-1.8231199489382385d+2*t16* 5312 3 t43*t85*t9+3.646239897876477d+2*t37*t42*t85*t9-3.64623989 5313 4 7876477d+2*t40*t45*t84*t9+6.077066496460795d+2*t34*t39*t8 5314 5 4*t9-6.077066496460795d+2*t37*t42*t83*t9+9.11559974469119 5315 6 2d+2*t31*t36*t83*t9-9.115599744691192d+2*t34*t39*t82*t9+1 5316 7 .276183964256767d+3*t28*t33*t82*t9-1.276183964256767d+3*t 5317 8 31*t36*t81*t9+1.7015786190090226d+3*t25*t30*t81*t9-1.7015 5318 9 786190090226d+3*t28*t33*t80*t9+2.187743938725886d+3*t22*t 5319 : 27*t80*t9-2.187743938725886d+3*t25*t30*t79*t9+2.734679923 5320 ; 407357d+3*t19*t24*t79*t9-2.734679923407357d+3*t22*t27*t78 5321 < *t9-3.342386573053437d+3*t19*t24*t77*t9+4.010863887664124 5322 = 5d+3*t110*t17*t77*t9 5323 t142 = 1/t18**14 5324 t143 = gammaaa**3 5325 t144 = 1/t2**4 5326 t145 = 1/rhoa**9.666666666666666d+0 5327 t146 = 1/rhoa**7 5328 t147 = 1/rhoa**4.333333333333333d+0 5329 t148 = -4.275941461768073d-2*t6*(1.6205510657228786d+2*t10*t 5330 1 96*t99+7.878557269846671d+4*t10*t101*t99+9.95181131527102 5331 2 9d+3*t10*t100*t98+9.676451059701281d+5*t10*t100*t96-7.202 5332 3 44918099057d+1*t10*t8*t95-4.255868126669586d+6*t10*t7*t8- 5333 4 2.626185756615557d+4*t10*t121*t8-4.8616531971686355d+2*t1 5334 5 0*t120*t6-1.5831434944115283d-3*t136+t10*(1.5831434944115 5335 6 283d-3*t136-1.330292899216734d-1*t118)+1.995439348825101d 5336 7 -1*t118+4.0940029704573894d+1*t1*t10*t100)+4.275941461768 5337 8 0724d-2*t122*t96-5.701255282357429d-2*t102*t95+4.43430966 5338 9 4055779d-2*t11*t118 5339 t149 = 1/rhoa**11 5340 t150 = 1/rhoa**8.333333333333334d+0 5341 t151 = 1/rhoa**5.666666666666667d+0 5342 t152 = 3.7221029453964005d+0*t123*t5+9.305257363491002d-1*t1 5343 1 48*t4-2.7571132928862224d-1*t12*t121+2.7571132928862224d- 5344 2 1*t121+1.2407009817988002d+0*t101*t103 5345 t153 = 1/rhoa**8.666666666666666d+0 5346 t154 = 1/rhoa**10 5347 t155 = 1/rhoa**7.666666666666667d+0 5348 t156 = 1/rhoa**9 5349 t157 = 1/rhoa**6.666666666666667d+0 5350 t158 = 1/rhoa**8 5351 fnc(iq) = 2.0d+0*(t51*t64*t88+t3*t64*t76-9.305257363491002d- 5352 1 1*t12*t4*t51*t63-9.305257363491002d-1*t12*t3*t4*t49)*wght 5353 2 +fnc(iq) 5354 Amat(iq,D1_RA) = 1.0d+0*(8.963083509889702d-3*gammaaa*t12*t4 5355 1 9*t94*t95+5.041016444533138d-3*gammaaa*t12*t50*t63*t95-9. 5356 2 632279000746596d-3*gammaaa*t104*t64*t76*t94+t51*t64*t93+t 5357 3 3*t64*t92-9.305257363491002d-1*t12*t4*t51*t91-9.305257363 5358 4 491002d-1*t12*t3*t4*t90-5.417385299101419d-3*gammaaa*t104 5359 5 *t50*t64*t88+t105*t51*t88+t105*t3*t76-1.2407009817988002d 5360 6 +0*t12*t5*t51*t63-9.305257363491002d-1*t103*t4*t51*t63-1. 5361 7 2407009817988002d+0*t12*t3*t49*t5-9.305257363491002d-1*t1 5362 8 03*t3*t4*t49)*wght+Amat(iq,D1_RA) 5363 Cmat(iq,D1_GAA) = 1.0d+0*(-3.361156316208638d-3*t12*t49*t94* 5364 1 t96-1.890381166699927d-3*t12*t50*t63*t96+3.61210462527997 5365 2 4d-3*t1*t64*t76*t94+2.0315194871630324d-3*t1*t50*t64*t88) 5366 3 *wght+Cmat(iq,D1_GAA) 5367 Cmat(iq,D1_GAB) = Cmat(iq,D1_GAB) 5368 Mmat(iq,D1_TA) = 1.0d+0*(t109*t51*t64+t108*t3*t64-9.30525736 5369 1 3491002d-1*t107*t12*t4*t51-9.305257363491002d-1*t106*t12* 5370 2 t3*t4)*wght+Mmat(iq,D1_TA) 5371 Amat2(iq,D2_RA_RA) = 1.0d+0*(t127*t94*t95+t129*t95+3.5318356 5372 1 336070855d-2*gammaaa*t125*t64*t76*t94-8.963083509889707d- 5373 2 3*gammaaa*t118*t12*t49*t94+t104*t130*t94+2*t105*t51*t93+2 5374 3 *t105*t3*t92-2.4814019635976003d+0*t12*t5*t51*t91-1.86105 5375 4 14726982003d+0*t103*t4*t51*t91-2.4814019635976003d+0*t12* 5376 5 t3*t5*t90-1.8610514726982003d+0*t103*t3*t4*t90+1.98637460 5377 6 96705204d-2*gammaaa*t125*t50*t64*t88-5.316678166471045d-5 5378 7 *t115*t124*t50*t64*t88+t126*t51*t88-2.3079800683637772d-4 5379 8 *t115*t116*t124*t64*t76+t126*t3*t76+t114*t51*t64+t113*t3* 5380 9 t64-2.4814019635976003d+0*t103*t5*t51*t63-9.3052573634910 5381 : 02d-1*t123*t4*t51*t63-5.041016444533138d-3*gammaaa*t118*t 5382 ; 12*t50*t63+4.947305865786653d-5*t115*t117*t12*t50*t63-9.3 5383 < 05257363491002d-1*t112*t12*t4*t51-2.4814019635976003d+0*t 5384 = 103*t3*t49*t5-9.305257363491002d-1*t123*t3*t4*t49+2.14763 5385 > 48525932504d-4*t115*t116*t117*t12*t49-9.305257363491002d- 5386 ? 1*t111*t12*t3*t4+t104*t131+t101*t128)*wght+Amat2(iq,D2_RA 5387 @ _RA) 5388 Amat2(iq,D2_RA_RB) = Amat2(iq,D2_RA_RB) 5389 Cmat2(iq,D2_RA_GAA) = 1.0d+0*(t134*t94*t96+(-1.8903811666999 5390 1 27d-3*t12*t50*t91-1.890381166699927d-3*t103*t50*t63)*t96+ 5391 2 4.481541754944851d-3*t12*t49*t94*t95+2.520508222266569d-3 5392 3 *t12*t50*t63*t95-9.632279000746596d-3*t104*t64*t76*t94+t1 5393 4 *t135*t94+t1*(2.0315194871630324d-3*t50*t64*t93+2.0315194 5394 5 871630324d-3*t105*t50*t88)+1.9937543124266421d-5*gammaaa* 5395 6 t133*t50*t64*t88-5.417385299101419d-3*t104*t50*t64*t88+8. 5396 7 654925256364164d-5*gammaaa*t116*t133*t64*t76-1.8552396996 5397 8 69995d-5*gammaaa*t12*t132*t50*t63-8.05363069722469d-5*gam 5398 9 maaa*t116*t12*t132*t49)*wght+Cmat2(iq,D2_RA_GAA) 5399 Cmat2(iq,D2_RA_GAB) = Cmat2(iq,D2_RA_GAB) 5400 Cmat2(iq,D2_RA_GBB) = Cmat2(iq,D2_RA_GBB) 5401 Cmat2(iq,D2_GAA_GAA) = 1.0d+0*(-7.476578671599909d-6*t137*t5 5402 1 0*t64*t88-3.245596971136562d-5*t116*t137*t64*t76+6.957148 5403 2 873762482d-6*t12*t136*t50*t63+3.020111511459258d-5*t116*t 5404 3 12*t136*t49)*wght+Cmat2(iq,D2_GAA_GAA) 5405 Cmat2(iq,D2_GAA_GAB) = Cmat2(iq,D2_GAA_GAB) 5406 Cmat2(iq,D2_GAA_GBB) = Cmat2(iq,D2_GAA_GBB) 5407 Cmat2(iq,D2_GAB_GAB) = Cmat2(iq,D2_GAB_GAB) 5408 Mmat2(iq,D2_RA_TA) = 1.0d+0*(8.963083509889702d-3*gammaaa*t1 5409 1 06*t12*t94*t95+5.041016444533138d-3*gammaaa*t107*t12*t50* 5410 2 t95-9.632279000746596d-3*gammaaa*t104*t108*t64*t94+t141*t 5411 3 51*t64-5.417385299101419d-3*gammaaa*t104*t109*t50*t64+t14 5412 4 0*t3*t64-1.2407009817988002d+0*t107*t12*t5*t51-9.30525736 5413 5 3491002d-1*t12*t139*t4*t51-9.305257363491002d-1*t103*t107 5414 6 *t4*t51+t105*t109*t51-1.2407009817988002d+0*t106*t12*t3*t 5415 7 5-9.305257363491002d-1*t12*t138*t3*t4-9.305257363491002d- 5416 8 1*t103*t106*t3*t4+t105*t108*t3)*wght+Mmat2(iq,D2_RA_TA) 5417 Mmat2(iq,D2_RA_TB) = Mmat2(iq,D2_RA_TB) 5418 Mmat2(iq,D2_GAA_TA) = 1.0d+0*(-3.361156316208638d-3*t106*t12 5419 1 *t94*t96-1.890381166699927d-3*t107*t12*t50*t96+3.61210462 5420 2 5279974d-3*t1*t108*t64*t94+2.0315194871630324d-3*t1*t109* 5421 3 t50*t64)*wght+Mmat2(iq,D2_GAA_TA) 5422 Mmat2(iq,D2_GAA_TB) = Mmat2(iq,D2_GAA_TB) 5423 Mmat2(iq,D2_GAB_TA) = Mmat2(iq,D2_GAB_TA) 5424 Mmat2(iq,D2_TA_TA) = 1.0d+0*(t51*t64*(4.4d+2*t21*t78*t89+9.6 5425 1 8d+2*t21*t77*t89+8.0d+0*t46*t87+8.0d+0*t16*t43*t87+8.0d+0 5426 2 *t46*t86+2.4d+1*t40*t45*t86+3.2d+1*t16*t43*t86+7.2d+1*t40 5427 3 *t45*t85+2.4d+1*t16*t43*t85+4.8d+1*t37*t42*t85+4.8d+1*t40 5428 4 *t45*t84+1.28d+2*t37*t42*t84+8.0d+1*t34*t39*t84+8.0d+1*t3 5429 5 7*t42*t83+2.0d+2*t34*t39*t83+1.2d+2*t31*t36*t83+1.2d+2*t3 5430 6 4*t39*t82+2.88d+2*t31*t36*t82+1.68d+2*t28*t33*t82+1.68d+2 5431 7 *t31*t36*t81+3.92d+2*t28*t33*t81+2.24d+2*t25*t30*t81+2.24 5432 8 d+2*t28*t33*t80+5.12d+2*t25*t30*t80+2.88d+2*t22*t27*t80+2 5433 9 .88d+2*t25*t30*t79+6.48d+2*t22*t27*t79+3.6d+2*t19*t24*t79 5434 : +3.6d+2*t22*t27*t78+8.0d+2*t19*t24*t78+4.4d+2*t19*t24*t77 5435 ; +5.28d+2*t110*t17*t77)+t3*t64*(4.4d+2*t21*t66*t89+9.68d+2 5436 < *t21*t65*t89+8.0d+0*t46*t75+8.0d+0*t16*t43*t75+8.0d+0*t46 5437 = *t74+2.4d+1*t40*t45*t74+3.2d+1*t16*t43*t74+7.2d+1*t40*t45 5438 > *t73+2.4d+1*t16*t43*t73+4.8d+1*t37*t42*t73+4.8d+1*t40*t45 5439 ? *t72+1.28d+2*t37*t42*t72+8.0d+1*t34*t39*t72+8.0d+1*t37*t4 5440 @ 2*t71+2.0d+2*t34*t39*t71+1.2d+2*t31*t36*t71+1.2d+2*t34*t3 5441 1 9*t70+2.88d+2*t31*t36*t70+1.68d+2*t28*t33*t70+1.68d+2*t31 5442 2 *t36*t69+3.92d+2*t28*t33*t69+2.24d+2*t25*t30*t69+2.24d+2* 5443 3 t28*t33*t68+5.12d+2*t25*t30*t68+2.88d+2*t22*t27*t68+2.88d 5444 4 +2*t25*t30*t67+6.48d+2*t22*t27*t67+3.6d+2*t19*t24*t67+3.6 5445 5 d+2*t22*t27*t66+8.0d+2*t19*t24*t66+4.4d+2*t19*t24*t65+5.2 5446 6 8d+2*t110*t17*t65)-9.305257363491002d-1*t12*t4*t51*(4.4d+ 5447 7 2*t21*t53*t89+9.68d+2*t21*t52*t89+8.0d+0*t46*t62+8.0d+0*t 5448 8 16*t43*t62+8.0d+0*t46*t61+2.4d+1*t40*t45*t61+3.2d+1*t16*t 5449 9 43*t61+7.2d+1*t40*t45*t60+2.4d+1*t16*t43*t60+4.8d+1*t37*t 5450 : 42*t60+4.8d+1*t40*t45*t59+1.28d+2*t37*t42*t59+8.0d+1*t34* 5451 ; t39*t59+8.0d+1*t37*t42*t58+2.0d+2*t34*t39*t58+1.2d+2*t31* 5452 < t36*t58+1.2d+2*t34*t39*t57+2.88d+2*t31*t36*t57+1.68d+2*t2 5453 = 8*t33*t57+1.68d+2*t31*t36*t56+3.92d+2*t28*t33*t56+2.24d+2 5454 > *t25*t30*t56+2.24d+2*t28*t33*t55+5.12d+2*t25*t30*t55+2.88 5455 ? d+2*t22*t27*t55+2.88d+2*t25*t30*t54+6.48d+2*t22*t27*t54+3 5456 @ .6d+2*t19*t24*t54+3.6d+2*t22*t27*t53+8.0d+2*t19*t24*t53+4 5457 1 .4d+2*t19*t24*t52+5.28d+2*t110*t17*t52)-9.305257363491002 5458 2 d-1*t12*t3*t4*(4.4d+2*t20*t21*t89+9.68d+2*t13*t21*t89+8.0 5459 3 d+0*t46*t47+8.0d+0*t16*t43*t47+8.0d+0*t44*t46+2.4d+1*t40* 5460 4 t44*t45+7.2d+1*t40*t41*t45+4.8d+1*t38*t40*t45+3.2d+1*t16* 5461 5 t43*t44+2.4d+1*t16*t41*t43+4.8d+1*t37*t41*t42+1.28d+2*t37 5462 6 *t38*t42+8.0d+1*t35*t37*t42+8.0d+1*t34*t38*t39+2.0d+2*t34 5463 7 *t35*t39+1.2d+2*t32*t34*t39+1.2d+2*t31*t35*t36+2.88d+2*t3 5464 8 1*t32*t36+1.68d+2*t29*t31*t36+1.68d+2*t28*t32*t33+3.92d+2 5465 9 *t28*t29*t33+2.24d+2*t26*t28*t33+2.24d+2*t25*t29*t30+5.12 5466 : d+2*t25*t26*t30+2.88d+2*t23*t25*t30+2.88d+2*t22*t26*t27+6 5467 ; .48d+2*t22*t23*t27+3.6d+2*t20*t22*t27+3.6d+2*t19*t23*t24+ 5468 < 8.0d+2*t19*t20*t24+4.4d+2*t13*t19*t24+5.28d+2*t110*t13*t1 5469 = 7))*wght+Mmat2(iq,D2_TA_TA) 5470 Mmat2(iq,D2_TA_TB) = Mmat2(iq,D2_TA_TB) 5471 Amat3(iq,D3_RA_RA_RA) = 1.0d+0*(t51*t64*(-3.4716600044518436 5472 1 d+6*t24*t79*t89*t97+1.1572200014839477d+7*t24*t78*t89*t97 5473 2 -1.2729420016323426d+7*t24*t77*t89*t97+2.104036366334451d 5474 3 +4*t43*t87*t97-2.104036366334451d+4*t16*t40*t87*t97-8.416 5475 4 145465337804d+4*t37*t45*t86*t97-4.208072732668902d+4*t43* 5476 5 t86*t97+1.2624218198006704d+5*t16*t40*t86*t97+3.787265459 5477 6 402013d+5*t37*t45*t85*t97+2.104036366334451d+4*t43*t85*t9 5478 7 7-2.104036366334451d+5*t34*t42*t85*t97-1.8936327297010064 5479 8 d+5*t16*t40*t85*t97-5.049687279202681d+5*t37*t45*t84*t97+ 5480 9 8.416145465337803d+5*t34*t42*t84*t97+8.416145465337804d+4 5481 : *t16*t40*t84*t97-4.2080727326689016d+5*t31*t39*t84*t97+2. 5482 ; 1040363663344508d+5*t37*t45*t83*t97-1.0520181831672254d+6 5483 < *t34*t42*t83*t97+1.578027274750838d+6*t31*t39*t83*t97-7.3 5484 = 64127282170578d+5*t28*t36*t83*t97+4.208072732668902d+5*t3 5485 > 4*t42*t82*t97-1.893632729701006d+6*t31*t39*t82*t97+2.6510 5486 ? 858215814087d+6*t28*t36*t82*t97-1.1782603651472927d+6*t25 5487 @ *t33*t82*t97+7.364127282170578d+5*t31*t39*t81*t97-3.09293 5488 1 34585116436d+6*t28*t36*t81*t97+4.123911278015524d+6*t25*t 5489 2 33*t81*t97-1.7673905477209387d+6*t22*t30*t81*t97+1.178260 5490 3 3651472927d+6*t28*t36*t80*t97-4.713041460589171d+6*t25*t3 5491 4 3*t80*t97+6.059624735043219d+6*t22*t30*t80*t97-2.52484363 5492 5 9601341d+6*t19*t27*t80*t97+1.767390547720939d+6*t25*t33*t 5493 6 79*t97-6.817077826923622d+6*t22*t30*t79*t97+8.52134728365 5494 7 4526d+6*t19*t27*t79*t97+2.524843639601341d+6*t22*t30*t78* 5495 8 t97-9.468163648505028d+6*t19*t27*t78*t97-4.62888000593579 5496 9 2d+6*t110*t21*t78*t97+3.4716600044518436d+6*t19*t27*t77*t 5497 : 97+1.5275304019588112d+7*t110*t21*t77*t97-6.0175440077165 5498 ; 3d+6*t142*t17*t77*t97+3.713762858948263d+1*t17*t77*t89*t9 5499 < 6-3.37614805358933d+0*t48*t87*t96+3.37614805358933d+0*t16 5500 = *t46*t87*t96-6.75229610717866d+0*t16*t46*t86*t96+6.752296 5501 > 10717866d+0*t43*t45*t86*t96-1.0128444160767991d+1*t43*t45 5502 ? *t85*t96+1.0128444160767991d+1*t40*t42*t85*t96-1.35045922 5503 @ 1435732d+1*t40*t42*t84*t96+1.350459221435732d+1*t37*t39*t 5504 1 84*t96-1.6880740267946648d+1*t37*t39*t83*t96+1.6880740267 5505 2 946648d+1*t34*t36*t83*t96-2.0256888321535982d+1*t34*t36*t 5506 3 82*t96+2.0256888321535982d+1*t31*t33*t82*t96-2.3633036375 5507 4 125308d+1*t31*t33*t81*t96+2.3633036375125308d+1*t28*t30*t 5508 5 81*t96-2.700918442871464d+1*t28*t30*t80*t96+2.70091844287 5509 6 1464d+1*t25*t27*t80*t96-3.0385332482303967d+1*t25*t27*t79 5510 7 *t96+3.0385332482303967d+1*t22*t24*t79*t96-3.376148053589 5511 8 3296d+1*t22*t24*t78*t96+3.3761480535893296d+1*t19*t21*t78 5512 9 *t96-3.713762858948263d+1*t19*t21*t77*t96+5.0779763653308 5513 : 62d+4*t21*t5*t78*t89-1.1171548003727898d+5*t21*t5*t77*t89 5514 ; -9.232684300601568d+2*t46*t5*t87+9.232684300601568d+2*t16 5515 < *t43*t5*t87+9.232684300601568d+2*t46*t5*t86+2.76980529018 5516 = 0471d+3*t40*t45*t5*t86-3.693073720240627d+3*t16*t43*t5*t8 5517 > 6-8.309415870541413d+3*t40*t45*t5*t85+2.769805290180471d+ 5518 ? 3*t16*t43*t5*t85+5.539610580360942d+3*t37*t42*t5*t85+5.53 5519 @ 9610580360942d+3*t40*t45*t5*t84-1.4772294880962508d+4*t37 5520 1 *t42*t5*t84+9.232684300601568d+3*t34*t39*t5*t84+9.2326843 5521 2 00601568d+3*t37*t42*t5*t83-2.308171075150392d+4*t34*t39*t 5522 3 5*t83+1.3849026450902355d+4*t31*t36*t5*t83+1.384902645090 5523 4 2355d+4*t34*t39*t5*t82-3.323766348216566d+4*t31*t36*t5*t8 5524 5 2+1.9388637031263292d+4*t28*t33*t5*t82+1.9388637031263292 5525 6 d+4*t31*t36*t5*t81-4.5240153072947686d+4*t28*t33*t5*t81+2 5526 7 .585151604168439d+4*t25*t30*t5*t81+2.585151604168439d+4*t 5527 8 28*t33*t5*t80-5.908917952385003d+4*t25*t30*t5*t80+3.32376 5528 9 63482165647d+4*t22*t27*t5*t80+3.3237663482165647d+4*t25*t 5529 : 30*t5*t79-7.478474283487271d+4*t22*t27*t5*t79+4.154707935 5530 ; 2707056d+4*t19*t24*t5*t79+4.154707935270705d+4*t22*t27*t5 5531 < *t78-9.232684300601568d+4*t19*t24*t5*t78+5.07797636533086 5532 = 3d+4*t19*t24*t5*t77+6.093571638397036d+4*t110*t17*t5*t77) 5533 > +t3*t64*(-3.4716600044518436d+6*t24*t67*t89*t97+1.1572200 5534 ? 014839477d+7*t24*t66*t89*t97-1.2729420016323426d+7*t24*t6 5535 @ 5*t89*t97+2.104036366334451d+4*t43*t75*t97-2.104036366334 5536 1 451d+4*t16*t40*t75*t97-8.416145465337804d+4*t37*t45*t74*t 5537 2 97-4.208072732668902d+4*t43*t74*t97+1.2624218198006704d+5 5538 3 *t16*t40*t74*t97+3.787265459402013d+5*t37*t45*t73*t97+2.1 5539 4 04036366334451d+4*t43*t73*t97-2.104036366334451d+5*t34*t4 5540 5 2*t73*t97-1.8936327297010064d+5*t16*t40*t73*t97-5.0496872 5541 6 79202681d+5*t37*t45*t72*t97+8.416145465337803d+5*t34*t42* 5542 7 t72*t97+8.416145465337804d+4*t16*t40*t72*t97-4.2080727326 5543 8 689016d+5*t31*t39*t72*t97+2.1040363663344508d+5*t37*t45*t 5544 9 71*t97-1.0520181831672254d+6*t34*t42*t71*t97+1.5780272747 5545 : 50838d+6*t31*t39*t71*t97-7.364127282170578d+5*t28*t36*t71 5546 ; *t97+4.208072732668902d+5*t34*t42*t70*t97-1.8936327297010 5547 < 06d+6*t31*t39*t70*t97+2.6510858215814087d+6*t28*t36*t70*t 5548 = 97-1.1782603651472927d+6*t25*t33*t70*t97+7.36412728217057 5549 > 8d+5*t31*t39*t69*t97-3.0929334585116436d+6*t28*t36*t69*t9 5550 ? 7+4.123911278015524d+6*t25*t33*t69*t97-1.7673905477209387 5551 @ d+6*t22*t30*t69*t97+1.1782603651472927d+6*t28*t36*t68*t97 5552 1 -4.713041460589171d+6*t25*t33*t68*t97+6.059624735043219d+ 5553 2 6*t22*t30*t68*t97-2.524843639601341d+6*t19*t27*t68*t97+1. 5554 3 767390547720939d+6*t25*t33*t67*t97-6.817077826923622d+6*t 5555 4 22*t30*t67*t97+8.521347283654526d+6*t19*t27*t67*t97+2.524 5556 5 843639601341d+6*t22*t30*t66*t97-9.468163648505028d+6*t19* 5557 6 t27*t66*t97-4.628880005935792d+6*t110*t21*t66*t97+3.47166 5558 7 00044518436d+6*t19*t27*t65*t97+1.5275304019588112d+7*t110 5559 8 *t21*t65*t97-6.01754400771653d+6*t142*t17*t65*t97+3.71376 5560 9 2858948263d+1*t17*t65*t89*t96-3.37614805358933d+0*t48*t75 5561 : *t96+3.37614805358933d+0*t16*t46*t75*t96-6.75229610717866 5562 ; d+0*t16*t46*t74*t96+6.75229610717866d+0*t43*t45*t74*t96-1 5563 < .0128444160767991d+1*t43*t45*t73*t96+1.0128444160767991d+ 5564 = 1*t40*t42*t73*t96-1.350459221435732d+1*t40*t42*t72*t96+1. 5565 > 350459221435732d+1*t37*t39*t72*t96-1.6880740267946648d+1* 5566 ? t37*t39*t71*t96+1.6880740267946648d+1*t34*t36*t71*t96-2.0 5567 @ 256888321535982d+1*t34*t36*t70*t96+2.0256888321535982d+1* 5568 1 t31*t33*t70*t96-2.3633036375125308d+1*t31*t33*t69*t96+2.3 5569 2 633036375125308d+1*t28*t30*t69*t96-2.700918442871464d+1*t 5570 3 28*t30*t68*t96+2.700918442871464d+1*t25*t27*t68*t96-3.038 5571 4 5332482303967d+1*t25*t27*t67*t96+3.0385332482303967d+1*t2 5572 5 2*t24*t67*t96-3.3761480535893296d+1*t22*t24*t66*t96+3.376 5573 6 1480535893296d+1*t19*t21*t66*t96-3.713762858948263d+1*t19 5574 7 *t21*t65*t96+5.077976365330862d+4*t21*t5*t66*t89-1.117154 5575 8 8003727898d+5*t21*t5*t65*t89-9.232684300601568d+2*t46*t5* 5576 9 t75+9.232684300601568d+2*t16*t43*t5*t75+9.232684300601568 5577 : d+2*t46*t5*t74+2.769805290180471d+3*t40*t45*t5*t74-3.6930 5578 ; 73720240627d+3*t16*t43*t5*t74-8.309415870541413d+3*t40*t4 5579 < 5*t5*t73+2.769805290180471d+3*t16*t43*t5*t73+5.5396105803 5580 = 60942d+3*t37*t42*t5*t73+5.539610580360942d+3*t40*t45*t5*t 5581 > 72-1.4772294880962508d+4*t37*t42*t5*t72+9.232684300601568 5582 ? d+3*t34*t39*t5*t72+9.232684300601568d+3*t37*t42*t5*t71-2. 5583 @ 308171075150392d+4*t34*t39*t5*t71+1.3849026450902355d+4*t 5584 1 31*t36*t5*t71+1.3849026450902355d+4*t34*t39*t5*t70-3.3237 5585 2 66348216566d+4*t31*t36*t5*t70+1.9388637031263292d+4*t28*t 5586 3 33*t5*t70+1.9388637031263292d+4*t31*t36*t5*t69-4.52401530 5587 4 72947686d+4*t28*t33*t5*t69+2.585151604168439d+4*t25*t30*t 5588 5 5*t69+2.585151604168439d+4*t28*t33*t5*t68-5.9089179523850 5589 6 03d+4*t25*t30*t5*t68+3.3237663482165647d+4*t22*t27*t5*t68 5590 7 +3.3237663482165647d+4*t25*t30*t5*t67-7.478474283487271d+ 5591 8 4*t22*t27*t5*t67+4.1547079352707056d+4*t19*t24*t5*t67+4.1 5592 9 54707935270705d+4*t22*t27*t5*t66-9.232684300601568d+4*t19 5593 : *t24*t5*t66+5.077976365330863d+4*t19*t24*t5*t65+6.0935716 5594 ; 38397036d+4*t110*t17*t5*t65)-9.305257363491002d-1*t12*t4* 5595 < t51*(-3.4716600044518436d+6*t24*t54*t89*t97+1.15722000148 5596 = 39477d+7*t24*t53*t89*t97-1.2729420016323426d+7*t24*t52*t8 5597 > 9*t97+2.104036366334451d+4*t43*t62*t97-2.104036366334451d 5598 ? +4*t16*t40*t62*t97-8.416145465337804d+4*t37*t45*t61*t97-4 5599 @ .208072732668902d+4*t43*t61*t97+1.2624218198006704d+5*t16 5600 1 *t40*t61*t97+3.787265459402013d+5*t37*t45*t60*t97+2.10403 5601 2 6366334451d+4*t43*t60*t97-2.104036366334451d+5*t34*t42*t6 5602 3 0*t97-1.8936327297010064d+5*t16*t40*t60*t97-5.04968727920 5603 4 2681d+5*t37*t45*t59*t97+8.416145465337803d+5*t34*t42*t59* 5604 5 t97+8.416145465337804d+4*t16*t40*t59*t97-4.20807273266890 5605 6 16d+5*t31*t39*t59*t97+2.1040363663344508d+5*t37*t45*t58*t 5606 7 97-1.0520181831672254d+6*t34*t42*t58*t97+1.57802727475083 5607 8 8d+6*t31*t39*t58*t97-7.364127282170578d+5*t28*t36*t58*t97 5608 9 +4.208072732668902d+5*t34*t42*t57*t97-1.893632729701006d+ 5609 : 6*t31*t39*t57*t97+2.6510858215814087d+6*t28*t36*t57*t97-1 5610 ; .1782603651472927d+6*t25*t33*t57*t97+7.364127282170578d+5 5611 < *t31*t39*t56*t97-3.0929334585116436d+6*t28*t36*t56*t97+4. 5612 = 123911278015524d+6*t25*t33*t56*t97-1.7673905477209387d+6* 5613 > t22*t30*t56*t97+1.1782603651472927d+6*t28*t36*t55*t97-4.7 5614 ? 13041460589171d+6*t25*t33*t55*t97+6.059624735043219d+6*t2 5615 @ 2*t30*t55*t97-2.524843639601341d+6*t19*t27*t55*t97+1.7673 5616 1 90547720939d+6*t25*t33*t54*t97-6.817077826923622d+6*t22*t 5617 2 30*t54*t97+8.521347283654526d+6*t19*t27*t54*t97+2.5248436 5618 3 39601341d+6*t22*t30*t53*t97-9.468163648505028d+6*t19*t27* 5619 4 t53*t97-4.628880005935792d+6*t110*t21*t53*t97+3.471660004 5620 5 4518436d+6*t19*t27*t52*t97+1.5275304019588112d+7*t110*t21 5621 6 *t52*t97-6.01754400771653d+6*t142*t17*t52*t97+3.713762858 5622 7 948263d+1*t17*t52*t89*t96-3.37614805358933d+0*t48*t62*t96 5623 8 +3.37614805358933d+0*t16*t46*t62*t96-6.75229610717866d+0* 5624 9 t16*t46*t61*t96+6.75229610717866d+0*t43*t45*t61*t96-1.012 5625 : 8444160767991d+1*t43*t45*t60*t96+1.0128444160767991d+1*t4 5626 ; 0*t42*t60*t96-1.350459221435732d+1*t40*t42*t59*t96+1.3504 5627 < 59221435732d+1*t37*t39*t59*t96-1.6880740267946648d+1*t37* 5628 = t39*t58*t96+1.6880740267946648d+1*t34*t36*t58*t96-2.02568 5629 > 88321535982d+1*t34*t36*t57*t96+2.0256888321535982d+1*t31* 5630 ? t33*t57*t96-2.3633036375125308d+1*t31*t33*t56*t96+2.36330 5631 @ 36375125308d+1*t28*t30*t56*t96-2.700918442871464d+1*t28*t 5632 1 30*t55*t96+2.700918442871464d+1*t25*t27*t55*t96-3.0385332 5633 2 482303967d+1*t25*t27*t54*t96+3.0385332482303967d+1*t22*t2 5634 3 4*t54*t96-3.3761480535893296d+1*t22*t24*t53*t96+3.3761480 5635 4 535893296d+1*t19*t21*t53*t96-3.713762858948263d+1*t19*t21 5636 5 *t52*t96+5.077976365330862d+4*t21*t5*t53*t89-1.1171548003 5637 6 727898d+5*t21*t5*t52*t89-9.232684300601568d+2*t46*t5*t62+ 5638 7 9.232684300601568d+2*t16*t43*t5*t62+9.232684300601568d+2* 5639 8 t46*t5*t61+2.769805290180471d+3*t40*t45*t5*t61-3.69307372 5640 9 0240627d+3*t16*t43*t5*t61-8.309415870541413d+3*t40*t45*t5 5641 : *t60+2.769805290180471d+3*t16*t43*t5*t60+5.53961058036094 5642 ; 2d+3*t37*t42*t5*t60+5.539610580360942d+3*t40*t45*t5*t59-1 5643 < .4772294880962508d+4*t37*t42*t5*t59+9.232684300601568d+3* 5644 = t34*t39*t5*t59+9.232684300601568d+3*t37*t42*t5*t58-2.3081 5645 > 71075150392d+4*t34*t39*t5*t58+1.3849026450902355d+4*t31*t 5646 ? 36*t5*t58+1.3849026450902355d+4*t34*t39*t5*t57-3.32376634 5647 @ 8216566d+4*t31*t36*t5*t57+1.9388637031263292d+4*t28*t33*t 5648 1 5*t57+1.9388637031263292d+4*t31*t36*t5*t56-4.524015307294 5649 2 7686d+4*t28*t33*t5*t56+2.585151604168439d+4*t25*t30*t5*t5 5650 3 6+2.585151604168439d+4*t28*t33*t5*t55-5.908917952385003d+ 5651 4 4*t25*t30*t5*t55+3.3237663482165647d+4*t22*t27*t5*t55+3.3 5652 5 237663482165647d+4*t25*t30*t5*t54-7.478474283487271d+4*t2 5653 6 2*t27*t5*t54+4.1547079352707056d+4*t19*t24*t5*t54+4.15470 5654 7 7935270705d+4*t22*t27*t5*t53-9.232684300601568d+4*t19*t24 5655 8 *t5*t53+5.077976365330863d+4*t19*t24*t5*t52+6.09357163839 5656 9 7036d+4*t110*t17*t5*t52)-9.305257363491002d-1*t12*t3*t4*( 5657 : -3.4716600044518436d+6*t23*t24*t89*t97+1.1572200014839477 5658 ; d+7*t20*t24*t89*t97-1.2729420016323426d+7*t13*t24*t89*t97 5659 < +2.104036366334451d+4*t43*t47*t97-2.104036366334451d+4*t1 5660 = 6*t40*t47*t97-8.416145465337804d+4*t37*t44*t45*t97+3.7872 5661 > 65459402013d+5*t37*t41*t45*t97-5.049687279202681d+5*t37*t 5662 ? 38*t45*t97+2.1040363663344508d+5*t35*t37*t45*t97-4.208072 5663 @ 732668902d+4*t43*t44*t97+1.2624218198006704d+5*t16*t40*t4 5664 1 4*t97+2.104036366334451d+4*t41*t43*t97-2.104036366334451d 5665 2 +5*t34*t41*t42*t97+8.416145465337803d+5*t34*t38*t42*t97-1 5666 3 .0520181831672254d+6*t34*t35*t42*t97+4.208072732668902d+5 5667 4 *t32*t34*t42*t97-1.8936327297010064d+5*t16*t40*t41*t97+8. 5668 5 416145465337804d+4*t16*t38*t40*t97-4.2080727326689016d+5* 5669 6 t31*t38*t39*t97+1.578027274750838d+6*t31*t35*t39*t97-1.89 5670 7 3632729701006d+6*t31*t32*t39*t97+7.364127282170578d+5*t29 5671 8 *t31*t39*t97-7.364127282170578d+5*t28*t35*t36*t97+2.65108 5672 9 58215814087d+6*t28*t32*t36*t97-3.0929334585116436d+6*t28* 5673 : t29*t36*t97+1.1782603651472927d+6*t26*t28*t36*t97-1.17826 5674 ; 03651472927d+6*t25*t32*t33*t97+4.123911278015524d+6*t25*t 5675 < 29*t33*t97-4.713041460589171d+6*t25*t26*t33*t97+1.7673905 5676 = 47720939d+6*t23*t25*t33*t97-1.7673905477209387d+6*t22*t29 5677 > *t30*t97+6.059624735043219d+6*t22*t26*t30*t97-6.817077826 5678 ? 923622d+6*t22*t23*t30*t97+2.524843639601341d+6*t20*t22*t3 5679 @ 0*t97-2.524843639601341d+6*t19*t26*t27*t97+8.521347283654 5680 1 526d+6*t19*t23*t27*t97-9.468163648505028d+6*t19*t20*t27*t 5681 2 97+3.4716600044518436d+6*t13*t19*t27*t97-4.62888000593579 5682 3 2d+6*t110*t20*t21*t97+1.5275304019588112d+7*t110*t13*t21* 5683 4 t97-6.01754400771653d+6*t13*t142*t17*t97+3.71376285894826 5684 5 3d+1*t13*t17*t89*t96-3.37614805358933d+0*t47*t48*t96+3.37 5685 6 614805358933d+0*t16*t46*t47*t96-6.75229610717866d+0*t16*t 5686 7 44*t46*t96+6.75229610717866d+0*t43*t44*t45*t96-1.01284441 5687 8 60767991d+1*t41*t43*t45*t96+1.0128444160767991d+1*t40*t41 5688 9 *t42*t96-1.350459221435732d+1*t38*t40*t42*t96+1.350459221 5689 : 435732d+1*t37*t38*t39*t96-1.6880740267946648d+1*t35*t37*t 5690 ; 39*t96+1.6880740267946648d+1*t34*t35*t36*t96-2.0256888321 5691 < 535982d+1*t32*t34*t36*t96+2.0256888321535982d+1*t31*t32*t 5692 = 33*t96-2.3633036375125308d+1*t29*t31*t33*t96+2.3633036375 5693 > 125308d+1*t28*t29*t30*t96-2.700918442871464d+1*t26*t28*t3 5694 ? 0*t96+2.700918442871464d+1*t25*t26*t27*t96-3.038533248230 5695 @ 3967d+1*t23*t25*t27*t96+3.0385332482303967d+1*t22*t23*t24 5696 1 *t96-3.3761480535893296d+1*t20*t22*t24*t96+3.376148053589 5697 2 3296d+1*t19*t20*t21*t96-3.713762858948263d+1*t13*t19*t21* 5698 3 t96+5.077976365330862d+4*t20*t21*t5*t89-1.117154800372789 5699 4 8d+5*t13*t21*t5*t89-9.232684300601568d+2*t46*t47*t5+9.232 5700 5 684300601568d+2*t16*t43*t47*t5+9.232684300601568d+2*t44*t 5701 6 46*t5+2.769805290180471d+3*t40*t44*t45*t5-8.3094158705414 5702 7 13d+3*t40*t41*t45*t5+5.539610580360942d+3*t38*t40*t45*t5- 5703 8 3.693073720240627d+3*t16*t43*t44*t5+2.769805290180471d+3* 5704 9 t16*t41*t43*t5+5.539610580360942d+3*t37*t41*t42*t5-1.4772 5705 : 294880962508d+4*t37*t38*t42*t5+9.232684300601568d+3*t35*t 5706 ; 37*t42*t5+9.232684300601568d+3*t34*t38*t39*t5-2.308171075 5707 < 150392d+4*t34*t35*t39*t5+1.3849026450902355d+4*t32*t34*t3 5708 = 9*t5+1.3849026450902355d+4*t31*t35*t36*t5-3.3237663482165 5709 > 66d+4*t31*t32*t36*t5+1.9388637031263292d+4*t29*t31*t36*t5 5710 ? +1.9388637031263292d+4*t28*t32*t33*t5-4.5240153072947686d 5711 @ +4*t28*t29*t33*t5+2.585151604168439d+4*t26*t28*t33*t5+2.5 5712 1 85151604168439d+4*t25*t29*t30*t5-5.908917952385003d+4*t25 5713 2 *t26*t30*t5+3.3237663482165647d+4*t23*t25*t30*t5+3.323766 5714 3 3482165647d+4*t22*t26*t27*t5-7.478474283487271d+4*t22*t23 5715 4 *t27*t5+4.154707935270705d+4*t20*t22*t27*t5+4.15470793527 5716 5 07056d+4*t19*t23*t24*t5-9.232684300601568d+4*t19*t20*t24* 5717 6 t5+5.077976365330863d+4*t13*t19*t24*t5+6.093571638397036d 5718 7 +4*t110*t13*t17*t5)+(5.377850105933821d-2*gammaaa*t103*t9 5719 8 0+2.6889250529669106d-2*gammaaa*t123*t49+2.68892505296691 5720 9 06d-2*gammaaa*t111*t12)*t94*t95+(9.894611731573306d-5*t10 5721 : 4*t115*t12*t50*t91+3.024609866719883d-2*gammaaa*t103*t50* 5722 ; t91+1.5123049333599414d-2*gammaaa*t123*t50*t63+9.89461173 5723 < 1573306d-5*t103*t104*t115*t50*t63+1.5123049333599414d-2*g 5724 = ammaaa*t112*t12*t50)*t95+t101*(3.983592671062089d-3*gamma 5725 > aa*t104*t12*t49*t94-1.2407009817988002d+0*t12*t51*t91-1.2 5726 ? 407009817988002d+0*t12*t3*t90-1.2407009817988002d+0*t103* 5727 @ t51*t63+2.2404517531258392d-3*gammaaa*t104*t12*t50*t63-1. 5728 1 2407009817988002d+0*t103*t3*t49)+t125*(3.5318356336070855 5729 2 d-2*gammaaa*t64*t92+3.5318356336070855d-2*gammaaa*t105*t7 5730 3 6)*t94+t104*(-5.779367400447957d-2*gammaaa*t105*t92-2.889 5731 4 6837002239784d-2*gammaaa*t126*t76-2.8896837002239784d-2*g 5732 5 ammaaa*t113*t64)*t94+t118*(1.4938472516482826d-2*gammaaa* 5733 6 t12*t90+1.4938472516482826d-2*gammaaa*t103*t49)*t94-1.648 5734 7 1899623499732d-1*gammaaa*t151*t64*t76*t94+2.9876945032965 5735 8 69d-2*gammaaa*t12*t147*t49*t94-3.6666666666666664d+0*t125 5736 9 *t130*t94-2.3333333333333334d+0*t118*t127*t94+t104*(-1.06 5737 : 3335633294209d-4*t104*t115*t50*t64*t93-3.250431179460851d 5738 ; -2*gammaaa*t105*t50*t93-1.6252155897304255d-2*gammaaa*t12 5739 < 6*t50*t88-1.063335633294209d-4*t104*t105*t115*t50*t88-1.6 5740 = 252155897304255d-2*gammaaa*t114*t50*t64)+t124*(-5.3166781 5741 > 66471045d-5*t115*t50*t64*t93-5.316678166471045d-5*t105*t1 5742 ? 15*t50*t88)+t125*(1.9863746096705204d-2*gammaaa*t50*t64*t 5743 @ 93+1.9863746096705204d-2*gammaaa*t105*t50*t88)+3*t126*t51 5744 1 *t93+t116*t124*(-2.3079800683637772d-4*t115*t64*t92-2.307 5745 2 9800683637772d-4*t105*t115*t76+2.3960893036683073d-2*gamm 5746 3 aaa*t130)+3*t126*t3*t92+t117*(4.947305865786653d-5*t115*t 5747 4 12*t50*t91+4.947305865786653d-5*t103*t115*t50*t63)+t118*( 5748 5 8.401694074221897d-3*gammaaa*t12*t50*t91+8.40169407422189 5749 6 7d-3*gammaaa*t103*t50*t63)-7.444205890792801d+0*t103*t5*t 5750 7 51*t91-2.7915772090473007d+0*t123*t4*t51*t91+t116*t117*(2 5751 8 .1476348525932504d-4*t115*t12*t90+2.1476348525932504d-4*t 5752 9 103*t115*t49+2.3960893036683073d-2*gammaaa*t127)-7.444205 5753 : 890792801d+0*t103*t3*t5*t90-2.7915772090473007d+0*t123*t3 5754 ; *t4*t90-9.269748178462429d-2*gammaaa*t151*t50*t64*t88+5.8 5755 < 4834598311815d-4*t115*t150*t50*t64*t88-5.217843141140167d 5756 = -7*t143*t149*t50*t64*t88+t152*t51*t88+2.5387780752001543d 5757 > -3*t115*t116*t150*t64*t76-8.295189532329142d-6*t143*t144* 5758 ? t149*t64*t76+t152*t3*t76-3.7221029453964005d+0*t123*t5*t5 5759 @ 1*t63-9.305257363491002d-1*t148*t4*t51*t63+1.680338814844 5760 1 3793d-2*gammaaa*t12*t147*t50*t63-3.4631141060506576d-4*t1 5761 2 15*t12*t146*t50*t63+4.855337331063556d-7*t12*t143*t145*t5 5762 3 0*t63-3.7221029453964005d+0*t112*t12*t5*t51-2.79157720904 5763 4 73007d+0*t103*t112*t4*t51+3*t105*t114*t51-3.7221029453964 5764 5 005d+0*t123*t3*t49*t5-3.7221029453964005d+0*t111*t12*t3*t 5765 6 5-9.305257363491002d-1*t148*t3*t4*t49-1.5033443968152754d 5766 7 -3*t115*t116*t12*t146*t49+7.718887347725925d-6*t12*t143*t 5767 8 144*t145*t49-2.7915772090473007d+0*t103*t111*t3*t4+3*t105 5768 9 *t113*t3-3.6666666666666664d+0*t125*t131-2.33333333333333 5769 : 34d+0*t118*t129-6.666666666666666d-1*t121*t128)*wght+Amat 5770 ; 3(iq,D3_RA_RA_RA) 5771 Amat3(iq,D3_RA_RA_RB) = Amat3(iq,D3_RA_RA_RB) 5772 Cmat3(iq,D3_RA_RA_GAA) = 1.0d+0*((-6.722312632417276d-3*t103 5773 1 *t90-3.361156316208638d-3*t123*t49-3.361156316208638d-3*t 5774 2 111*t12)*t94*t96+(-3.780762333399854d-3*t103*t50*t91-1.89 5775 3 0381166699927d-3*t123*t50*t63-1.890381166699927d-3*t112*t 5776 4 12*t50)*t96+(8.963083509889702d-3*t12*t90+8.9630835098897 5777 5 02d-3*t103*t49)*t94*t95+(-3.71047939933999d-5*gammaaa*t1* 5778 6 t12*t50*t91+5.041016444533138d-3*t12*t50*t91-3.7104793993 5779 7 3999d-5*gammaaa*t1*t103*t50*t63+5.041016444533138d-3*t103 5780 8 *t50*t63)*t95+t101*(-1.4938472516482837d-3*t1*t12*t49*t94 5781 9 -8.401694074221898d-4*t1*t12*t50*t63)+t104*(-1.9264558001 5782 : 493193d-2*t64*t92-1.9264558001493193d-2*t105*t76)*t94+t1* 5783 ; (7.224209250559948d-3*t105*t92+3.612104625279974d-3*t126* 5784 < t76+3.612104625279974d-3*t113*t64)*t94+3.5318356336070855 5785 = d-2*t125*t64*t76*t94-8.963083509889707d-3*t118*t12*t49*t9 5786 > 4+t104*(3.9875086248532843d-5*gammaaa*t1*t50*t64*t93-1.08 5787 ? 34770598202839d-2*t50*t64*t93+3.9875086248532843d-5*gamma 5788 @ aa*t1*t105*t50*t88-1.0834770598202839d-2*t105*t50*t88)+t1 5789 1 *(4.063038974326065d-3*t105*t50*t93+2.0315194871630324d-3 5790 2 *t126*t50*t88+2.0315194871630324d-3*t114*t50*t64)+1.95669 5791 3 1177927563d-7*t115*t154*t50*t64*t88+1.9863746096705204d-2 5792 4 *t125*t50*t64*t88-1.7943788811839778d-4*gammaaa*t124*t50* 5793 5 t64*t88+3.1106960746234286d-6*t115*t144*t154*t64*t76-7.78 5794 6 9432730727747d-4*gammaaa*t116*t124*t64*t76-1.820751499148 5795 7 8338d-7*t115*t12*t153*t50*t63-5.041016444533138d-3*t118*t 5796 8 12*t50*t63+1.1749851431243302d-4*gammaaa*t117*t12*t50*t63 5797 9 -2.8945827553972214d-6*t115*t12*t144*t153*t49+5.100632774 5798 : 908971d-4*gammaaa*t116*t117*t12*t49-8.985334888756153d-3* 5799 ; t116*t130*t133-8.985334888756153d-3*t116*t127*t132)*wght+ 5800 < Cmat3(iq,D3_RA_RA_GAA) 5801 Cmat3(iq,D3_RA_RA_GAB) = Cmat3(iq,D3_RA_RA_GAB) 5802 Cmat3(iq,D3_RA_RA_GBB) = Cmat3(iq,D3_RA_RA_GBB) 5803 Cmat3(iq,D3_RA_RB_GAA) = Cmat3(iq,D3_RA_RB_GAA) 5804 Cmat3(iq,D3_RA_RB_GAB) = Cmat3(iq,D3_RA_RB_GAB) 5805 Cmat3(iq,D3_RA_GAA_GAA) = 1.0d+0*((6.957148873762482d-6*t1*t 5806 1 12*t50*t91+6.957148873762482d-6*t1*t103*t50*t63)*t96+t1*( 5807 2 -7.476578671599909d-6*t1*t50*t64*t93-7.476578671599909d-6 5808 3 *t1*t105*t50*t88)-7.337591917228362d-8*gammaaa*t156*t50*t 5809 4 64*t88+3.9875086248532843d-5*t133*t50*t64*t88-1.166511027 5810 5 9837858d-6*gammaaa*t144*t156*t64*t76+1.7309850512728328d- 5811 6 4*t116*t133*t64*t76+6.827818121808127d-8*gammaaa*t12*t155 5812 7 *t50*t63-2.7828595495049924d-5*t12*t132*t50*t63+1.0854685 5813 8 332739583d-6*gammaaa*t12*t144*t155*t49-1.2080446045837034 5814 9 d-4*t116*t12*t132*t49-8.985334888756153d-3*t116*t135*t137 5815 : -8.985334888756153d-3*t116*t134*t136)*wght+Cmat3(iq,D3_RA 5816 ; _GAA_GAA) 5817 Cmat3(iq,D3_RA_GAA_GAB) = Cmat3(iq,D3_RA_GAA_GAB) 5818 Cmat3(iq,D3_RA_GAA_GBB) = Cmat3(iq,D3_RA_GAA_GBB) 5819 Cmat3(iq,D3_RA_GAB_GAB) = Cmat3(iq,D3_RA_GAB_GAB) 5820 Cmat3(iq,D3_RA_GAB_GBB) = Cmat3(iq,D3_RA_GAB_GBB) 5821 Cmat3(iq,D3_RA_GBB_GBB) = Cmat3(iq,D3_RA_GBB_GBB) 5822 Cmat3(iq,D3_GAA_GAA_GAA) = 1.0d+0*(2.751596968960636d-8*t158 5823 1 *t50*t64*t88+4.374416354939197d-7*t144*t158*t64*t76-2.560 5824 2 431795678048d-8*t12*t157*t50*t63-4.070506999777343d-7*t12 5825 3 *t144*t157*t49)*wght+Cmat3(iq,D3_GAA_GAA_GAA) 5826 Cmat3(iq,D3_GAA_GAA_GAB) = Cmat3(iq,D3_GAA_GAA_GAB) 5827 Cmat3(iq,D3_GAA_GAA_GBB) = Cmat3(iq,D3_GAA_GAA_GBB) 5828 Cmat3(iq,D3_GAA_GAB_GAB) = Cmat3(iq,D3_GAA_GAB_GAB) 5829 Cmat3(iq,D3_GAA_GAB_GBB) = Cmat3(iq,D3_GAA_GAB_GBB) 5830 Cmat3(iq,D3_GAB_GAB_GAB) = Cmat3(iq,D3_GAB_GAB_GAB) 5831 Mmat3(iq,D3_RA_RA_TA) = 1.0d+0*((1.7926167019779404d-2*gamma 5832 1 aa*t12*t138+1.7926167019779404d-2*gammaaa*t103*t106)*t94* 5833 2 t95+(1.0082032889066277d-2*gammaaa*t12*t139*t50+1.0082032 5834 3 889066277d-2*gammaaa*t103*t107*t50)*t95+t104*(-1.92645580 5835 4 01493193d-2*gammaaa*t140*t64-1.9264558001493193d-2*gammaa 5836 5 a*t105*t108)*t94+3.5318356336070855d-2*gammaaa*t108*t125* 5837 6 t64*t94-8.963083509889707d-3*gammaaa*t106*t118*t12*t94+t5 5838 7 1*t64*(-4.5701787287977763d+5*t24*t4*t79*t89+2.2282577153 5839 8 689576d+3*t21*t6*t78*t89+5.077976365330863d+5*t24*t4*t78* 5840 9 t89+5.585774001863949d+5*t24*t4*t77*t89+4.051377664307196 5841 : 4d+1*t16*t43*t6*t87+9.232684300601569d+2*t4*t43*t87-2.769 5842 ; 805290180471d+3*t16*t4*t40*t87-4.0513776643071964d+1*t46* 5843 < t6*t86+1.2154132992921589d+2*t40*t45*t6*t86-1.10792211607 5844 = 21883d+4*t37*t4*t45*t86+1.846536860120314d+3*t4*t43*t86+5 5845 > .539610580360942d+3*t16*t4*t40*t86-1.2154132992921589d+2* 5846 ? t16*t43*t6*t85+2.4308265985843178d+2*t37*t42*t6*t85+1.661 5847 @ 8831741082832d+4*t37*t4*t45*t85-2.769805290180471d+3*t4*t 5848 1 43*t85-2.769805290180471d+4*t34*t4*t42*t85+8.309415870541 5849 2 416d+3*t16*t4*t40*t85-2.4308265985843178d+2*t40*t45*t6*t8 5850 3 4+4.0513776643071964d+2*t34*t39*t6*t84+2.2158442321443766 5851 4 d+4*t37*t4*t45*t84+3.693073720240629d+4*t34*t4*t42*t84-1. 5852 5 1079221160721883d+4*t16*t4*t40*t84-5.539610580360941d+4*t 5853 6 31*t39*t4*t84-4.051377664307196d+2*t37*t42*t6*t83+6.07706 5854 7 6496460793d+2*t31*t36*t6*t83-2.7698052901804704d+4*t37*t4 5855 8 *t45*t83+4.616342150300784d+4*t34*t4*t42*t83+6.9245132254 5856 9 51174d+4*t31*t39*t4*t83-9.694318515631648d+4*t28*t36*t4*t 5857 : 83-6.077066496460795d+2*t34*t39*t6*t82+8.507893095045113d 5858 ; +2*t28*t33*t6*t82-5.539610580360942d+4*t34*t4*t42*t82+8.3 5859 < 09415870541416d+4*t31*t39*t4*t82+1.1633182218757979d+5*t2 5860 = 8*t36*t4*t82-1.5510909625010638d+5*t25*t33*t4*t82-8.50789 5861 > 3095045111d+2*t31*t36*t6*t81+1.1343857460060149d+3*t25*t3 5862 ? 0*t6*t81-9.694318515631648d+4*t31*t39*t4*t81+1.3572045921 5863 @ 884307d+5*t28*t36*t4*t81+1.809606122917908d+5*t25*t33*t4* 5864 1 t81-2.3266364437515955d+5*t22*t30*t4*t81-1.13438574600601 5865 2 49d+3*t28*t33*t6*t80+1.4584959591505908d+3*t22*t27*t6*t80 5866 3 -1.5510909625010635d+5*t28*t36*t4*t80+2.0681212833347515d 5867 4 +5*t25*t33*t4*t80+2.659013078573252d+5*t22*t30*t4*t80-3.3 5868 5 23766348216565d+5*t19*t27*t4*t80-1.4584959591505905d+3*t2 5869 6 5*t30*t6*t79+1.8231199489382383d+3*t19*t24*t6*t79-2.32663 5870 7 64437515952d+5*t25*t33*t4*t79+2.9913897133949086d+5*t22*t 5871 8 30*t4*t79+3.7392371417436354d+5*t19*t27*t4*t79-1.82311994 5872 9 89382383d+3*t22*t27*t6*t78-3.3237663482165647d+5*t22*t30* 5873 : t4*t78+4.1547079352707056d+5*t19*t27*t4*t78-6.09357163839 5874 ; 7035d+5*t110*t21*t4*t78-2.228257715368958d+3*t19*t24*t6*t 5875 < 77+2.6739092584427493d+3*t110*t17*t6*t77-4.57017872879777 5876 = 63d+5*t19*t27*t4*t77+6.702928802236738d+5*t110*t21*t4*t77 5877 > -7.921643129916147d+5*t142*t17*t4*t77)+t3*t64*(-4.5701787 5878 ? 287977763d+5*t24*t4*t67*t89+2.2282577153689576d+3*t21*t6* 5879 @ t66*t89+5.077976365330863d+5*t24*t4*t66*t89+5.58577400186 5880 1 3949d+5*t24*t4*t65*t89+4.0513776643071964d+1*t16*t43*t6*t 5881 2 75+9.232684300601569d+2*t4*t43*t75-2.769805290180471d+3*t 5882 3 16*t4*t40*t75-4.0513776643071964d+1*t46*t6*t74+1.21541329 5883 4 92921589d+2*t40*t45*t6*t74-1.1079221160721883d+4*t37*t4*t 5884 5 45*t74+1.846536860120314d+3*t4*t43*t74+5.539610580360942d 5885 6 +3*t16*t4*t40*t74-1.2154132992921589d+2*t16*t43*t6*t73+2. 5886 7 4308265985843178d+2*t37*t42*t6*t73+1.6618831741082832d+4* 5887 8 t37*t4*t45*t73-2.769805290180471d+3*t4*t43*t73-2.76980529 5888 9 0180471d+4*t34*t4*t42*t73+8.309415870541416d+3*t16*t4*t40 5889 : *t73-2.4308265985843178d+2*t40*t45*t6*t72+4.0513776643071 5890 ; 964d+2*t34*t39*t6*t72+2.2158442321443766d+4*t37*t4*t45*t7 5891 < 2+3.693073720240629d+4*t34*t4*t42*t72-1.1079221160721883d 5892 = +4*t16*t4*t40*t72-5.539610580360941d+4*t31*t39*t4*t72-4.0 5893 > 51377664307196d+2*t37*t42*t6*t71+6.077066496460793d+2*t31 5894 ? *t36*t6*t71-2.7698052901804704d+4*t37*t4*t45*t71+4.616342 5895 @ 150300784d+4*t34*t4*t42*t71+6.924513225451174d+4*t31*t39* 5896 1 t4*t71-9.694318515631648d+4*t28*t36*t4*t71-6.077066496460 5897 2 795d+2*t34*t39*t6*t70+8.507893095045113d+2*t28*t33*t6*t70 5898 3 -5.539610580360942d+4*t34*t4*t42*t70+8.309415870541416d+4 5899 4 *t31*t39*t4*t70+1.1633182218757979d+5*t28*t36*t4*t70-1.55 5900 5 10909625010638d+5*t25*t33*t4*t70-8.507893095045111d+2*t31 5901 6 *t36*t6*t69+1.1343857460060149d+3*t25*t30*t6*t69-9.694318 5902 7 515631648d+4*t31*t39*t4*t69+1.3572045921884307d+5*t28*t36 5903 8 *t4*t69+1.809606122917908d+5*t25*t33*t4*t69-2.32663644375 5904 9 15955d+5*t22*t30*t4*t69-1.1343857460060149d+3*t28*t33*t6* 5905 : t68+1.4584959591505908d+3*t22*t27*t6*t68-1.55109096250106 5906 ; 35d+5*t28*t36*t4*t68+2.0681212833347515d+5*t25*t33*t4*t68 5907 < +2.659013078573252d+5*t22*t30*t4*t68-3.323766348216565d+5 5908 = *t19*t27*t4*t68-1.4584959591505905d+3*t25*t30*t6*t67+1.82 5909 > 31199489382383d+3*t19*t24*t6*t67-2.3266364437515952d+5*t2 5910 ? 5*t33*t4*t67+2.9913897133949086d+5*t22*t30*t4*t67+3.73923 5911 @ 71417436354d+5*t19*t27*t4*t67-1.8231199489382383d+3*t22*t 5912 1 27*t6*t66-3.3237663482165647d+5*t22*t30*t4*t66+4.15470793 5913 2 52707056d+5*t19*t27*t4*t66-6.093571638397035d+5*t110*t21* 5914 3 t4*t66-2.228257715368958d+3*t19*t24*t6*t65+2.673909258442 5915 4 7493d+3*t110*t17*t6*t65-4.5701787287977763d+5*t19*t27*t4* 5916 5 t65+6.702928802236738d+5*t110*t21*t4*t65-7.92164312991614 5917 6 7d+5*t142*t17*t4*t65)-9.305257363491002d-1*t12*t4*t51*(2. 5918 7 2282577153689576d+3*t21*t53*t6*t89-4.5701787287977763d+5* 5919 8 t24*t4*t54*t89+5.077976365330863d+5*t24*t4*t53*t89+5.5857 5920 9 74001863949d+5*t24*t4*t52*t89+4.0513776643071964d+1*t16*t 5921 : 43*t6*t62+9.232684300601569d+2*t4*t43*t62-2.7698052901804 5922 ; 71d+3*t16*t4*t40*t62-4.0513776643071964d+1*t46*t6*t61+1.2 5923 < 154132992921589d+2*t40*t45*t6*t61-1.1079221160721883d+4*t 5924 = 37*t4*t45*t61+1.846536860120314d+3*t4*t43*t61+5.539610580 5925 > 360942d+3*t16*t4*t40*t61-1.2154132992921589d+2*t16*t43*t6 5926 ? *t60+2.4308265985843178d+2*t37*t42*t6*t60+1.6618831741082 5927 @ 832d+4*t37*t4*t45*t60-2.769805290180471d+3*t4*t43*t60-2.7 5928 1 69805290180471d+4*t34*t4*t42*t60+8.309415870541416d+3*t16 5929 2 *t4*t40*t60-2.4308265985843178d+2*t40*t45*t59*t6+4.051377 5930 3 6643071964d+2*t34*t39*t59*t6-4.051377664307196d+2*t37*t42 5931 4 *t58*t6+6.077066496460793d+2*t31*t36*t58*t6-6.07706649646 5932 5 0795d+2*t34*t39*t57*t6+8.507893095045113d+2*t28*t33*t57*t 5933 6 6-8.507893095045111d+2*t31*t36*t56*t6+1.1343857460060149d 5934 7 +3*t25*t30*t56*t6-1.1343857460060149d+3*t28*t33*t55*t6+1. 5935 8 4584959591505908d+3*t22*t27*t55*t6-1.4584959591505905d+3* 5936 9 t25*t30*t54*t6+1.8231199489382383d+3*t19*t24*t54*t6-1.823 5937 : 1199489382383d+3*t22*t27*t53*t6-2.228257715368958d+3*t19* 5938 ; t24*t52*t6+2.6739092584427493d+3*t110*t17*t52*t6+2.215844 5939 < 2321443766d+4*t37*t4*t45*t59+3.693073720240629d+4*t34*t4* 5940 = t42*t59-1.1079221160721883d+4*t16*t4*t40*t59-5.5396105803 5941 > 60941d+4*t31*t39*t4*t59-2.7698052901804704d+4*t37*t4*t45* 5942 ? t58+4.616342150300784d+4*t34*t4*t42*t58+6.924513225451174 5943 @ d+4*t31*t39*t4*t58-9.694318515631648d+4*t28*t36*t4*t58-5. 5944 1 539610580360942d+4*t34*t4*t42*t57+8.309415870541416d+4*t3 5945 2 1*t39*t4*t57+1.1633182218757979d+5*t28*t36*t4*t57-1.55109 5946 3 09625010638d+5*t25*t33*t4*t57-9.694318515631648d+4*t31*t3 5947 4 9*t4*t56+1.3572045921884307d+5*t28*t36*t4*t56+1.809606122 5948 5 917908d+5*t25*t33*t4*t56-2.3266364437515955d+5*t22*t30*t4 5949 6 *t56-1.5510909625010635d+5*t28*t36*t4*t55+2.0681212833347 5950 7 515d+5*t25*t33*t4*t55+2.659013078573252d+5*t22*t30*t4*t55 5951 8 -3.323766348216565d+5*t19*t27*t4*t55-2.3266364437515952d+ 5952 9 5*t25*t33*t4*t54+2.9913897133949086d+5*t22*t30*t4*t54+3.7 5953 : 392371417436354d+5*t19*t27*t4*t54-3.3237663482165647d+5*t 5954 ; 22*t30*t4*t53+4.1547079352707056d+5*t19*t27*t4*t53-6.0935 5955 < 71638397035d+5*t110*t21*t4*t53-4.5701787287977763d+5*t19* 5956 = t27*t4*t52+6.702928802236738d+5*t110*t21*t4*t52-7.9216431 5957 > 29916147d+5*t142*t17*t4*t52)-9.305257363491002d-1*t12*t3* 5958 ? t4*(2.2282577153689576d+3*t20*t21*t6*t89-4.57017872879777 5959 @ 63d+5*t23*t24*t4*t89+5.077976365330863d+5*t20*t24*t4*t89+ 5960 1 5.585774001863949d+5*t13*t24*t4*t89+4.0513776643071964d+1 5961 2 *t16*t43*t47*t6-4.0513776643071964d+1*t44*t46*t6+1.215413 5962 3 2992921589d+2*t40*t44*t45*t6-2.4308265985843178d+2*t38*t4 5963 4 0*t45*t6-1.2154132992921589d+2*t16*t41*t43*t6+2.430826598 5964 5 5843178d+2*t37*t41*t42*t6-4.051377664307196d+2*t35*t37*t4 5965 6 2*t6+4.0513776643071964d+2*t34*t38*t39*t6-6.0770664964607 5966 7 95d+2*t32*t34*t39*t6+6.077066496460793d+2*t31*t35*t36*t6- 5967 8 8.507893095045111d+2*t29*t31*t36*t6+8.507893095045113d+2* 5968 9 t28*t32*t33*t6-1.1343857460060149d+3*t26*t28*t33*t6+1.134 5969 : 3857460060149d+3*t25*t29*t30*t6-1.4584959591505905d+3*t23 5970 ; *t25*t30*t6+1.4584959591505908d+3*t22*t26*t27*t6-1.823119 5971 < 9489382383d+3*t20*t22*t27*t6+1.8231199489382383d+3*t19*t2 5972 = 3*t24*t6-2.228257715368958d+3*t13*t19*t24*t6+2.6739092584 5973 > 427493d+3*t110*t13*t17*t6+9.232684300601569d+2*t4*t43*t47 5974 ? -2.769805290180471d+3*t16*t4*t40*t47-1.1079221160721883d+ 5975 @ 4*t37*t4*t44*t45+1.6618831741082832d+4*t37*t4*t41*t45+2.2 5976 1 158442321443766d+4*t37*t38*t4*t45-2.7698052901804704d+4*t 5977 2 35*t37*t4*t45+1.846536860120314d+3*t4*t43*t44+5.539610580 5978 3 360942d+3*t16*t4*t40*t44-2.769805290180471d+3*t4*t41*t43- 5979 4 2.769805290180471d+4*t34*t4*t41*t42+3.693073720240629d+4* 5980 5 t34*t38*t4*t42+4.616342150300784d+4*t34*t35*t4*t42-5.5396 5981 6 10580360942d+4*t32*t34*t4*t42+8.309415870541416d+3*t16*t4 5982 7 *t40*t41-1.1079221160721883d+4*t16*t38*t4*t40-5.539610580 5983 8 360941d+4*t31*t38*t39*t4+6.924513225451174d+4*t31*t35*t39 5984 9 *t4+8.309415870541416d+4*t31*t32*t39*t4-9.694318515631648 5985 : d+4*t29*t31*t39*t4-9.694318515631648d+4*t28*t35*t36*t4+1. 5986 ; 1633182218757979d+5*t28*t32*t36*t4+1.3572045921884307d+5* 5987 < t28*t29*t36*t4-1.5510909625010635d+5*t26*t28*t36*t4-1.551 5988 = 0909625010638d+5*t25*t32*t33*t4+1.809606122917908d+5*t25* 5989 > t29*t33*t4+2.0681212833347515d+5*t25*t26*t33*t4-2.3266364 5990 ? 437515952d+5*t23*t25*t33*t4-2.3266364437515955d+5*t22*t29 5991 @ *t30*t4+2.659013078573252d+5*t22*t26*t30*t4+2.99138971339 5992 1 49086d+5*t22*t23*t30*t4-3.3237663482165647d+5*t20*t22*t30 5993 2 *t4-3.323766348216565d+5*t19*t26*t27*t4+3.739237141743635 5994 3 4d+5*t19*t23*t27*t4+4.1547079352707056d+5*t19*t20*t27*t4- 5995 4 4.5701787287977763d+5*t13*t19*t27*t4-6.093571638397035d+5 5996 5 *t110*t20*t21*t4+6.702928802236738d+5*t110*t13*t21*t4-7.9 5997 6 21643129916147d+5*t13*t142*t17*t4)+t104*(-1.0834770598202 5998 7 839d-2*gammaaa*t141*t50*t64-1.0834770598202839d-2*gammaaa 5999 8 *t105*t109*t50)+1.9863746096705204d-2*gammaaa*t109*t125*t 6000 9 50*t64-5.316678166471045d-5*t109*t115*t124*t50*t64-2.3079 6001 : 800683637772d-4*t108*t115*t116*t124*t64+t101*(-4.13566993 6002 ; 9329334d-1*t107*t12*t51-4.135669939329334d-1*t106*t12*t3) 6003 < -2.4814019635976003d+0*t12*t139*t5*t51-2.4814019635976003 6004 = d+0*t103*t107*t5*t51-1.8610514726982003d+0*t103*t139*t4*t 6005 > 51-9.305257363491002d-1*t107*t123*t4*t51+2*t105*t141*t51+ 6006 ? t109*t126*t51-5.041016444533138d-3*gammaaa*t107*t118*t12* 6007 @ t50+4.947305865786653d-5*t107*t115*t117*t12*t50-2.4814019 6008 1 635976003d+0*t12*t138*t3*t5-2.4814019635976003d+0*t103*t1 6009 2 06*t3*t5-1.8610514726982003d+0*t103*t138*t3*t4-9.30525736 6010 3 3491002d-1*t106*t123*t3*t4+2*t105*t140*t3+t108*t126*t3+2. 6011 4 1476348525932504d-4*t106*t115*t116*t117*t12)*wght+Mmat3(i 6012 5 q,D3_RA_RA_TA) 6013 Mmat3(iq,D3_RA_RA_TB) = Mmat3(iq,D3_RA_RA_TB) 6014 Mmat3(iq,D3_RA_RB_TA) = Mmat3(iq,D3_RA_RB_TA) 6015 Mmat3(iq,D3_RA_GAA_TA) = 1.0d+0*((-3.361156316208638d-3*t12* 6016 1 t138-3.361156316208638d-3*t103*t106)*t94*t96+(-1.89038116 6017 2 6699927d-3*t12*t139*t50-1.890381166699927d-3*t103*t107*t5 6018 3 0)*t96+4.481541754944851d-3*t106*t12*t94*t95+2.5205082222 6019 4 66569d-3*t107*t12*t50*t95+t1*(3.612104625279974d-3*t140*t 6020 5 64+3.612104625279974d-3*t105*t108)*t94-9.632279000746596d 6021 6 -3*t104*t108*t64*t94+t1*(2.0315194871630324d-3*t141*t50*t 6022 7 64+2.0315194871630324d-3*t105*t109*t50)+1.993754312426642 6023 8 1d-5*gammaaa*t109*t133*t50*t64-5.417385299101419d-3*t104* 6024 9 t109*t50*t64+8.654925256364164d-5*gammaaa*t108*t116*t133* 6025 : t64-1.855239699669995d-5*gammaaa*t107*t12*t132*t50-8.0536 6026 ; 3069722469d-5*gammaaa*t106*t116*t12*t132)*wght+Mmat3(iq,D 6027 < 3_RA_GAA_TA) 6028 Mmat3(iq,D3_RA_GAA_TB) = Mmat3(iq,D3_RA_GAA_TB) 6029 Mmat3(iq,D3_RA_GAB_TA) = Mmat3(iq,D3_RA_GAB_TA) 6030 Mmat3(iq,D3_RA_GAB_TB) = Mmat3(iq,D3_RA_GAB_TB) 6031 Mmat3(iq,D3_RA_GBB_TA) = Mmat3(iq,D3_RA_GBB_TA) 6032 Mmat3(iq,D3_RA_GBB_TB) = Mmat3(iq,D3_RA_GBB_TB) 6033 Mmat3(iq,D3_GAA_GAA_TA) = 1.0d+0*(-7.476578671599909d-6*t109 6034 1 *t137*t50*t64-3.245596971136562d-5*t108*t116*t137*t64+6.9 6035 2 57148873762482d-6*t107*t12*t136*t50+3.020111511459258d-5* 6036 3 t106*t116*t12*t136)*wght+Mmat3(iq,D3_GAA_GAA_TA) 6037 Mmat3(iq,D3_GAA_GAA_TB) = Mmat3(iq,D3_GAA_GAA_TB) 6038 Mmat3(iq,D3_GAA_GAB_TA) = Mmat3(iq,D3_GAA_GAB_TA) 6039 Mmat3(iq,D3_GAA_GAB_TB) = Mmat3(iq,D3_GAA_GAB_TB) 6040 Mmat3(iq,D3_GAA_GBB_TA) = Mmat3(iq,D3_GAA_GBB_TA) 6041 Mmat3(iq,D3_GAB_GAB_TA) = Mmat3(iq,D3_GAB_GAB_TA) 6042 Mmat3(iq,D3_TA_TA_TA) = 1.0d+0*(t51*t64*(-7.92d+3*t24*t79*t8 6043 1 9-2.64d+4*t24*t78*t89-2.904d+4*t24*t77*t89-4.8d+1*t43*t87 6044 2 -4.8d+1*t16*t40*t87-1.92d+2*t37*t45*t86-9.6d+1*t43*t86-2. 6045 3 88d+2*t16*t40*t86-8.64d+2*t37*t45*t85-4.8d+1*t43*t85-4.8d 6046 4 +2*t34*t42*t85-4.32d+2*t16*t40*t85-1.152d+3*t37*t45*t84-1 6047 5 .92d+3*t34*t42*t84-1.92d+2*t16*t40*t84-9.6d+2*t31*t39*t84 6048 6 -4.8d+2*t37*t45*t83-2.4d+3*t34*t42*t83-3.6d+3*t31*t39*t83 6049 7 -1.68d+3*t28*t36*t83-9.6d+2*t34*t42*t82-4.32d+3*t31*t39*t 6050 8 82-6.048d+3*t28*t36*t82-2.688d+3*t25*t33*t82-1.68d+3*t31* 6051 9 t39*t81-7.056d+3*t28*t36*t81-9.408d+3*t25*t33*t81-4.032d+ 6052 : 3*t22*t30*t81-2.688d+3*t28*t36*t80-1.0752d+4*t25*t33*t80- 6053 ; 1.3824d+4*t22*t30*t80-5.76d+3*t19*t27*t80-4.032d+3*t25*t3 6054 < 3*t79-1.5552d+4*t22*t30*t79-1.944d+4*t19*t27*t79-5.76d+3* 6055 = t22*t30*t78-2.16d+4*t19*t27*t78-1.056d+4*t110*t21*t78-7.9 6056 > 2d+3*t19*t27*t77-3.4848d+4*t110*t21*t77-1.3728d+4*t142*t1 6057 ? 7*t77)+t3*t64*(-7.92d+3*t24*t67*t89-2.64d+4*t24*t66*t89-2 6058 @ .904d+4*t24*t65*t89-4.8d+1*t43*t75-4.8d+1*t16*t40*t75-1.9 6059 1 2d+2*t37*t45*t74-9.6d+1*t43*t74-2.88d+2*t16*t40*t74-8.64d 6060 2 +2*t37*t45*t73-4.8d+1*t43*t73-4.8d+2*t34*t42*t73-4.32d+2* 6061 3 t16*t40*t73-1.152d+3*t37*t45*t72-1.92d+3*t34*t42*t72-1.92 6062 4 d+2*t16*t40*t72-9.6d+2*t31*t39*t72-4.8d+2*t37*t45*t71-2.4 6063 5 d+3*t34*t42*t71-3.6d+3*t31*t39*t71-1.68d+3*t28*t36*t71-9. 6064 6 6d+2*t34*t42*t70-4.32d+3*t31*t39*t70-6.048d+3*t28*t36*t70 6065 7 -2.688d+3*t25*t33*t70-1.68d+3*t31*t39*t69-7.056d+3*t28*t3 6066 8 6*t69-9.408d+3*t25*t33*t69-4.032d+3*t22*t30*t69-2.688d+3* 6067 9 t28*t36*t68-1.0752d+4*t25*t33*t68-1.3824d+4*t22*t30*t68-5 6068 : .76d+3*t19*t27*t68-4.032d+3*t25*t33*t67-1.5552d+4*t22*t30 6069 ; *t67-1.944d+4*t19*t27*t67-5.76d+3*t22*t30*t66-2.16d+4*t19 6070 < *t27*t66-1.056d+4*t110*t21*t66-7.92d+3*t19*t27*t65-3.4848 6071 = d+4*t110*t21*t65-1.3728d+4*t142*t17*t65)-9.30525736349100 6072 > 2d-1*t12*t4*t51*(-7.92d+3*t24*t54*t89-2.64d+4*t24*t53*t89 6073 ? -2.904d+4*t24*t52*t89-4.8d+1*t43*t62-4.8d+1*t16*t40*t62-1 6074 @ .92d+2*t37*t45*t61-9.6d+1*t43*t61-2.88d+2*t16*t40*t61-8.6 6075 1 4d+2*t37*t45*t60-4.8d+1*t43*t60-4.8d+2*t34*t42*t60-4.32d+ 6076 2 2*t16*t40*t60-1.152d+3*t37*t45*t59-1.92d+3*t34*t42*t59-1. 6077 3 92d+2*t16*t40*t59-9.6d+2*t31*t39*t59-4.8d+2*t37*t45*t58-2 6078 4 .4d+3*t34*t42*t58-3.6d+3*t31*t39*t58-1.68d+3*t28*t36*t58- 6079 5 9.6d+2*t34*t42*t57-4.32d+3*t31*t39*t57-6.048d+3*t28*t36*t 6080 6 57-2.688d+3*t25*t33*t57-1.68d+3*t31*t39*t56-7.056d+3*t28* 6081 7 t36*t56-9.408d+3*t25*t33*t56-4.032d+3*t22*t30*t56-2.688d+ 6082 8 3*t28*t36*t55-1.0752d+4*t25*t33*t55-1.3824d+4*t22*t30*t55 6083 9 -5.76d+3*t19*t27*t55-4.032d+3*t25*t33*t54-1.5552d+4*t22*t 6084 : 30*t54-1.944d+4*t19*t27*t54-5.76d+3*t22*t30*t53-2.16d+4*t 6085 ; 19*t27*t53-1.056d+4*t110*t21*t53-7.92d+3*t19*t27*t52-3.48 6086 < 48d+4*t110*t21*t52-1.3728d+4*t142*t17*t52)-9.305257363491 6087 = 002d-1*t12*t3*t4*(-7.92d+3*t23*t24*t89-2.64d+4*t20*t24*t8 6088 > 9-2.904d+4*t13*t24*t89-4.8d+1*t43*t47-4.8d+1*t16*t40*t47- 6089 ? 1.92d+2*t37*t44*t45-8.64d+2*t37*t41*t45-1.152d+3*t37*t38* 6090 @ t45-4.8d+2*t35*t37*t45-9.6d+1*t43*t44-2.88d+2*t16*t40*t44 6091 1 -4.8d+1*t41*t43-4.8d+2*t34*t41*t42-1.92d+3*t34*t38*t42-2. 6092 2 4d+3*t34*t35*t42-9.6d+2*t32*t34*t42-4.32d+2*t16*t40*t41-1 6093 3 .92d+2*t16*t38*t40-9.6d+2*t31*t38*t39-3.6d+3*t31*t35*t39- 6094 4 4.32d+3*t31*t32*t39-1.68d+3*t29*t31*t39-1.68d+3*t28*t35*t 6095 5 36-6.048d+3*t28*t32*t36-7.056d+3*t28*t29*t36-2.688d+3*t26 6096 6 *t28*t36-2.688d+3*t25*t32*t33-9.408d+3*t25*t29*t33-1.0752 6097 7 d+4*t25*t26*t33-4.032d+3*t23*t25*t33-4.032d+3*t22*t29*t30 6098 8 -1.3824d+4*t22*t26*t30-1.5552d+4*t22*t23*t30-5.76d+3*t20* 6099 9 t22*t30-5.76d+3*t19*t26*t27-1.944d+4*t19*t23*t27-2.16d+4* 6100 : t19*t20*t27-7.92d+3*t13*t19*t27-1.056d+4*t110*t20*t21-3.4 6101 ; 848d+4*t110*t13*t21-1.3728d+4*t13*t142*t17))*wght+Mmat3(i 6102 < q,D3_TA_TA_TA) 6103 Mmat3(iq,D3_TA_TA_TB) = Mmat3(iq,D3_TA_TA_TB) 6104 endif ! rhoa.gt.tol_rho 6105 else ! ipol.eq.1 6106 rhoa = rho(iq,R_A) 6107 rhob = rho(iq,R_B) 6108 gammaaa = rgamma(iq,G_AA) 6109 gammaab = rgamma(iq,G_AB) 6110 gammabb = rgamma(iq,G_BB) 6111 taua = tau(iq,T_A) 6112 taub = tau(iq,T_B) 6113 if (rhoa.gt.tol_rho.and.rhob.gt.tol_rho) then 6114 t1 = 1/rhoa**2.6666666666666666d+0 6115 t2 = 4.492667444378077d-3*gammaaa*t1+1.0d+0 6116 t3 = 8.04d-1*(1.0d+0-1.0d+0/t2)+1.0d+0 6117 t4 = rhoa**1.3333333333333333d+0 6118 t5 = rhoa**3.333333333333333d-1 6119 t6 = 1/t5 6120 t7 = 1/rhoa 6121 t8 = 1.282782438530422d-1*t6-2.63857249068588d-4*t7 6122 t9 = rhoa**6.666666666666666d-1 6123 t10 = exp(-2.4308265985843178d+2*t9) 6124 t11 = t10*t8+2.63857249068588d-4*t7-1.924173657795633d-1*t6+ 6125 1 3.544907701811032d+0*erf(1.5591108358883013d+1*t5) 6126 t12 = 1.0d+0-4.275941461768073d-2*t11*t6 6127 t13 = param(1) 6128 t14 = param(12) 6129 t15 = rhoa**1.6666666666666669d+0 6130 t16 = 9.115599744691192d+0*t15 6131 t17 = t16-2.0d+0*taua 6132 t18 = t17**11 6133 t19 = 2.0d+0*taua+t16 6134 t20 = 1/t19**11 6135 t21 = param(11) 6136 t22 = t17**10 6137 t23 = 1/t19**10 6138 t24 = param(10) 6139 t25 = t17**9 6140 t26 = 1/t19**9 6141 t27 = param(9) 6142 t28 = t17**8 6143 t29 = 1/t19**8 6144 t30 = param(8) 6145 t31 = t17**7 6146 t32 = 1/t19**7 6147 t33 = param(7) 6148 t34 = t17**6 6149 t35 = 1/t19**6 6150 t36 = param(6) 6151 t37 = t17**5 6152 t38 = 1/t19**5 6153 t39 = param(5) 6154 t40 = t17**4 6155 t41 = 1/t19**4 6156 t42 = param(4) 6157 t43 = t17**3 6158 t44 = 1/t19**3 6159 t45 = param(3) 6160 t46 = t17**2 6161 t47 = 1/t19**2 6162 t48 = param(2) 6163 t49 = 1/t19 6164 t50 = t17*t48*t49+t45*t46*t47+t42*t43*t44+t39*t40*t41+t36*t3 6165 1 7*t38+t33*t34*t35+t30*t31*t32+t27*t28*t29+t24*t25*t26+t21 6166 2 *t22*t23+t14*t18*t20+t13 6167 t51 = exp(-3.6802889260199856d-3*gammaaa*t1) 6168 t52 = 5.52d-1*(1.0d+0-t51)+1.0d+0 6169 t53 = param(13) 6170 t54 = param(24) 6171 t55 = param(23) 6172 t56 = param(22) 6173 t57 = param(21) 6174 t58 = param(20) 6175 t59 = param(19) 6176 t60 = param(18) 6177 t61 = param(17) 6178 t62 = param(16) 6179 t63 = param(15) 6180 t64 = param(14) 6181 t65 = t17*t49*t64+t46*t47*t63+t43*t44*t62+t40*t41*t61+t37*t3 6182 1 8*t60+t34*t35*t59+t31*t32*t58+t28*t29*t57+t25*t26*t56+t22 6183 2 *t23*t55+t18*t20*t54+t53 6184 t66 = 9.305257363491002d-1*t12*t4-9.305257363491002d-1*t4 6185 t67 = param(25) 6186 t68 = param(36) 6187 t69 = param(35) 6188 t70 = param(34) 6189 t71 = param(33) 6190 t72 = param(32) 6191 t73 = param(31) 6192 t74 = param(30) 6193 t75 = param(29) 6194 t76 = param(28) 6195 t77 = param(27) 6196 t78 = param(26) 6197 t79 = t17*t49*t78+t46*t47*t77+t43*t44*t76+t40*t41*t75+t37*t3 6198 1 8*t74+t34*t35*t73+t31*t32*t72+t28*t29*t71+t25*t26*t70+t22 6199 2 *t23*t69+t18*t20*t68+t67 6200 t80 = param(37) 6201 t81 = param(48) 6202 t82 = param(47) 6203 t83 = param(46) 6204 t84 = param(45) 6205 t85 = param(44) 6206 t86 = param(43) 6207 t87 = param(42) 6208 t88 = param(41) 6209 t89 = param(40) 6210 t90 = param(39) 6211 t91 = param(38) 6212 t92 = t17*t49*t91+t46*t47*t90+t43*t44*t89+t40*t41*t88+t37*t3 6213 1 8*t87+t34*t35*t86+t31*t32*t85+t28*t29*t84+t25*t26*t83+t22 6214 2 *t23*t82+t18*t20*t81+t80 6215 t93 = 1/rhob**2.6666666666666666d+0 6216 t94 = 4.492667444378077d-3*gammabb*t93+1.0d+0 6217 t95 = 8.04d-1*(1.0d+0-1.0d+0/t94)+1.0d+0 6218 t96 = rhob**1.3333333333333333d+0 6219 t97 = rhob**3.333333333333333d-1 6220 t98 = 1/t97 6221 t99 = 1/rhob 6222 t100 = 1.282782438530422d-1*t98-2.63857249068588d-4*t99 6223 t101 = rhob**6.666666666666666d-1 6224 t102 = exp(-2.4308265985843178d+2*t101) 6225 t103 = 2.63857249068588d-4*t99-1.924173657795633d-1*t98+3.54 6226 1 4907701811032d+0*erf(1.5591108358883013d+1*t97)+t100*t102 6227 t104 = 1.0d+0-4.275941461768073d-2*t103*t98 6228 t105 = rhob**1.6666666666666669d+0 6229 t106 = 9.115599744691192d+0*t105 6230 t107 = t106-2.0d+0*taub 6231 t108 = t107**11 6232 t109 = 2.0d+0*taub+t106 6233 t110 = 1/t109**11 6234 t111 = t107**10 6235 t112 = 1/t109**10 6236 t113 = t107**9 6237 t114 = 1/t109**9 6238 t115 = t107**8 6239 t116 = 1/t109**8 6240 t117 = t107**7 6241 t118 = 1/t109**7 6242 t119 = t107**6 6243 t120 = 1/t109**6 6244 t121 = t107**5 6245 t122 = 1/t109**5 6246 t123 = t107**4 6247 t124 = 1/t109**4 6248 t125 = t107**3 6249 t126 = 1/t109**3 6250 t127 = t107**2 6251 t128 = 1/t109**2 6252 t129 = 1/t109 6253 t130 = t107*t129*t48+t127*t128*t45+t125*t126*t42+t123*t124*t 6254 1 39+t121*t122*t36+t119*t120*t33+t117*t118*t30+t115*t116*t2 6255 2 7+t113*t114*t24+t111*t112*t21+t108*t110*t14+t13 6256 t131 = exp(-3.6802889260199856d-3*gammabb*t93) 6257 t132 = 5.52d-1*(1.0d+0-t131)+1.0d+0 6258 t133 = t107*t129*t64+t127*t128*t63+t125*t126*t62+t123*t124*t 6259 1 61+t121*t122*t60+t119*t120*t59+t117*t118*t58+t115*t116*t5 6260 2 7+t113*t114*t56+t111*t112*t55+t108*t110*t54+t53 6261 t134 = 9.305257363491002d-1*t104*t96-9.305257363491002d-1*t9 6262 1 6 6263 t135 = t107*t129*t78+t127*t128*t77+t125*t126*t76+t123*t124*t 6264 1 75+t121*t122*t74+t119*t120*t73+t117*t118*t72+t115*t116*t7 6265 2 1+t113*t114*t70+t111*t112*t69+t108*t110*t68+t67 6266 t136 = t107*t129*t91+t127*t128*t90+t125*t126*t89+t123*t124*t 6267 1 88+t121*t122*t87+t119*t120*t86+t117*t118*t85+t115*t116*t8 6268 2 4+t113*t114*t83+t111*t112*t82+t108*t110*t81+t80 6269 t137 = 1/t19**12 6270 t138 = 1.5192666241151986d+1*t48*t49*t9-1.5192666241151986d+ 6271 1 1*t17*t47*t48*t9+3.038533248230397d+1*t17*t45*t47*t9-3.03 6272 2 8533248230397d+1*t44*t45*t46*t9+4.5577998723455965d+1*t42 6273 3 *t44*t46*t9-4.5577998723455965d+1*t41*t42*t43*t9+6.077066 6274 4 496460795d+1*t39*t41*t43*t9-6.077066496460795d+1*t38*t39* 6275 5 t40*t9+7.596333120575993d+1*t36*t38*t40*t9-7.596333120575 6276 6 993d+1*t35*t36*t37*t9+9.115599744691193d+1*t33*t35*t37*t9 6277 7 -9.115599744691193d+1*t32*t33*t34*t9+1.0634866368806391d+ 6278 8 2*t30*t32*t34*t9-1.0634866368806391d+2*t29*t30*t31*t9+1.2 6279 9 154132992921589d+2*t27*t29*t31*t9-1.2154132992921589d+2*t 6280 : 26*t27*t28*t9+1.3673399617036788d+2*t24*t26*t28*t9-1.3673 6281 ; 399617036788d+2*t23*t24*t25*t9+1.5192666241151986d+2*t21* 6282 < t23*t25*t9-1.5192666241151986d+2*t20*t21*t22*t9+1.6711932 6283 = 865267184d+2*t14*t20*t22*t9-1.6711932865267184d+2*t137*t1 6284 > 4*t18*t9 6285 t139 = 1.5192666241151986d+1*t49*t64*t9-1.5192666241151986d+ 6286 1 1*t17*t47*t64*t9+3.038533248230397d+1*t17*t47*t63*t9-3.03 6287 2 8533248230397d+1*t44*t46*t63*t9+4.5577998723455965d+1*t44 6288 3 *t46*t62*t9-4.5577998723455965d+1*t41*t43*t62*t9+6.077066 6289 4 496460795d+1*t41*t43*t61*t9-6.077066496460795d+1*t38*t40* 6290 5 t61*t9+7.596333120575993d+1*t38*t40*t60*t9-7.596333120575 6291 6 993d+1*t35*t37*t60*t9+9.115599744691193d+1*t35*t37*t59*t9 6292 7 -9.115599744691193d+1*t32*t34*t59*t9+1.0634866368806391d+ 6293 8 2*t32*t34*t58*t9-1.0634866368806391d+2*t29*t31*t58*t9+1.2 6294 9 154132992921589d+2*t29*t31*t57*t9-1.2154132992921589d+2*t 6295 : 26*t28*t57*t9+1.3673399617036788d+2*t26*t28*t56*t9-1.3673 6296 ; 399617036788d+2*t23*t25*t56*t9+1.5192666241151986d+2*t23* 6297 < t25*t55*t9-1.5192666241151986d+2*t20*t22*t55*t9+1.6711932 6298 = 865267184d+2*t20*t22*t54*t9-1.6711932865267184d+2*t137*t1 6299 > 8*t54*t9 6300 t140 = 1.5192666241151986d+1*t49*t78*t9-1.5192666241151986d+ 6301 1 1*t17*t47*t78*t9+3.038533248230397d+1*t17*t47*t77*t9-3.03 6302 2 8533248230397d+1*t44*t46*t77*t9+4.5577998723455965d+1*t44 6303 3 *t46*t76*t9-4.5577998723455965d+1*t41*t43*t76*t9+6.077066 6304 4 496460795d+1*t41*t43*t75*t9-6.077066496460795d+1*t38*t40* 6305 5 t75*t9+7.596333120575993d+1*t38*t40*t74*t9-7.596333120575 6306 6 993d+1*t35*t37*t74*t9+9.115599744691193d+1*t35*t37*t73*t9 6307 7 -9.115599744691193d+1*t32*t34*t73*t9+1.0634866368806391d+ 6308 8 2*t32*t34*t72*t9-1.0634866368806391d+2*t29*t31*t72*t9+1.2 6309 9 154132992921589d+2*t29*t31*t71*t9-1.2154132992921589d+2*t 6310 : 26*t28*t71*t9+1.3673399617036788d+2*t26*t28*t70*t9-1.3673 6311 ; 399617036788d+2*t23*t25*t70*t9+1.5192666241151986d+2*t23* 6312 < t25*t69*t9-1.5192666241151986d+2*t20*t22*t69*t9+1.6711932 6313 = 865267184d+2*t20*t22*t68*t9-1.6711932865267184d+2*t137*t1 6314 > 8*t68*t9 6315 t141 = 1.5192666241151986d+1*t49*t9*t91-1.5192666241151986d+ 6316 1 1*t17*t47*t9*t91+3.038533248230397d+1*t17*t47*t9*t90-3.03 6317 2 8533248230397d+1*t44*t46*t9*t90+4.5577998723455965d+1*t44 6318 3 *t46*t89*t9-4.5577998723455965d+1*t41*t43*t89*t9+6.077066 6319 4 496460795d+1*t41*t43*t88*t9-6.077066496460795d+1*t38*t40* 6320 5 t88*t9+7.596333120575993d+1*t38*t40*t87*t9-7.596333120575 6321 6 993d+1*t35*t37*t87*t9+9.115599744691193d+1*t35*t37*t86*t9 6322 7 -9.115599744691193d+1*t32*t34*t86*t9+1.0634866368806391d+ 6323 8 2*t32*t34*t85*t9-1.0634866368806391d+2*t29*t31*t85*t9+1.2 6324 9 154132992921589d+2*t29*t31*t84*t9-1.2154132992921589d+2*t 6325 : 26*t28*t84*t9+1.3673399617036788d+2*t26*t28*t83*t9-1.3673 6326 ; 399617036788d+2*t23*t25*t83*t9+1.5192666241151986d+2*t23* 6327 < t25*t82*t9-1.5192666241151986d+2*t20*t22*t82*t9+1.6711932 6328 = 865267184d+2*t20*t22*t81*t9-1.6711932865267184d+2*t137*t1 6329 > 8*t81*t9 6330 t142 = 1/t2**2 6331 t143 = 1/rhoa**2.3333333333333334d+0 6332 t144 = 1/t4 6333 t145 = rhoa**2 6334 t146 = 1/t145 6335 t147 = 2.63857249068588d-4*t146-4.2759414617680735d-2*t144 6336 t148 = 5.641895835477563d-1 6337 t149 = 1/t9 6338 t150 = -1.6205510657228786d+2*t10*t6*t8+3.6846026734116505d+ 6339 1 1*t10*t148*t149+t10*t147-2.63857249068588d-4*t146+6.41391 6340 2 219265211d-2*t144 6341 t151 = 1.4253138205893576d-2*t11*t144-4.275941461768073d-2*t 6342 1 150*t6 6343 t152 = 1/rhoa**3.6666666666666664d+0 6344 t153 = 1.2407009817988002d+0*t12*t5-1.2407009817988002d+0*t5 6345 1 +9.305257363491002d-1*t151*t4 6346 t154 = 1/t109**12 6347 t155 = 1.5192666241151986d+1*t101*t129*t48-1.519266624115198 6348 1 6d+1*t101*t107*t128*t48+3.038533248230397d+1*t101*t107*t1 6349 2 28*t45-3.038533248230397d+1*t101*t126*t127*t45+4.55779987 6350 3 23455965d+1*t101*t126*t127*t42-4.5577998723455965d+1*t101 6351 4 *t124*t125*t42+6.077066496460795d+1*t101*t124*t125*t39-6. 6352 5 077066496460795d+1*t101*t122*t123*t39+7.596333120575993d+ 6353 6 1*t101*t122*t123*t36-7.596333120575993d+1*t101*t120*t121* 6354 7 t36+9.115599744691193d+1*t101*t120*t121*t33-9.11559974469 6355 8 1193d+1*t101*t118*t119*t33+1.0634866368806391d+2*t101*t11 6356 9 8*t119*t30-1.0634866368806391d+2*t101*t116*t117*t30+1.215 6357 : 4132992921589d+2*t101*t116*t117*t27-1.2154132992921589d+2 6358 ; *t101*t114*t115*t27+1.3673399617036788d+2*t101*t114*t115* 6359 < t24-1.3673399617036788d+2*t101*t112*t113*t24+1.5192666241 6360 = 151986d+2*t101*t112*t113*t21-1.5192666241151986d+2*t101*t 6361 > 110*t111*t21-1.6711932865267184d+2*t101*t108*t14*t154+1.6 6362 ? 711932865267184d+2*t101*t110*t111*t14 6363 t156 = 1.5192666241151986d+1*t101*t129*t64-1.519266624115198 6364 1 6d+1*t101*t107*t128*t64+3.038533248230397d+1*t101*t107*t1 6365 2 28*t63-3.038533248230397d+1*t101*t126*t127*t63+4.55779987 6366 3 23455965d+1*t101*t126*t127*t62-4.5577998723455965d+1*t101 6367 4 *t124*t125*t62+6.077066496460795d+1*t101*t124*t125*t61-6. 6368 5 077066496460795d+1*t101*t122*t123*t61+7.596333120575993d+ 6369 6 1*t101*t122*t123*t60-7.596333120575993d+1*t101*t120*t121* 6370 7 t60+9.115599744691193d+1*t101*t120*t121*t59-9.11559974469 6371 8 1193d+1*t101*t118*t119*t59+1.0634866368806391d+2*t101*t11 6372 9 8*t119*t58-1.0634866368806391d+2*t101*t116*t117*t58+1.215 6373 : 4132992921589d+2*t101*t116*t117*t57-1.2154132992921589d+2 6374 ; *t101*t114*t115*t57+1.3673399617036788d+2*t101*t114*t115* 6375 < t56-1.3673399617036788d+2*t101*t112*t113*t56+1.5192666241 6376 = 151986d+2*t101*t112*t113*t55-1.5192666241151986d+2*t101*t 6377 > 110*t111*t55-1.6711932865267184d+2*t101*t108*t154*t54+1.6 6378 ? 711932865267184d+2*t101*t110*t111*t54 6379 t157 = 1.5192666241151986d+1*t101*t129*t78-1.519266624115198 6380 1 6d+1*t101*t107*t128*t78+3.038533248230397d+1*t101*t107*t1 6381 2 28*t77-3.038533248230397d+1*t101*t126*t127*t77+4.55779987 6382 3 23455965d+1*t101*t126*t127*t76-4.5577998723455965d+1*t101 6383 4 *t124*t125*t76+6.077066496460795d+1*t101*t124*t125*t75-6. 6384 5 077066496460795d+1*t101*t122*t123*t75+7.596333120575993d+ 6385 6 1*t101*t122*t123*t74-7.596333120575993d+1*t101*t120*t121* 6386 7 t74+9.115599744691193d+1*t101*t120*t121*t73-9.11559974469 6387 8 1193d+1*t101*t118*t119*t73+1.0634866368806391d+2*t101*t11 6388 9 8*t119*t72-1.0634866368806391d+2*t101*t116*t117*t72+1.215 6389 : 4132992921589d+2*t101*t116*t117*t71-1.2154132992921589d+2 6390 ; *t101*t114*t115*t71+1.3673399617036788d+2*t101*t114*t115* 6391 < t70-1.3673399617036788d+2*t101*t112*t113*t70+1.5192666241 6392 = 151986d+2*t101*t112*t113*t69-1.5192666241151986d+2*t101*t 6393 > 110*t111*t69-1.6711932865267184d+2*t101*t108*t154*t68+1.6 6394 ? 711932865267184d+2*t101*t110*t111*t68 6395 t158 = 1.5192666241151986d+1*t101*t129*t91-1.519266624115198 6396 1 6d+1*t101*t107*t128*t91+3.038533248230397d+1*t101*t107*t1 6397 2 28*t90-3.038533248230397d+1*t101*t126*t127*t90+4.55779987 6398 3 23455965d+1*t101*t126*t127*t89-4.5577998723455965d+1*t101 6399 4 *t124*t125*t89+6.077066496460795d+1*t101*t124*t125*t88-6. 6400 5 077066496460795d+1*t101*t122*t123*t88+7.596333120575993d+ 6401 6 1*t101*t122*t123*t87-7.596333120575993d+1*t101*t120*t121* 6402 7 t87+9.115599744691193d+1*t101*t120*t121*t86-9.11559974469 6403 8 1193d+1*t101*t118*t119*t86+1.0634866368806391d+2*t101*t11 6404 9 8*t119*t85-1.0634866368806391d+2*t101*t116*t117*t85+1.215 6405 : 4132992921589d+2*t101*t116*t117*t84-1.2154132992921589d+2 6406 ; *t101*t114*t115*t84+1.3673399617036788d+2*t101*t114*t115* 6407 < t83-1.3673399617036788d+2*t101*t112*t113*t83+1.5192666241 6408 = 151986d+2*t101*t112*t113*t82-1.5192666241151986d+2*t101*t 6409 > 110*t111*t82-1.6711932865267184d+2*t101*t108*t154*t81+1.6 6410 ? 711932865267184d+2*t101*t110*t111*t81 6411 t159 = 1/t94**2 6412 t160 = 1/rhob**2.3333333333333334d+0 6413 t161 = 1/t96 6414 t162 = rhob**2 6415 t163 = 1/t162 6416 t164 = 2.63857249068588d-4*t163-4.2759414617680735d-2*t161 6417 t165 = 1/t101 6418 t166 = -1.6205510657228786d+2*t100*t102*t98+3.68460267341165 6419 1 05d+1*t102*t148*t165+t102*t164-2.63857249068588d-4*t163+6 6420 2 .41391219265211d-2*t161 6421 t167 = 1.4253138205893576d-2*t103*t161-4.275941461768073d-2* 6422 1 t166*t98 6423 t168 = 1/rhob**3.6666666666666664d+0 6424 t169 = 1.2407009817988002d+0*t104*t97-1.2407009817988002d+0* 6425 1 t97+9.305257363491002d-1*t167*t96 6426 t170 = -2.0d+0*t48*t49-2.0d+0*t17*t47*t48-4.0d+0*t17*t45*t47 6427 1 -4.0d+0*t44*t45*t46-6.0d+0*t42*t44*t46-6.0d+0*t41*t42*t43 6428 2 -8.0d+0*t39*t41*t43-8.0d+0*t38*t39*t40-1.0d+1*t36*t38*t40 6429 3 -1.0d+1*t35*t36*t37-1.2d+1*t33*t35*t37-1.2d+1*t32*t33*t34 6430 4 -1.4d+1*t30*t32*t34-1.4d+1*t29*t30*t31-1.6d+1*t27*t29*t31 6431 5 -1.6d+1*t26*t27*t28-1.8d+1*t24*t26*t28-1.8d+1*t23*t24*t25 6432 6 -2.0d+1*t21*t23*t25-2.0d+1*t20*t21*t22-2.2d+1*t14*t20*t22 6433 7 -2.2d+1*t137*t14*t18 6434 t171 = -2.0d+0*t49*t64-2.0d+0*t17*t47*t64-4.0d+0*t17*t47*t63 6435 1 -4.0d+0*t44*t46*t63-6.0d+0*t44*t46*t62-6.0d+0*t41*t43*t62 6436 2 -8.0d+0*t41*t43*t61-8.0d+0*t38*t40*t61-1.0d+1*t38*t40*t60 6437 3 -1.0d+1*t35*t37*t60-1.2d+1*t35*t37*t59-1.2d+1*t32*t34*t59 6438 4 -1.4d+1*t32*t34*t58-1.4d+1*t29*t31*t58-1.6d+1*t29*t31*t57 6439 5 -1.6d+1*t26*t28*t57-1.8d+1*t26*t28*t56-1.8d+1*t23*t25*t56 6440 6 -2.0d+1*t23*t25*t55-2.0d+1*t20*t22*t55-2.2d+1*t20*t22*t54 6441 7 -2.2d+1*t137*t18*t54 6442 t172 = -2.0d+0*t49*t78-2.0d+0*t17*t47*t78-4.0d+0*t17*t47*t77 6443 1 -4.0d+0*t44*t46*t77-6.0d+0*t44*t46*t76-6.0d+0*t41*t43*t76 6444 2 -8.0d+0*t41*t43*t75-8.0d+0*t38*t40*t75-1.0d+1*t38*t40*t74 6445 3 -1.0d+1*t35*t37*t74-1.2d+1*t35*t37*t73-1.2d+1*t32*t34*t73 6446 4 -1.4d+1*t32*t34*t72-1.4d+1*t29*t31*t72-1.6d+1*t29*t31*t71 6447 5 -1.6d+1*t26*t28*t71-1.8d+1*t26*t28*t70-1.8d+1*t23*t25*t70 6448 6 -2.0d+1*t23*t25*t69-2.0d+1*t20*t22*t69-2.2d+1*t20*t22*t68 6449 7 -2.2d+1*t137*t18*t68 6450 t173 = -2.0d+0*t49*t91-2.0d+0*t17*t47*t91-4.0d+0*t17*t47*t90 6451 1 -4.0d+0*t44*t46*t90-6.0d+0*t44*t46*t89-6.0d+0*t41*t43*t89 6452 2 -8.0d+0*t41*t43*t88-8.0d+0*t38*t40*t88-1.0d+1*t38*t40*t87 6453 3 -1.0d+1*t35*t37*t87-1.2d+1*t35*t37*t86-1.2d+1*t32*t34*t86 6454 4 -1.4d+1*t32*t34*t85-1.4d+1*t29*t31*t85-1.6d+1*t29*t31*t84 6455 5 -1.6d+1*t26*t28*t84-1.8d+1*t26*t28*t83-1.8d+1*t23*t25*t83 6456 6 -2.0d+1*t23*t25*t82-2.0d+1*t20*t22*t82-2.2d+1*t20*t22*t81 6457 7 -2.2d+1*t137*t18*t81 6458 t174 = -2.0d+0*t129*t48-2.0d+0*t107*t128*t48-4.0d+0*t107*t12 6459 1 8*t45-4.0d+0*t126*t127*t45-6.0d+0*t126*t127*t42-6.0d+0*t1 6460 2 24*t125*t42-8.0d+0*t124*t125*t39-8.0d+0*t122*t123*t39-1.0 6461 3 d+1*t122*t123*t36-1.0d+1*t120*t121*t36-1.2d+1*t120*t121*t 6462 4 33-1.2d+1*t118*t119*t33-1.4d+1*t118*t119*t30-1.4d+1*t116* 6463 5 t117*t30-1.6d+1*t116*t117*t27-1.6d+1*t114*t115*t27-1.8d+1 6464 6 *t114*t115*t24-1.8d+1*t112*t113*t24-2.0d+1*t112*t113*t21- 6465 7 2.0d+1*t110*t111*t21-2.2d+1*t108*t14*t154-2.2d+1*t110*t11 6466 8 1*t14 6467 t175 = -2.0d+0*t129*t64-2.0d+0*t107*t128*t64-4.0d+0*t107*t12 6468 1 8*t63-4.0d+0*t126*t127*t63-6.0d+0*t126*t127*t62-6.0d+0*t1 6469 2 24*t125*t62-8.0d+0*t124*t125*t61-8.0d+0*t122*t123*t61-1.0 6470 3 d+1*t122*t123*t60-1.0d+1*t120*t121*t60-1.2d+1*t120*t121*t 6471 4 59-1.2d+1*t118*t119*t59-1.4d+1*t118*t119*t58-1.4d+1*t116* 6472 5 t117*t58-1.6d+1*t116*t117*t57-1.6d+1*t114*t115*t57-1.8d+1 6473 6 *t114*t115*t56-1.8d+1*t112*t113*t56-2.0d+1*t112*t113*t55- 6474 7 2.0d+1*t110*t111*t55-2.2d+1*t108*t154*t54-2.2d+1*t110*t11 6475 8 1*t54 6476 t176 = -2.0d+0*t129*t78-2.0d+0*t107*t128*t78-4.0d+0*t107*t12 6477 1 8*t77-4.0d+0*t126*t127*t77-6.0d+0*t126*t127*t76-6.0d+0*t1 6478 2 24*t125*t76-8.0d+0*t124*t125*t75-8.0d+0*t122*t123*t75-1.0 6479 3 d+1*t122*t123*t74-1.0d+1*t120*t121*t74-1.2d+1*t120*t121*t 6480 4 73-1.2d+1*t118*t119*t73-1.4d+1*t118*t119*t72-1.4d+1*t116* 6481 5 t117*t72-1.6d+1*t116*t117*t71-1.6d+1*t114*t115*t71-1.8d+1 6482 6 *t114*t115*t70-1.8d+1*t112*t113*t70-2.0d+1*t112*t113*t69- 6483 7 2.0d+1*t110*t111*t69-2.2d+1*t108*t154*t68-2.2d+1*t110*t11 6484 8 1*t68 6485 t177 = -2.0d+0*t129*t91-2.0d+0*t107*t128*t91-4.0d+0*t107*t12 6486 1 8*t90-4.0d+0*t126*t127*t90-6.0d+0*t126*t127*t89-6.0d+0*t1 6487 2 24*t125*t89-8.0d+0*t124*t125*t88-8.0d+0*t122*t123*t88-1.0 6488 3 d+1*t122*t123*t87-1.0d+1*t120*t121*t87-1.2d+1*t120*t121*t 6489 4 86-1.2d+1*t118*t119*t86-1.4d+1*t118*t119*t85-1.4d+1*t116* 6490 5 t117*t85-1.6d+1*t116*t117*t84-1.6d+1*t114*t115*t84-1.8d+1 6491 6 *t114*t115*t83-1.8d+1*t112*t113*t83-2.0d+1*t112*t113*t82- 6492 7 2.0d+1*t110*t111*t82-2.2d+1*t108*t154*t81-2.2d+1*t110*t11 6493 8 1*t81 6494 t178 = 1/t19**13 6495 t179 = 1.0128444160767991d+1*t48*t49*t6-1.0128444160767991d+ 6496 1 1*t17*t47*t48*t6+2.0256888321535982d+1*t17*t45*t47*t6-2.0 6497 2 256888321535982d+1*t44*t45*t46*t6+3.038533248230397d+1*t4 6498 3 2*t44*t46*t6-3.038533248230397d+1*t41*t42*t43*t6+4.051377 6499 4 6643071964d+1*t39*t41*t43*t6-4.0513776643071964d+1*t38*t3 6500 5 9*t40*t6+5.064222080383994d+1*t36*t38*t40*t6-5.0642220803 6501 6 83994d+1*t35*t36*t37*t6+6.077066496460795d+1*t33*t35*t37* 6502 7 t6-6.077066496460795d+1*t32*t33*t34*t6+7.089910912537593d 6503 8 +1*t30*t32*t34*t6-7.089910912537593d+1*t29*t30*t31*t6+8.1 6504 9 02755328614393d+1*t27*t29*t31*t6-8.102755328614393d+1*t26 6505 : *t27*t28*t6+9.115599744691191d+1*t24*t26*t28*t6-9.1155997 6506 ; 44691191d+1*t23*t24*t25*t6+1.012844416076799d+2*t21*t23*t 6507 < 25*t6-1.012844416076799d+2*t20*t21*t22*t6+1.1141288576844 6508 = 789d+2*t14*t20*t22*t6-1.1141288576844789d+2*t137*t14*t18* 6509 > t6-4.6163421503007845d+2*t4*t47*t48+4.6163421503007845d+2 6510 ? *t17*t4*t44*t48+4.6163421503007845d+2*t4*t45*t47+1.384902 6511 @ 6450902355d+3*t4*t41*t45*t46-4.1547079352707067d+3*t4*t41 6512 1 *t42*t46+2.769805290180471d+3*t39*t4*t41*t46-1.8465368601 6513 2 20314d+3*t17*t4*t44*t45+1.3849026450902355d+3*t17*t4*t42* 6514 3 t44+2.769805290180471d+3*t38*t4*t42*t43-7.386147440481255 6515 4 d+3*t38*t39*t4*t43+4.616342150300784d+3*t36*t38*t4*t43+4. 6516 5 616342150300784d+3*t35*t39*t4*t40-1.154085537575196d+4*t3 6517 6 5*t36*t4*t40+6.924513225451178d+3*t33*t35*t4*t40+6.924513 6518 7 225451178d+3*t32*t36*t37*t4-1.661883174108283d+4*t32*t33* 6519 8 t37*t4+9.694318515631648d+3*t30*t32*t37*t4+9.694318515631 6520 9 648d+3*t29*t33*t34*t4-2.2620076536473846d+4*t29*t30*t34*t 6521 : 4+1.2925758020842196d+4*t27*t29*t34*t4+1.2925758020842196 6522 ; d+4*t26*t30*t31*t4-2.954458976192502d+4*t26*t27*t31*t4+1. 6523 < 6618831741082823d+4*t24*t26*t31*t4+1.6618831741082823d+4* 6524 = t23*t27*t28*t4-3.7392371417436354d+4*t23*t24*t28*t4+2.077 6525 > 3539676353528d+4*t21*t23*t28*t4+2.0773539676353528d+4*t20 6526 ? *t24*t25*t4-4.616342150300784d+4*t20*t21*t25*t4+2.5389881 6527 @ 826654315d+4*t14*t20*t25*t4+2.5389881826654315d+4*t137*t2 6528 1 1*t22*t4-5.585774001863949d+4*t137*t14*t22*t4+3.046785819 6529 2 198518d+4*t14*t178*t18*t4 6530 t180 = 1.0128444160767991d+1*t49*t6*t64-1.0128444160767991d+ 6531 1 1*t17*t47*t6*t64-4.6163421503007845d+2*t4*t47*t64+4.61634 6532 2 21503007845d+2*t17*t4*t44*t64+2.0256888321535982d+1*t17*t 6533 3 47*t6*t63-2.0256888321535982d+1*t44*t46*t6*t63+4.61634215 6534 4 03007845d+2*t4*t47*t63+1.3849026450902355d+3*t4*t41*t46*t 6535 5 63-1.846536860120314d+3*t17*t4*t44*t63+3.038533248230397d 6536 6 +1*t44*t46*t6*t62-3.038533248230397d+1*t41*t43*t6*t62-4.1 6537 7 547079352707067d+3*t4*t41*t46*t62+1.3849026450902355d+3*t 6538 8 17*t4*t44*t62+2.769805290180471d+3*t38*t4*t43*t62+4.05137 6539 9 76643071964d+1*t41*t43*t6*t61-4.0513776643071964d+1*t38*t 6540 : 40*t6*t61+2.769805290180471d+3*t4*t41*t46*t61-7.386147440 6541 ; 481255d+3*t38*t4*t43*t61+4.616342150300784d+3*t35*t4*t40* 6542 < t61+5.064222080383994d+1*t38*t40*t6*t60-5.064222080383994 6543 = d+1*t35*t37*t6*t60+4.616342150300784d+3*t38*t4*t43*t60-1. 6544 > 154085537575196d+4*t35*t4*t40*t60+6.924513225451178d+3*t3 6545 ? 2*t37*t4*t60+6.077066496460795d+1*t35*t37*t59*t6-6.077066 6546 @ 496460795d+1*t32*t34*t59*t6+7.089910912537593d+1*t32*t34* 6547 1 t58*t6-7.089910912537593d+1*t29*t31*t58*t6+8.102755328614 6548 2 393d+1*t29*t31*t57*t6-8.102755328614393d+1*t26*t28*t57*t6 6549 3 +9.115599744691191d+1*t26*t28*t56*t6-9.115599744691191d+1 6550 4 *t23*t25*t56*t6+1.012844416076799d+2*t23*t25*t55*t6-1.012 6551 5 844416076799d+2*t20*t22*t55*t6+1.1141288576844789d+2*t20* 6552 6 t22*t54*t6-1.1141288576844789d+2*t137*t18*t54*t6+6.924513 6553 7 225451178d+3*t35*t4*t40*t59-1.661883174108283d+4*t32*t37* 6554 8 t4*t59+9.694318515631648d+3*t29*t34*t4*t59+9.694318515631 6555 9 648d+3*t32*t37*t4*t58-2.2620076536473846d+4*t29*t34*t4*t5 6556 : 8+1.2925758020842196d+4*t26*t31*t4*t58+1.2925758020842196 6557 ; d+4*t29*t34*t4*t57-2.954458976192502d+4*t26*t31*t4*t57+1. 6558 < 6618831741082823d+4*t23*t28*t4*t57+1.6618831741082823d+4* 6559 = t26*t31*t4*t56-3.7392371417436354d+4*t23*t28*t4*t56+2.077 6560 > 3539676353528d+4*t20*t25*t4*t56+2.0773539676353528d+4*t23 6561 ? *t28*t4*t55-4.616342150300784d+4*t20*t25*t4*t55+2.5389881 6562 @ 826654315d+4*t137*t22*t4*t55+2.5389881826654315d+4*t20*t2 6563 1 5*t4*t54-5.585774001863949d+4*t137*t22*t4*t54+3.046785819 6564 2 198518d+4*t178*t18*t4*t54 6565 t181 = 1.0128444160767991d+1*t49*t6*t78-1.0128444160767991d+ 6566 1 1*t17*t47*t6*t78-4.6163421503007845d+2*t4*t47*t78+4.61634 6567 2 21503007845d+2*t17*t4*t44*t78+2.0256888321535982d+1*t17*t 6568 3 47*t6*t77-2.0256888321535982d+1*t44*t46*t6*t77+4.61634215 6569 4 03007845d+2*t4*t47*t77+1.3849026450902355d+3*t4*t41*t46*t 6570 5 77-1.846536860120314d+3*t17*t4*t44*t77+3.038533248230397d 6571 6 +1*t44*t46*t6*t76-3.038533248230397d+1*t41*t43*t6*t76-4.1 6572 7 547079352707067d+3*t4*t41*t46*t76+1.3849026450902355d+3*t 6573 8 17*t4*t44*t76+2.769805290180471d+3*t38*t4*t43*t76+4.05137 6574 9 76643071964d+1*t41*t43*t6*t75-4.0513776643071964d+1*t38*t 6575 : 40*t6*t75+2.769805290180471d+3*t4*t41*t46*t75-7.386147440 6576 ; 481255d+3*t38*t4*t43*t75+4.616342150300784d+3*t35*t4*t40* 6577 < t75+5.064222080383994d+1*t38*t40*t6*t74-5.064222080383994 6578 = d+1*t35*t37*t6*t74+4.616342150300784d+3*t38*t4*t43*t74-1. 6579 > 154085537575196d+4*t35*t4*t40*t74+6.924513225451178d+3*t3 6580 ? 2*t37*t4*t74+6.077066496460795d+1*t35*t37*t6*t73-6.077066 6581 @ 496460795d+1*t32*t34*t6*t73+6.924513225451178d+3*t35*t4*t 6582 1 40*t73-1.661883174108283d+4*t32*t37*t4*t73+9.694318515631 6583 2 648d+3*t29*t34*t4*t73+7.089910912537593d+1*t32*t34*t6*t72 6584 3 -7.089910912537593d+1*t29*t31*t6*t72+9.694318515631648d+3 6585 4 *t32*t37*t4*t72-2.2620076536473846d+4*t29*t34*t4*t72+1.29 6586 5 25758020842196d+4*t26*t31*t4*t72+8.102755328614393d+1*t29 6587 6 *t31*t6*t71-8.102755328614393d+1*t26*t28*t6*t71+1.2925758 6588 7 020842196d+4*t29*t34*t4*t71-2.954458976192502d+4*t26*t31* 6589 8 t4*t71+1.6618831741082823d+4*t23*t28*t4*t71+9.11559974469 6590 9 1191d+1*t26*t28*t6*t70-9.115599744691191d+1*t23*t25*t6*t7 6591 : 0+1.6618831741082823d+4*t26*t31*t4*t70-3.7392371417436354 6592 ; d+4*t23*t28*t4*t70+2.0773539676353528d+4*t20*t25*t4*t70+1 6593 < .012844416076799d+2*t23*t25*t6*t69-1.012844416076799d+2*t 6594 = 20*t22*t6*t69+2.0773539676353528d+4*t23*t28*t4*t69-4.6163 6595 > 42150300784d+4*t20*t25*t4*t69+2.5389881826654315d+4*t137* 6596 ? t22*t4*t69+1.1141288576844789d+2*t20*t22*t6*t68-1.1141288 6597 @ 576844789d+2*t137*t18*t6*t68+2.5389881826654315d+4*t20*t2 6598 1 5*t4*t68-5.585774001863949d+4*t137*t22*t4*t68+3.046785819 6599 2 198518d+4*t178*t18*t4*t68 6600 t182 = 1.0128444160767991d+1*t49*t6*t91-1.0128444160767991d+ 6601 1 1*t17*t47*t6*t91-4.6163421503007845d+2*t4*t47*t91+4.61634 6602 2 21503007845d+2*t17*t4*t44*t91+2.0256888321535982d+1*t17*t 6603 3 47*t6*t90-2.0256888321535982d+1*t44*t46*t6*t90+4.61634215 6604 4 03007845d+2*t4*t47*t90+1.3849026450902355d+3*t4*t41*t46*t 6605 5 90-1.846536860120314d+3*t17*t4*t44*t90+3.038533248230397d 6606 6 +1*t44*t46*t6*t89-3.038533248230397d+1*t41*t43*t6*t89-4.1 6607 7 547079352707067d+3*t4*t41*t46*t89+1.3849026450902355d+3*t 6608 8 17*t4*t44*t89+2.769805290180471d+3*t38*t4*t43*t89+4.05137 6609 9 76643071964d+1*t41*t43*t6*t88-4.0513776643071964d+1*t38*t 6610 : 40*t6*t88+2.769805290180471d+3*t4*t41*t46*t88-7.386147440 6611 ; 481255d+3*t38*t4*t43*t88+4.616342150300784d+3*t35*t4*t40* 6612 < t88+5.064222080383994d+1*t38*t40*t6*t87-5.064222080383994 6613 = d+1*t35*t37*t6*t87+4.616342150300784d+3*t38*t4*t43*t87-1. 6614 > 154085537575196d+4*t35*t4*t40*t87+6.924513225451178d+3*t3 6615 ? 2*t37*t4*t87+6.077066496460795d+1*t35*t37*t6*t86-6.077066 6616 @ 496460795d+1*t32*t34*t6*t86+6.924513225451178d+3*t35*t4*t 6617 1 40*t86-1.661883174108283d+4*t32*t37*t4*t86+9.694318515631 6618 2 648d+3*t29*t34*t4*t86+7.089910912537593d+1*t32*t34*t6*t85 6619 3 -7.089910912537593d+1*t29*t31*t6*t85+9.694318515631648d+3 6620 4 *t32*t37*t4*t85-2.2620076536473846d+4*t29*t34*t4*t85+1.29 6621 5 25758020842196d+4*t26*t31*t4*t85+8.102755328614393d+1*t29 6622 6 *t31*t6*t84-8.102755328614393d+1*t26*t28*t6*t84+1.2925758 6623 7 020842196d+4*t29*t34*t4*t84-2.954458976192502d+4*t26*t31* 6624 8 t4*t84+1.6618831741082823d+4*t23*t28*t4*t84+9.11559974469 6625 9 1191d+1*t26*t28*t6*t83-9.115599744691191d+1*t23*t25*t6*t8 6626 : 3+1.6618831741082823d+4*t26*t31*t4*t83-3.7392371417436354 6627 ; d+4*t23*t28*t4*t83+2.0773539676353528d+4*t20*t25*t4*t83+1 6628 < .012844416076799d+2*t23*t25*t6*t82-1.012844416076799d+2*t 6629 = 20*t22*t6*t82+2.0773539676353528d+4*t23*t28*t4*t82-4.6163 6630 > 42150300784d+4*t20*t25*t4*t82+2.5389881826654315d+4*t137* 6631 ? t22*t4*t82+1.1141288576844789d+2*t20*t22*t6*t81-1.1141288 6632 @ 576844789d+2*t137*t18*t6*t81+2.5389881826654315d+4*t20*t2 6633 1 5*t4*t81-5.585774001863949d+4*t137*t22*t4*t81+3.046785819 6634 2 198518d+4*t178*t18*t4*t81 6635 t183 = gammaaa**2 6636 t184 = 1/t2**3 6637 t185 = 1/rhoa**6 6638 t186 = 1/rhoa**3.3333333333333337d+0 6639 t187 = 1/rhoa**3 6640 t188 = 5.701255282357431d-2*t143-5.27714498137176d-4*t187 6641 t189 = 1/t15 6642 t190 = 2.626185756615557d+4*t10*t149*t8+5.401836885742928d+1 6643 1 *t10*t144*t8-5.971086789162617d+3*t10*t148*t7-3.241102131 6644 2 445757d+2*t10*t147*t6-2.4564017822744336d+1*t10*t148*t189 6645 3 +t10*t188+5.27714498137176d-4*t187-8.551882923536147d-2*t 6646 4 143 6647 t191 = -4.275941461768073d-2*t190*t6+2.850627641178715d-2*t1 6648 1 44*t150-1.9004184274524766d-2*t11*t143 6649 t192 = 1/rhoa**7.333333333333333d+0 6650 t193 = 1/rhoa**4.666666666666667d+0 6651 t194 = 2.4814019635976003d+0*t151*t5+9.305257363491002d-1*t1 6652 1 91*t4+4.135669939329334d-1*t12*t149-4.135669939329334d-1* 6653 2 t149 6654 t195 = 1.7926167019779404d-2*gammaaa*t151*t50+1.792616701977 6655 1 9404d-2*gammaaa*t12*t138 6656 t196 = -4.135669939329334d-1*t12*t52*t65-4.135669939329334d- 6657 1 1*t12*t3*t50 6658 t197 = 1.0082032889066277d-2*gammaaa*t151*t51*t65+1.00820328 6659 1 89066277d-2*gammaaa*t12*t139*t51 6660 t198 = -1.9264558001493193d-2*gammaaa*t153*t79-1.92645580014 6661 1 93193d-2*gammaaa*t140*t66 6662 t199 = -1.0834770598202839d-2*gammaaa*t153*t51*t92-1.0834770 6663 1 598202839d-2*gammaaa*t141*t51*t66 6664 t200 = 1/t109**13 6665 t201 = 1.0128444160767991d+1*t129*t48*t98-1.0128444160767991 6666 1 d+1*t107*t128*t48*t98+2.0256888321535982d+1*t107*t128*t45 6667 2 *t98-2.0256888321535982d+1*t126*t127*t45*t98+3.0385332482 6668 3 30397d+1*t126*t127*t42*t98-3.038533248230397d+1*t124*t125 6669 4 *t42*t98+4.0513776643071964d+1*t124*t125*t39*t98-4.051377 6670 5 6643071964d+1*t122*t123*t39*t98+5.064222080383994d+1*t122 6671 6 *t123*t36*t98-5.064222080383994d+1*t120*t121*t36*t98+6.07 6672 7 7066496460795d+1*t120*t121*t33*t98-6.077066496460795d+1*t 6673 8 118*t119*t33*t98+7.089910912537593d+1*t118*t119*t30*t98-7 6674 9 .089910912537593d+1*t116*t117*t30*t98+8.102755328614393d+ 6675 : 1*t116*t117*t27*t98-8.102755328614393d+1*t114*t115*t27*t9 6676 ; 8+9.115599744691191d+1*t114*t115*t24*t98-9.11559974469119 6677 < 1d+1*t112*t113*t24*t98+1.012844416076799d+2*t112*t113*t21 6678 = *t98-1.012844416076799d+2*t110*t111*t21*t98-1.11412885768 6679 > 44789d+2*t108*t14*t154*t98+1.1141288576844789d+2*t110*t11 6680 ? 1*t14*t98-4.6163421503007845d+2*t128*t48*t96+4.6163421503 6681 @ 007845d+2*t107*t126*t48*t96+4.6163421503007845d+2*t128*t4 6682 1 5*t96+1.3849026450902355d+3*t124*t127*t45*t96-1.846536860 6683 2 120314d+3*t107*t126*t45*t96-4.1547079352707067d+3*t124*t1 6684 3 27*t42*t96+1.3849026450902355d+3*t107*t126*t42*t96+2.7698 6685 4 05290180471d+3*t122*t125*t42*t96+2.769805290180471d+3*t12 6686 5 4*t127*t39*t96-7.386147440481255d+3*t122*t125*t39*t96+4.6 6687 6 16342150300784d+3*t120*t123*t39*t96+4.616342150300784d+3* 6688 7 t122*t125*t36*t96-1.154085537575196d+4*t120*t123*t36*t96+ 6689 8 6.924513225451178d+3*t118*t121*t36*t96+6.924513225451178d 6690 9 +3*t120*t123*t33*t96-1.661883174108283d+4*t118*t121*t33*t 6691 : 96+9.694318515631648d+3*t116*t119*t33*t96+9.6943185156316 6692 ; 48d+3*t118*t121*t30*t96-2.2620076536473846d+4*t116*t119*t 6693 < 30*t96+1.2925758020842196d+4*t114*t117*t30*t96+1.29257580 6694 = 20842196d+4*t116*t119*t27*t96-2.954458976192502d+4*t114*t 6695 > 117*t27*t96+1.6618831741082823d+4*t112*t115*t27*t96+1.661 6696 ? 8831741082823d+4*t114*t117*t24*t96-3.7392371417436354d+4* 6697 @ t112*t115*t24*t96+2.0773539676353528d+4*t110*t113*t24*t96 6698 1 +2.5389881826654315d+4*t111*t154*t21*t96+2.07735396763535 6699 2 28d+4*t112*t115*t21*t96-4.616342150300784d+4*t110*t113*t2 6700 3 1*t96+3.046785819198518d+4*t108*t14*t200*t96-5.5857740018 6701 4 63949d+4*t111*t14*t154*t96+2.5389881826654315d+4*t110*t11 6702 5 3*t14*t96 6703 t202 = 1.0128444160767991d+1*t129*t64*t98-1.0128444160767991 6704 1 d+1*t107*t128*t64*t98+2.0256888321535982d+1*t107*t128*t63 6705 2 *t98-2.0256888321535982d+1*t126*t127*t63*t98+3.0385332482 6706 3 30397d+1*t126*t127*t62*t98-3.038533248230397d+1*t124*t125 6707 4 *t62*t98+4.0513776643071964d+1*t124*t125*t61*t98-4.051377 6708 5 6643071964d+1*t122*t123*t61*t98+5.064222080383994d+1*t122 6709 6 *t123*t60*t98-5.064222080383994d+1*t120*t121*t60*t98+6.07 6710 7 7066496460795d+1*t120*t121*t59*t98-6.077066496460795d+1*t 6711 8 118*t119*t59*t98+7.089910912537593d+1*t118*t119*t58*t98-7 6712 9 .089910912537593d+1*t116*t117*t58*t98+8.102755328614393d+ 6713 : 1*t116*t117*t57*t98-8.102755328614393d+1*t114*t115*t57*t9 6714 ; 8+9.115599744691191d+1*t114*t115*t56*t98-9.11559974469119 6715 < 1d+1*t112*t113*t56*t98+1.012844416076799d+2*t112*t113*t55 6716 = *t98-1.012844416076799d+2*t110*t111*t55*t98-1.11412885768 6717 > 44789d+2*t108*t154*t54*t98+1.1141288576844789d+2*t110*t11 6718 ? 1*t54*t98-4.6163421503007845d+2*t128*t64*t96+4.6163421503 6719 @ 007845d+2*t107*t126*t64*t96+4.6163421503007845d+2*t128*t6 6720 1 3*t96+1.3849026450902355d+3*t124*t127*t63*t96-1.846536860 6721 2 120314d+3*t107*t126*t63*t96-4.1547079352707067d+3*t124*t1 6722 3 27*t62*t96+1.3849026450902355d+3*t107*t126*t62*t96+2.7698 6723 4 05290180471d+3*t122*t125*t62*t96+2.769805290180471d+3*t12 6724 5 4*t127*t61*t96-7.386147440481255d+3*t122*t125*t61*t96+4.6 6725 6 16342150300784d+3*t120*t123*t61*t96+4.616342150300784d+3* 6726 7 t122*t125*t60*t96-1.154085537575196d+4*t120*t123*t60*t96+ 6727 8 6.924513225451178d+3*t118*t121*t60*t96+6.924513225451178d 6728 9 +3*t120*t123*t59*t96-1.661883174108283d+4*t118*t121*t59*t 6729 : 96+9.694318515631648d+3*t116*t119*t59*t96+9.6943185156316 6730 ; 48d+3*t118*t121*t58*t96-2.2620076536473846d+4*t116*t119*t 6731 < 58*t96+1.2925758020842196d+4*t114*t117*t58*t96+1.29257580 6732 = 20842196d+4*t116*t119*t57*t96-2.954458976192502d+4*t114*t 6733 > 117*t57*t96+1.6618831741082823d+4*t112*t115*t57*t96+1.661 6734 ? 8831741082823d+4*t114*t117*t56*t96-3.7392371417436354d+4* 6735 @ t112*t115*t56*t96+2.0773539676353528d+4*t110*t113*t56*t96 6736 1 +2.5389881826654315d+4*t111*t154*t55*t96+2.07735396763535 6737 2 28d+4*t112*t115*t55*t96-4.616342150300784d+4*t110*t113*t5 6738 3 5*t96+3.046785819198518d+4*t108*t200*t54*t96-5.5857740018 6739 4 63949d+4*t111*t154*t54*t96+2.5389881826654315d+4*t110*t11 6740 5 3*t54*t96 6741 t203 = 1.0128444160767991d+1*t129*t78*t98-1.0128444160767991 6742 1 d+1*t107*t128*t78*t98+2.0256888321535982d+1*t107*t128*t77 6743 2 *t98-2.0256888321535982d+1*t126*t127*t77*t98+3.0385332482 6744 3 30397d+1*t126*t127*t76*t98-3.038533248230397d+1*t124*t125 6745 4 *t76*t98+4.0513776643071964d+1*t124*t125*t75*t98-4.051377 6746 5 6643071964d+1*t122*t123*t75*t98+5.064222080383994d+1*t122 6747 6 *t123*t74*t98-5.064222080383994d+1*t120*t121*t74*t98+6.07 6748 7 7066496460795d+1*t120*t121*t73*t98-6.077066496460795d+1*t 6749 8 118*t119*t73*t98+7.089910912537593d+1*t118*t119*t72*t98-7 6750 9 .089910912537593d+1*t116*t117*t72*t98+8.102755328614393d+ 6751 : 1*t116*t117*t71*t98-8.102755328614393d+1*t114*t115*t71*t9 6752 ; 8+9.115599744691191d+1*t114*t115*t70*t98-9.11559974469119 6753 < 1d+1*t112*t113*t70*t98+1.012844416076799d+2*t112*t113*t69 6754 = *t98-1.012844416076799d+2*t110*t111*t69*t98-1.11412885768 6755 > 44789d+2*t108*t154*t68*t98+1.1141288576844789d+2*t110*t11 6756 ? 1*t68*t98-4.6163421503007845d+2*t128*t78*t96+4.6163421503 6757 @ 007845d+2*t107*t126*t78*t96+4.6163421503007845d+2*t128*t7 6758 1 7*t96+1.3849026450902355d+3*t124*t127*t77*t96-1.846536860 6759 2 120314d+3*t107*t126*t77*t96-4.1547079352707067d+3*t124*t1 6760 3 27*t76*t96+1.3849026450902355d+3*t107*t126*t76*t96+2.7698 6761 4 05290180471d+3*t122*t125*t76*t96+2.769805290180471d+3*t12 6762 5 4*t127*t75*t96-7.386147440481255d+3*t122*t125*t75*t96+4.6 6763 6 16342150300784d+3*t120*t123*t75*t96+4.616342150300784d+3* 6764 7 t122*t125*t74*t96-1.154085537575196d+4*t120*t123*t74*t96+ 6765 8 6.924513225451178d+3*t118*t121*t74*t96+6.924513225451178d 6766 9 +3*t120*t123*t73*t96-1.661883174108283d+4*t118*t121*t73*t 6767 : 96+9.694318515631648d+3*t116*t119*t73*t96+9.6943185156316 6768 ; 48d+3*t118*t121*t72*t96-2.2620076536473846d+4*t116*t119*t 6769 < 72*t96+1.2925758020842196d+4*t114*t117*t72*t96+1.29257580 6770 = 20842196d+4*t116*t119*t71*t96-2.954458976192502d+4*t114*t 6771 > 117*t71*t96+1.6618831741082823d+4*t112*t115*t71*t96+1.661 6772 ? 8831741082823d+4*t114*t117*t70*t96-3.7392371417436354d+4* 6773 @ t112*t115*t70*t96+2.0773539676353528d+4*t110*t113*t70*t96 6774 1 +2.5389881826654315d+4*t111*t154*t69*t96+2.07735396763535 6775 2 28d+4*t112*t115*t69*t96-4.616342150300784d+4*t110*t113*t6 6776 3 9*t96+3.046785819198518d+4*t108*t200*t68*t96-5.5857740018 6777 4 63949d+4*t111*t154*t68*t96+2.5389881826654315d+4*t110*t11 6778 5 3*t68*t96 6779 t204 = 1.0128444160767991d+1*t129*t91*t98-1.0128444160767991 6780 1 d+1*t107*t128*t91*t98+2.0256888321535982d+1*t107*t128*t90 6781 2 *t98-2.0256888321535982d+1*t126*t127*t90*t98+3.0385332482 6782 3 30397d+1*t126*t127*t89*t98-3.038533248230397d+1*t124*t125 6783 4 *t89*t98+4.0513776643071964d+1*t124*t125*t88*t98-4.051377 6784 5 6643071964d+1*t122*t123*t88*t98+5.064222080383994d+1*t122 6785 6 *t123*t87*t98-5.064222080383994d+1*t120*t121*t87*t98+6.07 6786 7 7066496460795d+1*t120*t121*t86*t98-6.077066496460795d+1*t 6787 8 118*t119*t86*t98+7.089910912537593d+1*t118*t119*t85*t98-7 6788 9 .089910912537593d+1*t116*t117*t85*t98+8.102755328614393d+ 6789 : 1*t116*t117*t84*t98-8.102755328614393d+1*t114*t115*t84*t9 6790 ; 8+9.115599744691191d+1*t114*t115*t83*t98-9.11559974469119 6791 < 1d+1*t112*t113*t83*t98+1.012844416076799d+2*t112*t113*t82 6792 = *t98-1.012844416076799d+2*t110*t111*t82*t98-1.11412885768 6793 > 44789d+2*t108*t154*t81*t98+1.1141288576844789d+2*t110*t11 6794 ? 1*t81*t98-4.6163421503007845d+2*t128*t91*t96+4.6163421503 6795 @ 007845d+2*t107*t126*t91*t96+4.6163421503007845d+2*t128*t9 6796 1 0*t96+1.3849026450902355d+3*t124*t127*t90*t96-1.846536860 6797 2 120314d+3*t107*t126*t90*t96-4.1547079352707067d+3*t124*t1 6798 3 27*t89*t96+1.3849026450902355d+3*t107*t126*t89*t96+2.7698 6799 4 05290180471d+3*t122*t125*t89*t96+2.769805290180471d+3*t12 6800 5 4*t127*t88*t96-7.386147440481255d+3*t122*t125*t88*t96+4.6 6801 6 16342150300784d+3*t120*t123*t88*t96+4.616342150300784d+3* 6802 7 t122*t125*t87*t96-1.154085537575196d+4*t120*t123*t87*t96+ 6803 8 6.924513225451178d+3*t118*t121*t87*t96+6.924513225451178d 6804 9 +3*t120*t123*t86*t96-1.661883174108283d+4*t118*t121*t86*t 6805 : 96+9.694318515631648d+3*t116*t119*t86*t96+9.6943185156316 6806 ; 48d+3*t118*t121*t85*t96-2.2620076536473846d+4*t116*t119*t 6807 < 85*t96+1.2925758020842196d+4*t114*t117*t85*t96+1.29257580 6808 = 20842196d+4*t116*t119*t84*t96-2.954458976192502d+4*t114*t 6809 > 117*t84*t96+1.6618831741082823d+4*t112*t115*t84*t96+1.661 6810 ? 8831741082823d+4*t114*t117*t83*t96-3.7392371417436354d+4* 6811 @ t112*t115*t83*t96+2.0773539676353528d+4*t110*t113*t83*t96 6812 1 +2.5389881826654315d+4*t111*t154*t82*t96+2.07735396763535 6813 2 28d+4*t112*t115*t82*t96-4.616342150300784d+4*t110*t113*t8 6814 3 2*t96+3.046785819198518d+4*t108*t200*t81*t96-5.5857740018 6815 4 63949d+4*t111*t154*t81*t96+2.5389881826654315d+4*t110*t11 6816 5 3*t81*t96 6817 t205 = gammabb**2 6818 t206 = 1/t94**3 6819 t207 = 1/rhob**6 6820 t208 = 1/rhob**3.3333333333333337d+0 6821 t209 = 1/rhob**3 6822 t210 = 5.701255282357431d-2*t160-5.27714498137176d-4*t209 6823 t211 = 1/t105 6824 t212 = -5.971086789162617d+3*t102*t148*t99-3.241102131445757 6825 1 d+2*t102*t164*t98-2.4564017822744336d+1*t102*t148*t211+t1 6826 2 02*t210+5.27714498137176d-4*t209+2.626185756615557d+4*t10 6827 3 0*t102*t165+5.401836885742928d+1*t100*t102*t161-8.5518829 6828 4 23536147d-2*t160 6829 t213 = -4.275941461768073d-2*t212*t98+2.850627641178715d-2*t 6830 1 161*t166-1.9004184274524766d-2*t103*t160 6831 t214 = 1/rhob**7.333333333333333d+0 6832 t215 = 1/rhob**4.666666666666667d+0 6833 t216 = 2.4814019635976003d+0*t167*t97+9.305257363491002d-1*t 6834 1 213*t96+4.135669939329334d-1*t104*t165-4.135669939329334d 6835 2 -1*t165 6836 t217 = 1.7926167019779404d-2*gammabb*t130*t167+1.79261670197 6837 1 79404d-2*gammabb*t104*t155 6838 t218 = -4.135669939329334d-1*t104*t130*t95-4.135669939329334 6839 1 d-1*t104*t132*t133 6840 t219 = 1.0082032889066277d-2*gammabb*t131*t133*t167+1.008203 6841 1 2889066277d-2*gammabb*t104*t131*t156 6842 t220 = -1.9264558001493193d-2*gammabb*t135*t169-1.9264558001 6843 1 493193d-2*gammabb*t134*t157 6844 t221 = -1.0834770598202839d-2*gammabb*t131*t136*t169-1.08347 6845 1 70598202839d-2*gammabb*t131*t134*t158 6846 t222 = 1/rhoa**5 6847 t223 = 1/rhoa**6.333333333333333d+0 6848 t224 = -3.361156316208638d-3*t151*t50-3.361156316208638d-3*t 6849 1 12*t138 6850 t225 = 3.612104625279974d-3*t153*t79+3.612104625279974d-3*t1 6851 1 40*t66 6852 t226 = 1/rhob**5 6853 t227 = 1/rhob**6.333333333333333d+0 6854 t228 = -3.361156316208638d-3*t130*t167-3.361156316208638d-3* 6855 1 t104*t155 6856 t229 = 3.612104625279974d-3*t135*t169+3.612104625279974d-3*t 6857 1 134*t157 6858 t230 = 1/rhoa**4 6859 t231 = 1/rhoa**5.333333333333333d+0 6860 t232 = 1/rhob**4 6861 t233 = 1/rhob**5.333333333333333d+0 6862 t234 = 6.077066496460795d+1*t17*t44*t48*t9-6.077066496460795 6863 1 d+1*t45*t47*t9+1.8231199489382385d+2*t41*t45*t46*t9-3.646 6864 2 239897876477d+2*t39*t41*t46*t9-1.8231199489382385d+2*t17* 6865 3 t42*t44*t9+3.646239897876477d+2*t38*t42*t43*t9-6.07706649 6866 4 6460795d+2*t36*t38*t43*t9+6.077066496460795d+2*t35*t39*t4 6867 5 0*t9-9.115599744691192d+2*t33*t35*t40*t9+9.11559974469119 6868 6 2d+2*t32*t36*t37*t9-1.276183964256767d+3*t30*t32*t37*t9+1 6869 7 .276183964256767d+3*t29*t33*t34*t9-1.7015786190090226d+3* 6870 8 t27*t29*t34*t9+1.7015786190090226d+3*t26*t30*t31*t9-2.187 6871 9 743938725886d+3*t24*t26*t31*t9+2.187743938725886d+3*t23*t 6872 : 27*t28*t9-2.734679923407357d+3*t21*t23*t28*t9+2.734679923 6873 ; 407357d+3*t20*t24*t25*t9-3.342386573053437d+3*t14*t20*t25 6874 < *t9+3.342386573053437d+3*t137*t21*t22*t9+4.01086388766412 6875 = 45d+3*t14*t178*t18*t9 6876 t235 = 6.077066496460795d+1*t17*t44*t64*t9-6.077066496460795 6877 1 d+1*t47*t63*t9+1.8231199489382385d+2*t41*t46*t63*t9-1.823 6878 2 1199489382385d+2*t17*t44*t62*t9+3.646239897876477d+2*t38* 6879 3 t43*t62*t9-3.646239897876477d+2*t41*t46*t61*t9+6.07706649 6880 4 6460795d+2*t35*t40*t61*t9-6.077066496460795d+2*t38*t43*t6 6881 5 0*t9+9.115599744691192d+2*t32*t37*t60*t9-9.11559974469119 6882 6 2d+2*t35*t40*t59*t9+1.276183964256767d+3*t29*t34*t59*t9-1 6883 7 .276183964256767d+3*t32*t37*t58*t9+1.7015786190090226d+3* 6884 8 t26*t31*t58*t9-1.7015786190090226d+3*t29*t34*t57*t9+2.187 6885 9 743938725886d+3*t23*t28*t57*t9-2.187743938725886d+3*t26*t 6886 : 31*t56*t9+2.734679923407357d+3*t20*t25*t56*t9-2.734679923 6887 ; 407357d+3*t23*t28*t55*t9+3.342386573053437d+3*t137*t22*t5 6888 < 5*t9-3.342386573053437d+3*t20*t25*t54*t9+4.01086388766412 6889 = 45d+3*t178*t18*t54*t9 6890 t236 = 6.077066496460795d+1*t17*t44*t78*t9-6.077066496460795 6891 1 d+1*t47*t77*t9+1.8231199489382385d+2*t41*t46*t77*t9-1.823 6892 2 1199489382385d+2*t17*t44*t76*t9+3.646239897876477d+2*t38* 6893 3 t43*t76*t9-3.646239897876477d+2*t41*t46*t75*t9+6.07706649 6894 4 6460795d+2*t35*t40*t75*t9-6.077066496460795d+2*t38*t43*t7 6895 5 4*t9+9.115599744691192d+2*t32*t37*t74*t9-9.11559974469119 6896 6 2d+2*t35*t40*t73*t9+1.276183964256767d+3*t29*t34*t73*t9-1 6897 7 .276183964256767d+3*t32*t37*t72*t9+1.7015786190090226d+3* 6898 8 t26*t31*t72*t9-1.7015786190090226d+3*t29*t34*t71*t9+2.187 6899 9 743938725886d+3*t23*t28*t71*t9-2.187743938725886d+3*t26*t 6900 : 31*t70*t9+2.734679923407357d+3*t20*t25*t70*t9-2.734679923 6901 ; 407357d+3*t23*t28*t69*t9+3.342386573053437d+3*t137*t22*t6 6902 < 9*t9-3.342386573053437d+3*t20*t25*t68*t9+4.01086388766412 6903 = 45d+3*t178*t18*t68*t9 6904 t237 = 6.077066496460795d+1*t17*t44*t9*t91-6.077066496460795 6905 1 d+1*t47*t9*t90+1.8231199489382385d+2*t41*t46*t9*t90-1.823 6906 2 1199489382385d+2*t17*t44*t89*t9+3.646239897876477d+2*t38* 6907 3 t43*t89*t9-3.646239897876477d+2*t41*t46*t88*t9+6.07706649 6908 4 6460795d+2*t35*t40*t88*t9-6.077066496460795d+2*t38*t43*t8 6909 5 7*t9+9.115599744691192d+2*t32*t37*t87*t9-9.11559974469119 6910 6 2d+2*t35*t40*t86*t9+1.276183964256767d+3*t29*t34*t86*t9-1 6911 7 .276183964256767d+3*t32*t37*t85*t9+1.7015786190090226d+3* 6912 8 t26*t31*t85*t9-1.7015786190090226d+3*t29*t34*t84*t9+2.187 6913 9 743938725886d+3*t23*t28*t84*t9-2.187743938725886d+3*t26*t 6914 : 31*t83*t9+2.734679923407357d+3*t20*t25*t83*t9-2.734679923 6915 ; 407357d+3*t23*t28*t82*t9+3.342386573053437d+3*t137*t22*t8 6916 < 2*t9-3.342386573053437d+3*t20*t25*t81*t9+4.01086388766412 6917 = 45d+3*t178*t18*t81*t9 6918 t238 = 6.077066496460795d+1*t101*t107*t126*t48-6.07706649646 6919 1 0795d+1*t101*t128*t45+1.8231199489382385d+2*t101*t124*t12 6920 2 7*t45-1.8231199489382385d+2*t101*t107*t126*t42+3.64623989 6921 3 7876477d+2*t101*t122*t125*t42-3.646239897876477d+2*t101*t 6922 4 124*t127*t39+6.077066496460795d+2*t101*t120*t123*t39-6.07 6923 5 7066496460795d+2*t101*t122*t125*t36+9.115599744691192d+2* 6924 6 t101*t118*t121*t36-9.115599744691192d+2*t101*t120*t123*t3 6925 7 3+1.276183964256767d+3*t101*t116*t119*t33-1.2761839642567 6926 8 67d+3*t101*t118*t121*t30+1.7015786190090226d+3*t101*t114* 6927 9 t117*t30-1.7015786190090226d+3*t101*t116*t119*t27+2.18774 6928 : 3938725886d+3*t101*t112*t115*t27-2.187743938725886d+3*t10 6929 ; 1*t114*t117*t24+2.734679923407357d+3*t101*t110*t113*t24+3 6930 < .342386573053437d+3*t101*t111*t154*t21-2.734679923407357d 6931 = +3*t101*t112*t115*t21+4.0108638876641245d+3*t101*t108*t14 6932 > *t200-3.342386573053437d+3*t101*t110*t113*t14 6933 t239 = 6.077066496460795d+1*t101*t107*t126*t64-6.07706649646 6934 1 0795d+1*t101*t128*t63+1.8231199489382385d+2*t101*t124*t12 6935 2 7*t63-1.8231199489382385d+2*t101*t107*t126*t62+3.64623989 6936 3 7876477d+2*t101*t122*t125*t62-3.646239897876477d+2*t101*t 6937 4 124*t127*t61+6.077066496460795d+2*t101*t120*t123*t61-6.07 6938 5 7066496460795d+2*t101*t122*t125*t60+9.115599744691192d+2* 6939 6 t101*t118*t121*t60-9.115599744691192d+2*t101*t120*t123*t5 6940 7 9+1.276183964256767d+3*t101*t116*t119*t59-1.2761839642567 6941 8 67d+3*t101*t118*t121*t58+1.7015786190090226d+3*t101*t114* 6942 9 t117*t58-1.7015786190090226d+3*t101*t116*t119*t57+2.18774 6943 : 3938725886d+3*t101*t112*t115*t57-2.187743938725886d+3*t10 6944 ; 1*t114*t117*t56+2.734679923407357d+3*t101*t110*t113*t56+3 6945 < .342386573053437d+3*t101*t111*t154*t55-2.734679923407357d 6946 = +3*t101*t112*t115*t55+4.0108638876641245d+3*t101*t108*t20 6947 > 0*t54-3.342386573053437d+3*t101*t110*t113*t54 6948 t240 = 6.077066496460795d+1*t101*t107*t126*t78-6.07706649646 6949 1 0795d+1*t101*t128*t77+1.8231199489382385d+2*t101*t124*t12 6950 2 7*t77-1.8231199489382385d+2*t101*t107*t126*t76+3.64623989 6951 3 7876477d+2*t101*t122*t125*t76-3.646239897876477d+2*t101*t 6952 4 124*t127*t75+6.077066496460795d+2*t101*t120*t123*t75-6.07 6953 5 7066496460795d+2*t101*t122*t125*t74+9.115599744691192d+2* 6954 6 t101*t118*t121*t74-9.115599744691192d+2*t101*t120*t123*t7 6955 7 3+1.276183964256767d+3*t101*t116*t119*t73-1.2761839642567 6956 8 67d+3*t101*t118*t121*t72+1.7015786190090226d+3*t101*t114* 6957 9 t117*t72-1.7015786190090226d+3*t101*t116*t119*t71+2.18774 6958 : 3938725886d+3*t101*t112*t115*t71-2.187743938725886d+3*t10 6959 ; 1*t114*t117*t70+2.734679923407357d+3*t101*t110*t113*t70+3 6960 < .342386573053437d+3*t101*t111*t154*t69-2.734679923407357d 6961 = +3*t101*t112*t115*t69+4.0108638876641245d+3*t101*t108*t20 6962 > 0*t68-3.342386573053437d+3*t101*t110*t113*t68 6963 t241 = 6.077066496460795d+1*t101*t107*t126*t91-6.07706649646 6964 1 0795d+1*t101*t128*t90+1.8231199489382385d+2*t101*t124*t12 6965 2 7*t90-1.8231199489382385d+2*t101*t107*t126*t89+3.64623989 6966 3 7876477d+2*t101*t122*t125*t89-3.646239897876477d+2*t101*t 6967 4 124*t127*t88+6.077066496460795d+2*t101*t120*t123*t88-6.07 6968 5 7066496460795d+2*t101*t122*t125*t87+9.115599744691192d+2* 6969 6 t101*t118*t121*t87-9.115599744691192d+2*t101*t120*t123*t8 6970 7 6+1.276183964256767d+3*t101*t116*t119*t86-1.2761839642567 6971 8 67d+3*t101*t118*t121*t85+1.7015786190090226d+3*t101*t114* 6972 9 t117*t85-1.7015786190090226d+3*t101*t116*t119*t84+2.18774 6973 : 3938725886d+3*t101*t112*t115*t84-2.187743938725886d+3*t10 6974 ; 1*t114*t117*t83+2.734679923407357d+3*t101*t110*t113*t83+3 6975 < .342386573053437d+3*t101*t111*t154*t82-2.734679923407357d 6976 = +3*t101*t112*t115*t82+4.0108638876641245d+3*t101*t108*t20 6977 > 0*t81-3.342386573053437d+3*t101*t110*t113*t81 6978 t242 = 8.0d+0*t47*t48+8.0d+0*t17*t44*t48+8.0d+0*t45*t47+2.4d 6979 1 +1*t41*t45*t46+7.2d+1*t41*t42*t46+4.8d+1*t39*t41*t46+3.2d 6980 2 +1*t17*t44*t45+2.4d+1*t17*t42*t44+4.8d+1*t38*t42*t43+1.28 6981 3 d+2*t38*t39*t43+8.0d+1*t36*t38*t43+8.0d+1*t35*t39*t40+2.0 6982 4 d+2*t35*t36*t40+1.2d+2*t33*t35*t40+1.2d+2*t32*t36*t37+2.8 6983 5 8d+2*t32*t33*t37+1.68d+2*t30*t32*t37+1.68d+2*t29*t33*t34+ 6984 6 3.92d+2*t29*t30*t34+2.24d+2*t27*t29*t34+2.24d+2*t26*t30*t 6985 7 31+5.12d+2*t26*t27*t31+2.88d+2*t24*t26*t31+2.88d+2*t23*t2 6986 8 7*t28+6.48d+2*t23*t24*t28+3.6d+2*t21*t23*t28+3.6d+2*t20*t 6987 9 24*t25+8.0d+2*t20*t21*t25+4.4d+2*t14*t20*t25+4.4d+2*t137* 6988 : t21*t22+9.68d+2*t137*t14*t22+5.28d+2*t14*t178*t18 6989 t243 = 8.0d+0*t47*t64+8.0d+0*t17*t44*t64+8.0d+0*t47*t63+2.4d 6990 1 +1*t41*t46*t63+3.2d+1*t17*t44*t63+7.2d+1*t41*t46*t62+2.4d 6991 2 +1*t17*t44*t62+4.8d+1*t38*t43*t62+4.8d+1*t41*t46*t61+1.28 6992 3 d+2*t38*t43*t61+8.0d+1*t35*t40*t61+8.0d+1*t38*t43*t60+2.0 6993 4 d+2*t35*t40*t60+1.2d+2*t32*t37*t60+1.2d+2*t35*t40*t59+2.8 6994 5 8d+2*t32*t37*t59+1.68d+2*t29*t34*t59+1.68d+2*t32*t37*t58+ 6995 6 3.92d+2*t29*t34*t58+2.24d+2*t26*t31*t58+2.24d+2*t29*t34*t 6996 7 57+5.12d+2*t26*t31*t57+2.88d+2*t23*t28*t57+2.88d+2*t26*t3 6997 8 1*t56+6.48d+2*t23*t28*t56+3.6d+2*t20*t25*t56+3.6d+2*t23*t 6998 9 28*t55+8.0d+2*t20*t25*t55+4.4d+2*t137*t22*t55+4.4d+2*t20* 6999 : t25*t54+9.68d+2*t137*t22*t54+5.28d+2*t178*t18*t54 7000 t244 = 8.0d+0*t47*t78+8.0d+0*t17*t44*t78+8.0d+0*t47*t77+2.4d 7001 1 +1*t41*t46*t77+3.2d+1*t17*t44*t77+7.2d+1*t41*t46*t76+2.4d 7002 2 +1*t17*t44*t76+4.8d+1*t38*t43*t76+4.8d+1*t41*t46*t75+1.28 7003 3 d+2*t38*t43*t75+8.0d+1*t35*t40*t75+8.0d+1*t38*t43*t74+2.0 7004 4 d+2*t35*t40*t74+1.2d+2*t32*t37*t74+1.2d+2*t35*t40*t73+2.8 7005 5 8d+2*t32*t37*t73+1.68d+2*t29*t34*t73+1.68d+2*t32*t37*t72+ 7006 6 3.92d+2*t29*t34*t72+2.24d+2*t26*t31*t72+2.24d+2*t29*t34*t 7007 7 71+5.12d+2*t26*t31*t71+2.88d+2*t23*t28*t71+2.88d+2*t26*t3 7008 8 1*t70+6.48d+2*t23*t28*t70+3.6d+2*t20*t25*t70+3.6d+2*t23*t 7009 9 28*t69+8.0d+2*t20*t25*t69+4.4d+2*t137*t22*t69+4.4d+2*t20* 7010 : t25*t68+9.68d+2*t137*t22*t68+5.28d+2*t178*t18*t68 7011 t245 = 8.0d+0*t47*t91+8.0d+0*t17*t44*t91+8.0d+0*t47*t90+2.4d 7012 1 +1*t41*t46*t90+3.2d+1*t17*t44*t90+7.2d+1*t41*t46*t89+2.4d 7013 2 +1*t17*t44*t89+4.8d+1*t38*t43*t89+4.8d+1*t41*t46*t88+1.28 7014 3 d+2*t38*t43*t88+8.0d+1*t35*t40*t88+8.0d+1*t38*t43*t87+2.0 7015 4 d+2*t35*t40*t87+1.2d+2*t32*t37*t87+1.2d+2*t35*t40*t86+2.8 7016 5 8d+2*t32*t37*t86+1.68d+2*t29*t34*t86+1.68d+2*t32*t37*t85+ 7017 6 3.92d+2*t29*t34*t85+2.24d+2*t26*t31*t85+2.24d+2*t29*t34*t 7018 7 84+5.12d+2*t26*t31*t84+2.88d+2*t23*t28*t84+2.88d+2*t26*t3 7019 8 1*t83+6.48d+2*t23*t28*t83+3.6d+2*t20*t25*t83+3.6d+2*t23*t 7020 9 28*t82+8.0d+2*t20*t25*t82+4.4d+2*t137*t22*t82+4.4d+2*t20* 7021 : t25*t81+9.68d+2*t137*t22*t81+5.28d+2*t178*t18*t81 7022 t246 = 8.0d+0*t128*t48+8.0d+0*t107*t126*t48+8.0d+0*t128*t45+ 7023 1 2.4d+1*t124*t127*t45+3.2d+1*t107*t126*t45+7.2d+1*t124*t12 7024 2 7*t42+2.4d+1*t107*t126*t42+4.8d+1*t122*t125*t42+4.8d+1*t1 7025 3 24*t127*t39+1.28d+2*t122*t125*t39+8.0d+1*t120*t123*t39+8. 7026 4 0d+1*t122*t125*t36+2.0d+2*t120*t123*t36+1.2d+2*t118*t121* 7027 5 t36+1.2d+2*t120*t123*t33+2.88d+2*t118*t121*t33+1.68d+2*t1 7028 6 16*t119*t33+1.68d+2*t118*t121*t30+3.92d+2*t116*t119*t30+2 7029 7 .24d+2*t114*t117*t30+2.24d+2*t116*t119*t27+5.12d+2*t114*t 7030 8 117*t27+2.88d+2*t112*t115*t27+2.88d+2*t114*t117*t24+6.48d 7031 9 +2*t112*t115*t24+3.6d+2*t110*t113*t24+4.4d+2*t111*t154*t2 7032 : 1+3.6d+2*t112*t115*t21+8.0d+2*t110*t113*t21+5.28d+2*t108* 7033 ; t14*t200+9.68d+2*t111*t14*t154+4.4d+2*t110*t113*t14 7034 t247 = 8.0d+0*t128*t64+8.0d+0*t107*t126*t64+8.0d+0*t128*t63+ 7035 1 2.4d+1*t124*t127*t63+3.2d+1*t107*t126*t63+7.2d+1*t124*t12 7036 2 7*t62+2.4d+1*t107*t126*t62+4.8d+1*t122*t125*t62+4.8d+1*t1 7037 3 24*t127*t61+1.28d+2*t122*t125*t61+8.0d+1*t120*t123*t61+8. 7038 4 0d+1*t122*t125*t60+2.0d+2*t120*t123*t60+1.2d+2*t118*t121* 7039 5 t60+1.2d+2*t120*t123*t59+2.88d+2*t118*t121*t59+1.68d+2*t1 7040 6 16*t119*t59+1.68d+2*t118*t121*t58+3.92d+2*t116*t119*t58+2 7041 7 .24d+2*t114*t117*t58+2.24d+2*t116*t119*t57+5.12d+2*t114*t 7042 8 117*t57+2.88d+2*t112*t115*t57+2.88d+2*t114*t117*t56+6.48d 7043 9 +2*t112*t115*t56+3.6d+2*t110*t113*t56+4.4d+2*t111*t154*t5 7044 : 5+3.6d+2*t112*t115*t55+8.0d+2*t110*t113*t55+5.28d+2*t108* 7045 ; t200*t54+9.68d+2*t111*t154*t54+4.4d+2*t110*t113*t54 7046 t248 = 8.0d+0*t128*t78+8.0d+0*t107*t126*t78+8.0d+0*t128*t77+ 7047 1 2.4d+1*t124*t127*t77+3.2d+1*t107*t126*t77+7.2d+1*t124*t12 7048 2 7*t76+2.4d+1*t107*t126*t76+4.8d+1*t122*t125*t76+4.8d+1*t1 7049 3 24*t127*t75+1.28d+2*t122*t125*t75+8.0d+1*t120*t123*t75+8. 7050 4 0d+1*t122*t125*t74+2.0d+2*t120*t123*t74+1.2d+2*t118*t121* 7051 5 t74+1.2d+2*t120*t123*t73+2.88d+2*t118*t121*t73+1.68d+2*t1 7052 6 16*t119*t73+1.68d+2*t118*t121*t72+3.92d+2*t116*t119*t72+2 7053 7 .24d+2*t114*t117*t72+2.24d+2*t116*t119*t71+5.12d+2*t114*t 7054 8 117*t71+2.88d+2*t112*t115*t71+2.88d+2*t114*t117*t70+6.48d 7055 9 +2*t112*t115*t70+3.6d+2*t110*t113*t70+4.4d+2*t111*t154*t6 7056 : 9+3.6d+2*t112*t115*t69+8.0d+2*t110*t113*t69+5.28d+2*t108* 7057 ; t200*t68+9.68d+2*t111*t154*t68+4.4d+2*t110*t113*t68 7058 t249 = 8.0d+0*t128*t91+8.0d+0*t107*t126*t91+8.0d+0*t128*t90+ 7059 1 2.4d+1*t124*t127*t90+3.2d+1*t107*t126*t90+7.2d+1*t124*t12 7060 2 7*t89+2.4d+1*t107*t126*t89+4.8d+1*t122*t125*t89+4.8d+1*t1 7061 3 24*t127*t88+1.28d+2*t122*t125*t88+8.0d+1*t120*t123*t88+8. 7062 4 0d+1*t122*t125*t87+2.0d+2*t120*t123*t87+1.2d+2*t118*t121* 7063 5 t87+1.2d+2*t120*t123*t86+2.88d+2*t118*t121*t86+1.68d+2*t1 7064 6 16*t119*t86+1.68d+2*t118*t121*t85+3.92d+2*t116*t119*t85+2 7065 7 .24d+2*t114*t117*t85+2.24d+2*t116*t119*t84+5.12d+2*t114*t 7066 8 117*t84+2.88d+2*t112*t115*t84+2.88d+2*t114*t117*t83+6.48d 7067 9 +2*t112*t115*t83+3.6d+2*t110*t113*t83+4.4d+2*t111*t154*t8 7068 : 2+3.6d+2*t112*t115*t82+8.0d+2*t110*t113*t82+5.28d+2*t108* 7069 ; t200*t81+9.68d+2*t111*t154*t81+4.4d+2*t110*t113*t81 7070 t250 = 1/t19**14 7071 t251 = gammaaa**3 7072 t252 = 1/t2**4 7073 t253 = 1/rhoa**9.666666666666666d+0 7074 t254 = 1/rhoa**7 7075 t255 = 1/rhoa**4.333333333333333d+0 7076 t256 = -4.275941461768073d-2*t6*(-4.255868126669586d+6*t10*t 7077 1 7*t8-2.626185756615557d+4*t10*t189*t8-7.20244918099057d+1 7078 2 *t10*t143*t8-4.8616531971686355d+2*t10*t188*t6-1.58314349 7079 3 44115283d-3*t230+t10*(1.5831434944115283d-3*t230-1.330292 7080 4 899216734d-1*t186)+1.995439348825101d-1*t186+7.8785572698 7081 5 46671d+4*t10*t147*t149+9.951811315271029d+3*t10*t146*t148 7082 6 +9.676451059701281d+5*t10*t144*t148+4.0940029704573894d+1 7083 7 *t1*t10*t148+1.6205510657228786d+2*t10*t144*t147)+4.27594 7084 8 14617680724d-2*t144*t190+4.434309664055779d-2*t11*t186-5. 7085 9 701255282357429d-2*t143*t150 7086 t257 = 1/rhoa**11 7087 t258 = 1/rhoa**8.333333333333334d+0 7088 t259 = 1/rhoa**5.666666666666667d+0 7089 t260 = 3.7221029453964005d+0*t191*t5+9.305257363491002d-1*t2 7090 1 56*t4-2.7571132928862224d-1*t12*t189+2.7571132928862224d- 7091 2 1*t189+1.2407009817988002d+0*t149*t151 7092 t261 = 1/t109**14 7093 t262 = gammabb**3 7094 t263 = 1/t94**4 7095 t264 = 1/rhob**9.666666666666666d+0 7096 t265 = 1/rhob**7 7097 t266 = 1/rhob**4.333333333333333d+0 7098 t267 = -4.275941461768073d-2*t98*(-4.255868126669586d+6*t100 7099 1 *t102*t99-4.8616531971686355d+2*t102*t210*t98+4.094002970 7100 2 4573894d+1*t102*t148*t93-1.5831434944115283d-3*t232+t102* 7101 3 (1.5831434944115283d-3*t232-1.330292899216734d-1*t208)-2. 7102 4 626185756615557d+4*t100*t102*t211+1.995439348825101d-1*t2 7103 5 08+7.878557269846671d+4*t102*t164*t165+1.6205510657228786 7104 6 d+2*t102*t161*t164+9.951811315271029d+3*t102*t148*t163+9. 7105 7 676451059701281d+5*t102*t148*t161-7.20244918099057d+1*t10 7106 8 0*t102*t160)+4.2759414617680724d-2*t161*t212+4.4343096640 7107 9 55779d-2*t103*t208-5.701255282357429d-2*t160*t166 7108 t268 = 1/rhob**11 7109 t269 = 1/rhob**8.333333333333334d+0 7110 t270 = 1/rhob**5.666666666666667d+0 7111 t271 = 3.7221029453964005d+0*t213*t97+9.305257363491002d-1*t 7112 1 267*t96-2.7571132928862224d-1*t104*t211+2.757113292886222 7113 2 4d-1*t211+1.2407009817988002d+0*t165*t167 7114 t272 = 1/rhoa**8.666666666666666d+0 7115 t273 = 1/rhoa**10 7116 t274 = 1/rhob**8.666666666666666d+0 7117 t275 = 1/rhob**10 7118 t276 = 1/rhoa**7.666666666666667d+0 7119 t277 = 1/rhoa**9 7120 t278 = 1/rhob**7.666666666666667d+0 7121 t279 = 1/rhob**9 7122 t280 = 1/rhoa**6.666666666666667d+0 7123 t281 = 1/rhoa**8 7124 t282 = 1/rhob**6.666666666666667d+0 7125 t283 = 1/rhob**8 7126 fnc(iq) = (1.0d+0*(-9.305257363491002d-1*t104*t130*t95*t96-9 7127 1 .305257363491002d-1*t104*t132*t133*t96+t134*t135*t95+t132 7128 2 *t134*t136)+1.0d+0*(t52*t66*t92+t3*t66*t79-9.305257363491 7129 3 002d-1*t12*t4*t52*t65-9.305257363491002d-1*t12*t3*t4*t50) 7130 4 )*wght+fnc(iq) 7131 Amat(iq,D1_RA) = 1.0d+0*(-5.417385299101419d-3*gammaaa*t152* 7132 1 t51*t66*t92+t153*t52*t92-9.632279000746596d-3*gammaaa*t14 7133 2 2*t152*t66*t79+t153*t3*t79+t141*t52*t66+t140*t3*t66-1.240 7134 3 7009817988002d+0*t12*t5*t52*t65-9.305257363491002d-1*t151 7135 4 *t4*t52*t65+5.041016444533138d-3*gammaaa*t12*t143*t51*t65 7136 5 -9.305257363491002d-1*t12*t139*t4*t52-1.2407009817988002d 7137 6 +0*t12*t3*t5*t50-9.305257363491002d-1*t151*t3*t4*t50+8.96 7138 7 3083509889702d-3*gammaaa*t12*t142*t143*t50-9.305257363491 7139 8 002d-1*t12*t138*t3*t4)*wght+Amat(iq,D1_RA) 7140 Amat(iq,D1_RB) = 1.0d+0*(-1.2407009817988002d+0*t104*t130*t9 7141 1 5*t97-1.2407009817988002d+0*t104*t132*t133*t97-9.30525736 7142 2 3491002d-1*t130*t167*t95*t96-9.305257363491002d-1*t104*t1 7143 3 55*t95*t96-9.305257363491002d-1*t132*t133*t167*t96-9.3052 7144 4 57363491002d-1*t104*t132*t156*t96+t135*t169*t95+t134*t157 7145 5 *t95+t132*t136*t169-9.632279000746596d-3*gammabb*t134*t13 7146 6 5*t159*t168-5.417385299101419d-3*gammabb*t131*t134*t136*t 7147 7 168+8.963083509889702d-3*gammabb*t104*t130*t159*t160+5.04 7148 8 1016444533138d-3*gammabb*t104*t131*t133*t160+t132*t134*t1 7149 9 58)*wght+Amat(iq,D1_RB) 7150 Cmat(iq,D1_GAA) = 1.0d+0*(2.0315194871630324d-3*t1*t51*t66*t 7151 1 92+3.612104625279974d-3*t1*t142*t66*t79-1.890381166699927 7152 2 d-3*t12*t144*t51*t65-3.361156316208638d-3*t12*t142*t144*t 7153 3 50)*wght+Cmat(iq,D1_GAA) 7154 Cmat(iq,D1_GAB) = Cmat(iq,D1_GAB) 7155 Cmat(iq,D1_GBB) = 1.0d+0*(3.612104625279974d-3*t134*t135*t15 7156 1 9*t93+2.0315194871630324d-3*t131*t134*t136*t93-3.36115631 7157 2 6208638d-3*t104*t130*t159*t161-1.890381166699927d-3*t104* 7158 3 t131*t133*t161)*wght+Cmat(iq,D1_GBB) 7159 Mmat(iq,D1_TA) = 1.0d+0*(t173*t52*t66+t172*t3*t66-9.30525736 7160 1 3491002d-1*t12*t171*t4*t52-9.305257363491002d-1*t12*t170* 7161 2 t3*t4)*wght+Mmat(iq,D1_TA) 7162 Mmat(iq,D1_TB) = 1.0d+0*(-9.305257363491002d-1*t104*t174*t95 7163 1 *t96-9.305257363491002d-1*t104*t132*t175*t96+t134*t176*t9 7164 2 5+t132*t134*t177)*wght+Mmat(iq,D1_TB) 7165 Amat2(iq,D2_RA_RA) = 1.0d+0*(1.9863746096705204d-2*gammaaa*t 7166 1 193*t51*t66*t92-5.316678166471045d-5*t183*t192*t51*t66*t9 7167 2 2+t194*t52*t92+3.5318356336070855d-2*gammaaa*t142*t193*t6 7168 3 6*t79-2.3079800683637772d-4*t183*t184*t192*t66*t79+t194*t 7169 4 3*t79+t182*t52*t66+t181*t3*t66-2.4814019635976003d+0*t151 7170 5 *t5*t52*t65-9.305257363491002d-1*t191*t4*t52*t65-5.041016 7171 6 444533138d-3*gammaaa*t12*t186*t51*t65+4.947305865786653d- 7172 7 5*t12*t183*t185*t51*t65-2.4814019635976003d+0*t12*t139*t5 7173 8 *t52-9.305257363491002d-1*t12*t180*t4*t52-1.8610514726982 7174 9 003d+0*t139*t151*t4*t52+2*t141*t153*t52-2.481401963597600 7175 : 3d+0*t151*t3*t5*t50-9.305257363491002d-1*t191*t3*t4*t50-8 7176 ; .963083509889707d-3*gammaaa*t12*t142*t186*t50+2.147634852 7177 < 5932504d-4*t12*t183*t184*t185*t50-2.4814019635976003d+0*t 7178 = 12*t138*t3*t5-9.305257363491002d-1*t12*t179*t3*t4-1.86105 7179 > 14726982003d+0*t138*t151*t3*t4+2*t140*t153*t3+t152*t199+t 7180 ? 142*t152*t198+t143*t197+t149*t196+t142*t143*t195)*wght+Am 7181 @ at2(iq,D2_RA_RA) 7182 Amat2(iq,D2_RA_RB) = Amat2(iq,D2_RA_RB) 7183 Amat2(iq,D2_RB_RB) = 1.0d+0*(-2.4814019635976003d+0*t130*t16 7184 1 7*t95*t97-2.4814019635976003d+0*t104*t155*t95*t97-2.48140 7185 2 19635976003d+0*t132*t133*t167*t97-2.4814019635976003d+0*t 7186 3 104*t132*t156*t97-9.305257363491002d-1*t130*t213*t95*t96- 7187 4 9.305257363491002d-1*t104*t201*t95*t96-1.8610514726982003 7188 5 d+0*t155*t167*t95*t96-9.305257363491002d-1*t132*t133*t213 7189 6 *t96-9.305257363491002d-1*t104*t132*t202*t96-1.8610514726 7190 7 982003d+0*t132*t156*t167*t96+t135*t216*t95+t134*t203*t95+ 7191 8 2*t157*t169*t95+t168*t221+t159*t168*t220+t160*t219+t165*t 7192 9 218+t159*t160*t217+t132*t136*t216+3.5318356336070855d-2*g 7193 : ammabb*t134*t135*t159*t215+1.9863746096705204d-2*gammabb* 7194 ; t131*t134*t136*t215-2.3079800683637772d-4*t134*t135*t205* 7195 < t206*t214-5.316678166471045d-5*t131*t134*t136*t205*t214-8 7196 = .963083509889707d-3*gammabb*t104*t130*t159*t208-5.0410164 7197 > 44533138d-3*gammabb*t104*t131*t133*t208+2.147634852593250 7198 ? 4d-4*t104*t130*t205*t206*t207+4.947305865786653d-5*t104*t 7199 @ 131*t133*t205*t207+t132*t134*t204+2*t132*t158*t169)*wght+ 7200 1 Amat2(iq,D2_RB_RB) 7201 Cmat2(iq,D2_RA_GAA) = 1.0d+0*(t1*(2.0315194871630324d-3*t153 7202 1 *t51*t92+2.0315194871630324d-3*t141*t51*t66)+1.9937543124 7203 2 266421d-5*gammaaa*t223*t51*t66*t92-5.417385299101419d-3*t 7204 3 152*t51*t66*t92+8.654925256364164d-5*gammaaa*t184*t223*t6 7205 4 6*t79-9.632279000746596d-3*t142*t152*t66*t79+t144*(-1.890 7206 5 381166699927d-3*t151*t51*t65-1.890381166699927d-3*t12*t13 7207 6 9*t51)-1.855239699669995d-5*gammaaa*t12*t222*t51*t65+2.52 7208 7 0508222266569d-3*t12*t143*t51*t65-8.05363069722469d-5*gam 7209 8 maaa*t12*t184*t222*t50+4.481541754944851d-3*t12*t142*t143 7210 9 *t50+t1*t142*t225+t142*t144*t224)*wght+Cmat2(iq,D2_RA_GAA 7211 : ) 7212 Cmat2(iq,D2_RA_GAB) = Cmat2(iq,D2_RA_GAB) 7213 Cmat2(iq,D2_RA_GBB) = Cmat2(iq,D2_RA_GBB) 7214 Cmat2(iq,D2_RB_GAA) = Cmat2(iq,D2_RB_GAA) 7215 Cmat2(iq,D2_RB_GAB) = Cmat2(iq,D2_RB_GAB) 7216 Cmat2(iq,D2_RB_GBB) = 1.0d+0*(t159*t229*t93+(2.0315194871630 7217 1 324d-3*t131*t136*t169+2.0315194871630324d-3*t131*t134*t15 7218 2 8)*t93+t159*t161*t228+8.654925256364164d-5*gammabb*t134*t 7219 3 135*t206*t227+1.9937543124266421d-5*gammabb*t131*t134*t13 7220 4 6*t227-8.05363069722469d-5*gammabb*t104*t130*t206*t226-1. 7221 5 855239699669995d-5*gammabb*t104*t131*t133*t226-9.63227900 7222 6 0746596d-3*t134*t135*t159*t168-5.417385299101419d-3*t131* 7223 7 t134*t136*t168+t161*(-1.890381166699927d-3*t131*t133*t167 7224 8 -1.890381166699927d-3*t104*t131*t156)+4.481541754944851d- 7225 9 3*t104*t130*t159*t160+2.520508222266569d-3*t104*t131*t133 7226 : *t160)*wght+Cmat2(iq,D2_RB_GBB) 7227 Cmat2(iq,D2_GAA_GAA) = 1.0d+0*(-7.476578671599909d-6*t231*t5 7228 1 1*t66*t92-3.245596971136562d-5*t184*t231*t66*t79+6.957148 7229 2 873762482d-6*t12*t230*t51*t65+3.020111511459258d-5*t12*t1 7230 3 84*t230*t50)*wght+Cmat2(iq,D2_GAA_GAA) 7231 Cmat2(iq,D2_GAA_GAB) = Cmat2(iq,D2_GAA_GAB) 7232 Cmat2(iq,D2_GAA_GBB) = Cmat2(iq,D2_GAA_GBB) 7233 Cmat2(iq,D2_GAB_GAB) = Cmat2(iq,D2_GAB_GAB) 7234 Cmat2(iq,D2_GAB_GBB) = Cmat2(iq,D2_GAB_GBB) 7235 Cmat2(iq,D2_GBB_GBB) = 1.0d+0*(-3.245596971136562d-5*t134*t1 7236 1 35*t206*t233-7.476578671599909d-6*t131*t134*t136*t233+3.0 7237 2 20111511459258d-5*t104*t130*t206*t232+6.957148873762482d- 7238 3 6*t104*t131*t133*t232)*wght+Cmat2(iq,D2_GBB_GBB) 7239 Mmat2(iq,D2_RA_TA) = 1.0d+0*(t237*t52*t66-5.417385299101419d 7240 1 -3*gammaaa*t152*t173*t51*t66+t236*t3*t66-9.63227900074659 7241 2 6d-3*gammaaa*t142*t152*t172*t66-1.2407009817988002d+0*t12 7242 3 *t171*t5*t52-9.305257363491002d-1*t12*t235*t4*t52-9.30525 7243 4 7363491002d-1*t151*t171*t4*t52+t153*t173*t52+5.0410164445 7244 5 33138d-3*gammaaa*t12*t143*t171*t51-1.2407009817988002d+0* 7245 6 t12*t170*t3*t5-9.305257363491002d-1*t12*t234*t3*t4-9.3052 7246 7 57363491002d-1*t151*t170*t3*t4+t153*t172*t3+8.96308350988 7247 8 9702d-3*gammaaa*t12*t142*t143*t170)*wght+Mmat2(iq,D2_RA_T 7248 9 A) 7249 Mmat2(iq,D2_RA_TB) = Mmat2(iq,D2_RA_TB) 7250 Mmat2(iq,D2_RB_TA) = Mmat2(iq,D2_RB_TA) 7251 Mmat2(iq,D2_RB_TB) = 1.0d+0*(-1.2407009817988002d+0*t104*t17 7252 1 4*t95*t97-1.2407009817988002d+0*t104*t132*t175*t97-9.3052 7253 2 57363491002d-1*t104*t238*t95*t96-9.305257363491002d-1*t16 7254 3 7*t174*t95*t96-9.305257363491002d-1*t104*t132*t239*t96-9. 7255 4 305257363491002d-1*t132*t167*t175*t96+t134*t240*t95+t169* 7256 5 t176*t95+t132*t134*t241+t132*t169*t177-5.417385299101419d 7257 6 -3*gammabb*t131*t134*t168*t177-9.632279000746596d-3*gamma 7258 7 bb*t134*t159*t168*t176+5.041016444533138d-3*gammabb*t104* 7259 8 t131*t160*t175+8.963083509889702d-3*gammabb*t104*t159*t16 7260 9 0*t174)*wght+Mmat2(iq,D2_RB_TB) 7261 Mmat2(iq,D2_GAA_TA) = 1.0d+0*(2.0315194871630324d-3*t1*t173* 7262 1 t51*t66+3.612104625279974d-3*t1*t142*t172*t66-1.890381166 7263 2 699927d-3*t12*t144*t171*t51-3.361156316208638d-3*t12*t142 7264 3 *t144*t170)*wght+Mmat2(iq,D2_GAA_TA) 7265 Mmat2(iq,D2_GAA_TB) = Mmat2(iq,D2_GAA_TB) 7266 Mmat2(iq,D2_GAB_TA) = Mmat2(iq,D2_GAB_TA) 7267 Mmat2(iq,D2_GAB_TB) = Mmat2(iq,D2_GAB_TB) 7268 Mmat2(iq,D2_GBB_TA) = Mmat2(iq,D2_GBB_TA) 7269 Mmat2(iq,D2_GBB_TB) = 1.0d+0*(2.0315194871630324d-3*t131*t13 7270 1 4*t177*t93+3.612104625279974d-3*t134*t159*t176*t93-1.8903 7271 2 81166699927d-3*t104*t131*t161*t175-3.361156316208638d-3*t 7272 3 104*t159*t161*t174)*wght+Mmat2(iq,D2_GBB_TB) 7273 Mmat2(iq,D2_TA_TA) = 1.0d+0*(t245*t52*t66+t244*t3*t66-9.3052 7274 1 57363491002d-1*t12*t243*t4*t52-9.305257363491002d-1*t12*t 7275 2 242*t3*t4)*wght+Mmat2(iq,D2_TA_TA) 7276 Mmat2(iq,D2_TA_TB) = Mmat2(iq,D2_TA_TB) 7277 Mmat2(iq,D2_TB_TB) = 1.0d+0*(-9.305257363491002d-1*t104*t246 7278 1 *t95*t96-9.305257363491002d-1*t104*t132*t247*t96+t134*t24 7279 2 8*t95+t132*t134*t249)*wght+Mmat2(iq,D2_TB_TB) 7280 Amat3(iq,D3_RA_RA_RA) = 1.0d+0*(t152*(-1.6252155897304255d-2 7281 1 *gammaaa*t194*t51*t92-1.063335633294209d-4*t152*t153*t183 7282 2 *t51*t92-1.063335633294209d-4*t141*t152*t183*t51*t66-1.62 7283 3 52155897304255d-2*gammaaa*t182*t51*t66-3.250431179460851d 7284 4 -2*gammaaa*t141*t153*t51)+t192*(-5.316678166471045d-5*t15 7285 5 3*t183*t51*t92-5.316678166471045d-5*t141*t183*t51*t66)+t1 7286 6 93*(1.9863746096705204d-2*gammaaa*t153*t51*t92+1.98637460 7287 7 96705204d-2*gammaaa*t141*t51*t66)-9.269748178462429d-2*ga 7288 8 mmaaa*t259*t51*t66*t92+5.84834598311815d-4*t183*t258*t51* 7289 9 t66*t92-5.217843141140167d-7*t251*t257*t51*t66*t92+t260*t 7290 : 52*t92+t52*t66*(-9.232684300601568d+2*t47*t5*t91+9.232684 7291 ; 300601568d+2*t17*t44*t5*t91-3.37614805358933d+0*t144*t49* 7292 < t91+3.37614805358933d+0*t144*t17*t47*t91+2.10403636633445 7293 = 1d+4*t145*t44*t91-2.104036366334451d+4*t145*t17*t41*t91+9 7294 > .232684300601568d+2*t47*t5*t90+2.769805290180471d+3*t41*t 7295 ? 46*t5*t90-3.693073720240627d+3*t17*t44*t5*t90-6.752296107 7296 @ 17866d+0*t144*t17*t47*t90+6.75229610717866d+0*t144*t44*t4 7297 1 6*t90-8.416145465337804d+4*t145*t38*t46*t90-4.20807273266 7298 2 8902d+4*t145*t44*t90+1.2624218198006704d+5*t145*t17*t41*t 7299 3 90-8.309415870541413d+3*t41*t46*t5*t89+2.769805290180471d 7300 4 +3*t17*t44*t5*t89+5.539610580360942d+3*t38*t43*t5*t89-1.0 7301 5 128444160767991d+1*t144*t44*t46*t89+3.787265459402013d+5* 7302 6 t145*t38*t46*t89+2.104036366334451d+4*t145*t44*t89+1.0128 7303 7 444160767991d+1*t144*t41*t43*t89-2.104036366334451d+5*t14 7304 8 5*t35*t43*t89-1.8936327297010064d+5*t145*t17*t41*t89+5.53 7305 9 9610580360942d+3*t41*t46*t5*t88-1.4772294880962508d+4*t38 7306 : *t43*t5*t88+9.232684300601568d+3*t35*t40*t5*t88-5.0496872 7307 ; 79202681d+5*t145*t38*t46*t88-1.350459221435732d+1*t144*t4 7308 < 1*t43*t88+8.416145465337803d+5*t145*t35*t43*t88+8.4161454 7309 = 65337804d+4*t145*t17*t41*t88+1.350459221435732d+1*t144*t3 7310 > 8*t40*t88-4.2080727326689016d+5*t145*t32*t40*t88+9.232684 7311 ? 300601568d+3*t38*t43*t5*t87-2.308171075150392d+4*t35*t40* 7312 @ t5*t87+1.3849026450902355d+4*t32*t37*t5*t87+2.10403636633 7313 1 44508d+5*t145*t38*t46*t87-1.0520181831672254d+6*t145*t35* 7314 2 t43*t87-1.6880740267946648d+1*t144*t38*t40*t87+1.57802727 7315 3 4750838d+6*t145*t32*t40*t87+1.6880740267946648d+1*t144*t3 7316 4 5*t37*t87-7.364127282170578d+5*t145*t29*t37*t87+1.3849026 7317 5 450902355d+4*t35*t40*t5*t86-3.323766348216566d+4*t32*t37* 7318 6 t5*t86+1.9388637031263292d+4*t29*t34*t5*t86+4.20807273266 7319 7 8902d+5*t145*t35*t43*t86-1.893632729701006d+6*t145*t32*t4 7320 8 0*t86-2.0256888321535982d+1*t144*t35*t37*t86+2.6510858215 7321 9 814087d+6*t145*t29*t37*t86+2.0256888321535982d+1*t144*t32 7322 : *t34*t86-1.1782603651472927d+6*t145*t26*t34*t86+1.9388637 7323 ; 031263292d+4*t32*t37*t5*t85-4.5240153072947686d+4*t29*t34 7324 < *t5*t85+2.585151604168439d+4*t26*t31*t5*t85+7.36412728217 7325 = 0578d+5*t145*t32*t40*t85-3.0929334585116436d+6*t145*t29*t 7326 > 37*t85-2.3633036375125308d+1*t144*t32*t34*t85+4.123911278 7327 ? 015524d+6*t145*t26*t34*t85+2.3633036375125308d+1*t144*t29 7328 @ *t31*t85-1.7673905477209387d+6*t145*t23*t31*t85+2.5851516 7329 1 04168439d+4*t29*t34*t5*t84-5.908917952385003d+4*t26*t31*t 7330 2 5*t84+3.3237663482165647d+4*t23*t28*t5*t84+1.178260365147 7331 3 2927d+6*t145*t29*t37*t84-4.713041460589171d+6*t145*t26*t3 7332 4 4*t84-2.700918442871464d+1*t144*t29*t31*t84+6.05962473504 7333 5 3219d+6*t145*t23*t31*t84+2.700918442871464d+1*t144*t26*t2 7334 6 8*t84-2.524843639601341d+6*t145*t20*t28*t84+3.32376634821 7335 7 65647d+4*t26*t31*t5*t83-7.478474283487271d+4*t23*t28*t5*t 7336 8 83+4.1547079352707056d+4*t20*t25*t5*t83+1.767390547720939 7337 9 d+6*t145*t26*t34*t83-6.817077826923622d+6*t145*t23*t31*t8 7338 : 3-3.0385332482303967d+1*t144*t26*t28*t83+8.52134728365452 7339 ; 6d+6*t145*t20*t28*t83+3.0385332482303967d+1*t144*t23*t25* 7340 < t83-3.4716600044518436d+6*t137*t145*t25*t83+4.15470793527 7341 = 0705d+4*t23*t28*t5*t82-9.232684300601568d+4*t20*t25*t5*t8 7342 > 2+5.077976365330862d+4*t137*t22*t5*t82+2.524843639601341d 7343 ? +6*t145*t23*t31*t82-9.468163648505028d+6*t145*t20*t28*t82 7344 @ -3.3761480535893296d+1*t144*t23*t25*t82+1.157220001483947 7345 1 7d+7*t137*t145*t25*t82+3.3761480535893296d+1*t144*t20*t22 7346 2 *t82-4.628880005935792d+6*t145*t178*t22*t82+5.07797636533 7347 3 0863d+4*t20*t25*t5*t81-1.1171548003727898d+5*t137*t22*t5* 7348 4 t81+6.093571638397036d+4*t178*t18*t5*t81+3.47166000445184 7349 5 36d+6*t145*t20*t28*t81-6.01754400771653d+6*t145*t18*t250* 7350 6 t81-1.2729420016323426d+7*t137*t145*t25*t81-3.71376285894 7351 7 8263d+1*t144*t20*t22*t81+1.5275304019588112d+7*t145*t178* 7352 8 t22*t81+3.713762858948263d+1*t137*t144*t18*t81)+t142*t152 7353 9 *(-2.8896837002239784d-2*gammaaa*t194*t79-2.8896837002239 7354 : 784d-2*gammaaa*t181*t66-5.779367400447957d-2*gammaaa*t140 7355 ; *t153)+t184*t192*(-2.3079800683637772d-4*t153*t183*t79-2. 7356 < 3079800683637772d-4*t140*t183*t66+2.3960893036683073d-2*g 7357 = ammaaa*t198)+t142*t193*(3.5318356336070855d-2*gammaaa*t15 7358 > 3*t79+3.5318356336070855d-2*gammaaa*t140*t66)-1.648189962 7359 ? 3499732d-1*gammaaa*t142*t259*t66*t79+2.5387780752001543d- 7360 @ 3*t183*t184*t258*t66*t79-8.295189532329142d-6*t251*t252*t 7361 1 257*t66*t79+t260*t3*t79+t3*t66*(-9.232684300601568d+2*t47 7362 2 *t5*t78+9.232684300601568d+2*t17*t44*t5*t78-3.37614805358 7363 3 933d+0*t144*t49*t78+3.37614805358933d+0*t144*t17*t47*t78+ 7364 4 2.104036366334451d+4*t145*t44*t78-2.104036366334451d+4*t1 7365 5 45*t17*t41*t78+9.232684300601568d+2*t47*t5*t77+2.76980529 7366 6 0180471d+3*t41*t46*t5*t77-3.693073720240627d+3*t17*t44*t5 7367 7 *t77-6.75229610717866d+0*t144*t17*t47*t77+6.7522961071786 7368 8 6d+0*t144*t44*t46*t77-8.416145465337804d+4*t145*t38*t46*t 7369 9 77-4.208072732668902d+4*t145*t44*t77+1.2624218198006704d+ 7370 : 5*t145*t17*t41*t77-8.309415870541413d+3*t41*t46*t5*t76+2. 7371 ; 769805290180471d+3*t17*t44*t5*t76+5.539610580360942d+3*t3 7372 < 8*t43*t5*t76-1.0128444160767991d+1*t144*t44*t46*t76+3.787 7373 = 265459402013d+5*t145*t38*t46*t76+2.104036366334451d+4*t14 7374 > 5*t44*t76+1.0128444160767991d+1*t144*t41*t43*t76-2.104036 7375 ? 366334451d+5*t145*t35*t43*t76-1.8936327297010064d+5*t145* 7376 @ t17*t41*t76+5.539610580360942d+3*t41*t46*t5*t75-1.4772294 7377 1 880962508d+4*t38*t43*t5*t75+9.232684300601568d+3*t35*t40* 7378 2 t5*t75-5.049687279202681d+5*t145*t38*t46*t75-1.3504592214 7379 3 35732d+1*t144*t41*t43*t75+8.416145465337803d+5*t145*t35*t 7380 4 43*t75+8.416145465337804d+4*t145*t17*t41*t75+1.3504592214 7381 5 35732d+1*t144*t38*t40*t75-4.2080727326689016d+5*t145*t32* 7382 6 t40*t75+9.232684300601568d+3*t38*t43*t5*t74-2.30817107515 7383 7 0392d+4*t35*t40*t5*t74+1.3849026450902355d+4*t32*t37*t5*t 7384 8 74+2.1040363663344508d+5*t145*t38*t46*t74-1.0520181831672 7385 9 254d+6*t145*t35*t43*t74-1.6880740267946648d+1*t144*t38*t4 7386 : 0*t74+1.578027274750838d+6*t145*t32*t40*t74+1.68807402679 7387 ; 46648d+1*t144*t35*t37*t74-7.364127282170578d+5*t145*t29*t 7388 < 37*t74+1.3849026450902355d+4*t35*t40*t5*t73-3.32376634821 7389 = 6566d+4*t32*t37*t5*t73+1.9388637031263292d+4*t29*t34*t5*t 7390 > 73+4.208072732668902d+5*t145*t35*t43*t73-1.89363272970100 7391 ? 6d+6*t145*t32*t40*t73-2.0256888321535982d+1*t144*t35*t37* 7392 @ t73+2.6510858215814087d+6*t145*t29*t37*t73+2.025688832153 7393 1 5982d+1*t144*t32*t34*t73-1.1782603651472927d+6*t145*t26*t 7394 2 34*t73+1.9388637031263292d+4*t32*t37*t5*t72-4.52401530729 7395 3 47686d+4*t29*t34*t5*t72+2.585151604168439d+4*t26*t31*t5*t 7396 4 72+7.364127282170578d+5*t145*t32*t40*t72-3.09293345851164 7397 5 36d+6*t145*t29*t37*t72-2.3633036375125308d+1*t144*t32*t34 7398 6 *t72+4.123911278015524d+6*t145*t26*t34*t72+2.363303637512 7399 7 5308d+1*t144*t29*t31*t72-1.7673905477209387d+6*t145*t23*t 7400 8 31*t72+2.585151604168439d+4*t29*t34*t5*t71-5.908917952385 7401 9 003d+4*t26*t31*t5*t71+3.3237663482165647d+4*t23*t28*t5*t7 7402 : 1+1.1782603651472927d+6*t145*t29*t37*t71-4.71304146058917 7403 ; 1d+6*t145*t26*t34*t71-2.700918442871464d+1*t144*t29*t31*t 7404 < 71+6.059624735043219d+6*t145*t23*t31*t71+2.70091844287146 7405 = 4d+1*t144*t26*t28*t71-2.524843639601341d+6*t145*t20*t28*t 7406 > 71+3.3237663482165647d+4*t26*t31*t5*t70-7.478474283487271 7407 ? d+4*t23*t28*t5*t70+4.1547079352707056d+4*t20*t25*t5*t70+1 7408 @ .767390547720939d+6*t145*t26*t34*t70-6.817077826923622d+6 7409 1 *t145*t23*t31*t70-3.0385332482303967d+1*t144*t26*t28*t70+ 7410 2 8.521347283654526d+6*t145*t20*t28*t70+3.0385332482303967d 7411 3 +1*t144*t23*t25*t70-3.4716600044518436d+6*t137*t145*t25*t 7412 4 70+4.154707935270705d+4*t23*t28*t5*t69-9.232684300601568d 7413 5 +4*t20*t25*t5*t69+5.077976365330862d+4*t137*t22*t5*t69+2. 7414 6 524843639601341d+6*t145*t23*t31*t69-9.468163648505028d+6* 7415 7 t145*t20*t28*t69-3.3761480535893296d+1*t144*t23*t25*t69+1 7416 8 .1572200014839477d+7*t137*t145*t25*t69+3.3761480535893296 7417 9 d+1*t144*t20*t22*t69-4.628880005935792d+6*t145*t178*t22*t 7418 : 69+5.077976365330863d+4*t20*t25*t5*t68-1.1171548003727898 7419 ; d+5*t137*t22*t5*t68+6.093571638397036d+4*t178*t18*t5*t68+ 7420 < 3.4716600044518436d+6*t145*t20*t28*t68-6.01754400771653d+ 7421 = 6*t145*t18*t250*t68-1.2729420016323426d+7*t137*t145*t25*t 7422 > 68-3.713762858948263d+1*t144*t20*t22*t68+1.52753040195881 7423 ? 12d+7*t145*t178*t22*t68+3.713762858948263d+1*t137*t144*t1 7424 @ 8*t68)+t149*(-1.2407009817988002d+0*t151*t52*t65+2.240451 7425 1 7531258392d-3*gammaaa*t12*t152*t51*t65-1.2407009817988002 7426 2 d+0*t12*t139*t52-1.2407009817988002d+0*t151*t3*t50+3.9835 7427 3 92671062089d-3*gammaaa*t12*t142*t152*t50-1.24070098179880 7428 4 02d+0*t12*t138*t3)+t143*(1.5123049333599414d-2*gammaaa*t1 7429 5 91*t51*t65+9.894611731573306d-5*t151*t152*t183*t51*t65+9. 7430 6 894611731573306d-5*t12*t139*t152*t183*t51+1.5123049333599 7431 7 414d-2*gammaaa*t12*t180*t51+3.024609866719883d-2*gammaaa* 7432 8 t139*t151*t51)+t185*(4.947305865786653d-5*t151*t183*t51*t 7433 9 65+4.947305865786653d-5*t12*t139*t183*t51)+t186*(8.401694 7434 : 074221897d-3*gammaaa*t151*t51*t65+8.401694074221897d-3*ga 7435 ; mmaaa*t12*t139*t51)-3.7221029453964005d+0*t191*t5*t52*t65 7436 < -9.305257363491002d-1*t256*t4*t52*t65+1.6803388148443793d 7437 = -2*gammaaa*t12*t255*t51*t65-3.4631141060506576d-4*t12*t18 7438 > 3*t254*t51*t65+4.855337331063556d-7*t12*t251*t253*t51*t65 7439 ? -9.305257363491002d-1*t12*t4*t52*(-9.232684300601568d+2*t 7440 @ 47*t5*t64+9.232684300601568d+2*t17*t44*t5*t64-3.376148053 7441 1 58933d+0*t144*t49*t64+3.37614805358933d+0*t144*t17*t47*t6 7442 2 4+2.104036366334451d+4*t145*t44*t64-2.104036366334451d+4* 7443 3 t145*t17*t41*t64+9.232684300601568d+2*t47*t5*t63+2.769805 7444 4 290180471d+3*t41*t46*t5*t63-3.693073720240627d+3*t17*t44* 7445 5 t5*t63-6.75229610717866d+0*t144*t17*t47*t63+6.75229610717 7446 6 866d+0*t144*t44*t46*t63-8.416145465337804d+4*t145*t38*t46 7447 7 *t63-4.208072732668902d+4*t145*t44*t63+1.2624218198006704 7448 8 d+5*t145*t17*t41*t63-8.309415870541413d+3*t41*t46*t5*t62+ 7449 9 2.769805290180471d+3*t17*t44*t5*t62+5.539610580360942d+3* 7450 : t38*t43*t5*t62-1.0128444160767991d+1*t144*t44*t46*t62+3.7 7451 ; 87265459402013d+5*t145*t38*t46*t62+2.104036366334451d+4*t 7452 < 145*t44*t62+1.0128444160767991d+1*t144*t41*t43*t62-2.1040 7453 = 36366334451d+5*t145*t35*t43*t62-1.8936327297010064d+5*t14 7454 > 5*t17*t41*t62+5.539610580360942d+3*t41*t46*t5*t61-1.47722 7455 ? 94880962508d+4*t38*t43*t5*t61+9.232684300601568d+3*t35*t4 7456 @ 0*t5*t61-5.049687279202681d+5*t145*t38*t46*t61-1.35045922 7457 1 1435732d+1*t144*t41*t43*t61+8.416145465337803d+5*t145*t35 7458 2 *t43*t61+8.416145465337804d+4*t145*t17*t41*t61+1.35045922 7459 3 1435732d+1*t144*t38*t40*t61-4.2080727326689016d+5*t145*t3 7460 4 2*t40*t61+9.232684300601568d+3*t38*t43*t5*t60-2.308171075 7461 5 150392d+4*t35*t40*t5*t60+1.3849026450902355d+4*t32*t37*t5 7462 6 *t60+2.1040363663344508d+5*t145*t38*t46*t60-1.05201818316 7463 7 72254d+6*t145*t35*t43*t60-1.6880740267946648d+1*t144*t38* 7464 8 t40*t60+1.578027274750838d+6*t145*t32*t40*t60+1.688074026 7465 9 7946648d+1*t144*t35*t37*t60-7.364127282170578d+5*t145*t29 7466 : *t37*t60+1.3849026450902355d+4*t35*t40*t5*t59-3.323766348 7467 ; 216566d+4*t32*t37*t5*t59+1.9388637031263292d+4*t29*t34*t5 7468 < *t59+4.208072732668902d+5*t145*t35*t43*t59-1.893632729701 7469 = 006d+6*t145*t32*t40*t59-2.0256888321535982d+1*t144*t35*t3 7470 > 7*t59+2.6510858215814087d+6*t145*t29*t37*t59+2.0256888321 7471 ? 535982d+1*t144*t32*t34*t59-1.1782603651472927d+6*t145*t26 7472 @ *t34*t59+1.9388637031263292d+4*t32*t37*t5*t58-4.524015307 7473 1 2947686d+4*t29*t34*t5*t58+2.585151604168439d+4*t26*t31*t5 7474 2 *t58+7.364127282170578d+5*t145*t32*t40*t58-3.092933458511 7475 3 6436d+6*t145*t29*t37*t58-2.3633036375125308d+1*t144*t32*t 7476 4 34*t58+4.123911278015524d+6*t145*t26*t34*t58+2.3633036375 7477 5 125308d+1*t144*t29*t31*t58-1.7673905477209387d+6*t145*t23 7478 6 *t31*t58+2.585151604168439d+4*t29*t34*t5*t57-5.9089179523 7479 7 85003d+4*t26*t31*t5*t57+3.3237663482165647d+4*t23*t28*t5* 7480 8 t57+1.1782603651472927d+6*t145*t29*t37*t57-4.713041460589 7481 9 171d+6*t145*t26*t34*t57-2.700918442871464d+1*t144*t29*t31 7482 : *t57+6.059624735043219d+6*t145*t23*t31*t57+2.700918442871 7483 ; 464d+1*t144*t26*t28*t57-2.524843639601341d+6*t145*t20*t28 7484 < *t57+3.3237663482165647d+4*t26*t31*t5*t56-7.4784742834872 7485 = 71d+4*t23*t28*t5*t56+4.1547079352707056d+4*t20*t25*t5*t56 7486 > +1.767390547720939d+6*t145*t26*t34*t56-6.817077826923622d 7487 ? +6*t145*t23*t31*t56-3.0385332482303967d+1*t144*t26*t28*t5 7488 @ 6+8.521347283654526d+6*t145*t20*t28*t56+3.038533248230396 7489 1 7d+1*t144*t23*t25*t56-3.4716600044518436d+6*t137*t145*t25 7490 2 *t56+4.154707935270705d+4*t23*t28*t5*t55-9.23268430060156 7491 3 8d+4*t20*t25*t5*t55+5.077976365330862d+4*t137*t22*t5*t55+ 7492 4 2.524843639601341d+6*t145*t23*t31*t55-9.468163648505028d+ 7493 5 6*t145*t20*t28*t55-3.3761480535893296d+1*t144*t23*t25*t55 7494 6 +1.1572200014839477d+7*t137*t145*t25*t55+3.37614805358932 7495 7 96d+1*t144*t20*t22*t55-4.628880005935792d+6*t145*t178*t22 7496 8 *t55+5.077976365330863d+4*t20*t25*t5*t54-1.11715480037278 7497 9 98d+5*t137*t22*t5*t54+6.093571638397036d+4*t178*t18*t5*t5 7498 : 4+3.4716600044518436d+6*t145*t20*t28*t54-6.01754400771653 7499 ; d+6*t145*t18*t250*t54-1.2729420016323426d+7*t137*t145*t25 7500 < *t54-3.713762858948263d+1*t144*t20*t22*t54+1.527530401958 7501 = 8112d+7*t145*t178*t22*t54+3.713762858948263d+1*t137*t144* 7502 > t18*t54)-3.7221029453964005d+0*t12*t180*t5*t52-7.44420589 7503 ? 0792801d+0*t139*t151*t5*t52-2.7915772090473007d+0*t139*t1 7504 @ 91*t4*t52-2.7915772090473007d+0*t151*t180*t4*t52+3*t141*t 7505 1 194*t52+3*t153*t182*t52+t142*t143*(2.6889250529669106d-2* 7506 2 gammaaa*t191*t50+2.6889250529669106d-2*gammaaa*t12*t179+5 7507 3 .377850105933821d-2*gammaaa*t138*t151)+t184*t185*(2.14763 7508 4 48525932504d-4*t151*t183*t50+2.3960893036683073d-2*gammaa 7509 5 a*t195+2.1476348525932504d-4*t12*t138*t183)+t142*t186*(1. 7510 6 4938472516482826d-2*gammaaa*t151*t50+1.4938472516482826d- 7511 7 2*gammaaa*t12*t138)-3.7221029453964005d+0*t191*t3*t5*t50- 7512 8 9.305257363491002d-1*t256*t3*t4*t50+2.987694503296569d-2* 7513 9 gammaaa*t12*t142*t255*t50-1.5033443968152754d-3*t12*t183* 7514 : t184*t254*t50+7.718887347725925d-6*t12*t251*t252*t253*t50 7515 ; -9.305257363491002d-1*t12*t3*t4*(-9.232684300601568d+2*t4 7516 < 7*t48*t5+9.232684300601568d+2*t17*t44*t48*t5+9.2326843006 7517 = 01568d+2*t45*t47*t5+2.769805290180471d+3*t41*t45*t46*t5-8 7518 > .309415870541413d+3*t41*t42*t46*t5+5.539610580360942d+3*t 7519 ? 39*t41*t46*t5-3.693073720240627d+3*t17*t44*t45*t5+2.76980 7520 @ 5290180471d+3*t17*t42*t44*t5+5.539610580360942d+3*t38*t42 7521 1 *t43*t5-1.4772294880962508d+4*t38*t39*t43*t5+9.2326843006 7522 2 01568d+3*t36*t38*t43*t5+9.232684300601568d+3*t35*t39*t40* 7523 3 t5-2.308171075150392d+4*t35*t36*t40*t5+1.3849026450902355 7524 4 d+4*t33*t35*t40*t5+1.3849026450902355d+4*t32*t36*t37*t5-3 7525 5 .323766348216566d+4*t32*t33*t37*t5+1.9388637031263292d+4* 7526 6 t30*t32*t37*t5+1.9388637031263292d+4*t29*t33*t34*t5-4.524 7527 7 0153072947686d+4*t29*t30*t34*t5+2.585151604168439d+4*t27* 7528 8 t29*t34*t5+2.585151604168439d+4*t26*t30*t31*t5-5.90891795 7529 9 2385003d+4*t26*t27*t31*t5+3.3237663482165647d+4*t24*t26*t 7530 : 31*t5+3.3237663482165647d+4*t23*t27*t28*t5-7.478474283487 7531 ; 271d+4*t23*t24*t28*t5+4.154707935270705d+4*t21*t23*t28*t5 7532 < +4.1547079352707056d+4*t20*t24*t25*t5-9.232684300601568d+ 7533 = 4*t20*t21*t25*t5+5.077976365330863d+4*t14*t20*t25*t5+5.07 7534 > 7976365330862d+4*t137*t21*t22*t5-1.1171548003727898d+5*t1 7535 ? 37*t14*t22*t5+6.093571638397036d+4*t14*t178*t18*t5-3.3761 7536 @ 4805358933d+0*t144*t48*t49+3.37614805358933d+0*t144*t17*t 7537 1 47*t48+2.104036366334451d+4*t145*t44*t48-2.10403636633445 7538 2 1d+4*t145*t17*t41*t48-6.75229610717866d+0*t144*t17*t45*t4 7539 3 7+6.75229610717866d+0*t144*t44*t45*t46-8.416145465337804d 7540 4 +4*t145*t38*t45*t46-1.0128444160767991d+1*t144*t42*t44*t4 7541 5 6+3.787265459402013d+5*t145*t38*t42*t46-5.049687279202681 7542 6 d+5*t145*t38*t39*t46+2.1040363663344508d+5*t145*t36*t38*t 7543 7 46-4.208072732668902d+4*t145*t44*t45+1.2624218198006704d+ 7544 8 5*t145*t17*t41*t45+2.104036366334451d+4*t145*t42*t44+1.01 7545 9 28444160767991d+1*t144*t41*t42*t43-2.104036366334451d+5*t 7546 : 145*t35*t42*t43-1.350459221435732d+1*t144*t39*t41*t43+8.4 7547 ; 16145465337803d+5*t145*t35*t39*t43-1.0520181831672254d+6* 7548 < t145*t35*t36*t43+4.208072732668902d+5*t145*t33*t35*t43-1. 7549 = 8936327297010064d+5*t145*t17*t41*t42+8.416145465337804d+4 7550 > *t145*t17*t39*t41+1.350459221435732d+1*t144*t38*t39*t40-4 7551 ? .2080727326689016d+5*t145*t32*t39*t40-1.6880740267946648d 7552 @ +1*t144*t36*t38*t40+1.578027274750838d+6*t145*t32*t36*t40 7553 1 -1.893632729701006d+6*t145*t32*t33*t40+7.364127282170578d 7554 2 +5*t145*t30*t32*t40+1.6880740267946648d+1*t144*t35*t36*t3 7555 3 7-7.364127282170578d+5*t145*t29*t36*t37-2.025688832153598 7556 4 2d+1*t144*t33*t35*t37+2.6510858215814087d+6*t145*t29*t33* 7557 5 t37-3.0929334585116436d+6*t145*t29*t30*t37+1.178260365147 7558 6 2927d+6*t145*t27*t29*t37+2.0256888321535982d+1*t144*t32*t 7559 7 33*t34-1.1782603651472927d+6*t145*t26*t33*t34-2.363303637 7560 8 5125308d+1*t144*t30*t32*t34+4.123911278015524d+6*t145*t26 7561 9 *t30*t34-4.713041460589171d+6*t145*t26*t27*t34+1.76739054 7562 : 7720939d+6*t145*t24*t26*t34+2.3633036375125308d+1*t144*t2 7563 ; 9*t30*t31-1.7673905477209387d+6*t145*t23*t30*t31-2.700918 7564 < 442871464d+1*t144*t27*t29*t31+6.059624735043219d+6*t145*t 7565 = 23*t27*t31-6.817077826923622d+6*t145*t23*t24*t31+2.524843 7566 > 639601341d+6*t145*t21*t23*t31+2.700918442871464d+1*t144*t 7567 ? 26*t27*t28-2.524843639601341d+6*t145*t20*t27*t28-3.038533 7568 @ 2482303967d+1*t144*t24*t26*t28+8.521347283654526d+6*t145* 7569 1 t20*t24*t28-9.468163648505028d+6*t145*t20*t21*t28+3.47166 7570 2 00044518436d+6*t14*t145*t20*t28-6.01754400771653d+6*t14*t 7571 3 145*t18*t250+3.0385332482303967d+1*t144*t23*t24*t25-3.471 7572 4 6600044518436d+6*t137*t145*t24*t25-3.3761480535893296d+1* 7573 5 t144*t21*t23*t25+1.1572200014839477d+7*t137*t145*t21*t25- 7574 6 1.2729420016323426d+7*t137*t14*t145*t25+3.376148053589329 7575 7 6d+1*t144*t20*t21*t22-4.628880005935792d+6*t145*t178*t21* 7576 8 t22-3.713762858948263d+1*t14*t144*t20*t22+1.5275304019588 7577 9 112d+7*t14*t145*t178*t22+3.713762858948263d+1*t137*t14*t1 7578 : 44*t18)-3.7221029453964005d+0*t12*t179*t3*t5-7.4442058907 7579 ; 92801d+0*t138*t151*t3*t5-2.7915772090473007d+0*t138*t191* 7580 < t3*t4-2.7915772090473007d+0*t151*t179*t3*t4+3*t140*t194*t 7581 = 3+3*t153*t181*t3-3.6666666666666664d+0*t193*t199-3.666666 7582 > 6666666664d+0*t142*t193*t198-2.3333333333333334d+0*t186*t 7583 ? 197-6.666666666666666d-1*t189*t196-2.3333333333333334d+0* 7584 @ t142*t186*t195)*wght+Amat3(iq,D3_RA_RA_RA) 7585 Amat3(iq,D3_RA_RA_RB) = Amat3(iq,D3_RA_RA_RB) 7586 Amat3(iq,D3_RA_RB_RB) = Amat3(iq,D3_RA_RB_RB) 7587 Amat3(iq,D3_RB_RB_RB) = 1.0d+0*(t132*t134*(-9.23268430060156 7588 1 8d+2*t128*t91*t97+9.232684300601568d+2*t107*t126*t91*t97+ 7589 2 9.232684300601568d+2*t128*t90*t97+2.769805290180471d+3*t1 7590 3 24*t127*t90*t97-3.693073720240627d+3*t107*t126*t90*t97-8. 7591 4 309415870541413d+3*t124*t127*t89*t97+2.769805290180471d+3 7592 5 *t107*t126*t89*t97+5.539610580360942d+3*t122*t125*t89*t97 7593 6 +5.539610580360942d+3*t124*t127*t88*t97-1.477229488096250 7594 7 8d+4*t122*t125*t88*t97+9.232684300601568d+3*t120*t123*t88 7595 8 *t97+9.232684300601568d+3*t122*t125*t87*t97-2.30817107515 7596 9 0392d+4*t120*t123*t87*t97+1.3849026450902355d+4*t118*t121 7597 : *t87*t97+1.3849026450902355d+4*t120*t123*t86*t97-3.323766 7598 ; 348216566d+4*t118*t121*t86*t97+1.9388637031263292d+4*t116 7599 < *t119*t86*t97+1.9388637031263292d+4*t118*t121*t85*t97-4.5 7600 = 240153072947686d+4*t116*t119*t85*t97+2.585151604168439d+4 7601 > *t114*t117*t85*t97+2.585151604168439d+4*t116*t119*t84*t97 7602 ? -5.908917952385003d+4*t114*t117*t84*t97+3.323766348216564 7603 @ 7d+4*t112*t115*t84*t97+3.3237663482165647d+4*t114*t117*t8 7604 1 3*t97-7.478474283487271d+4*t112*t115*t83*t97+4.1547079352 7605 2 707056d+4*t110*t113*t83*t97+5.077976365330862d+4*t111*t15 7606 3 4*t82*t97+4.154707935270705d+4*t112*t115*t82*t97-9.232684 7607 4 300601568d+4*t110*t113*t82*t97+6.093571638397036d+4*t108* 7608 5 t200*t81*t97-1.1171548003727898d+5*t111*t154*t81*t97+5.07 7609 6 7976365330863d+4*t110*t113*t81*t97+2.104036366334451d+4*t 7610 7 126*t162*t91-2.104036366334451d+4*t107*t124*t162*t91-3.37 7611 8 614805358933d+0*t129*t161*t91+3.37614805358933d+0*t107*t1 7612 9 28*t161*t91-8.416145465337804d+4*t122*t127*t162*t90-4.208 7613 : 072732668902d+4*t126*t162*t90+1.2624218198006704d+5*t107* 7614 ; t124*t162*t90-6.75229610717866d+0*t107*t128*t161*t90+6.75 7615 < 229610717866d+0*t126*t127*t161*t90+3.787265459402013d+5*t 7616 = 122*t127*t162*t89+2.104036366334451d+4*t126*t162*t89-2.10 7617 > 4036366334451d+5*t120*t125*t162*t89-1.8936327297010064d+5 7618 ? *t107*t124*t162*t89-1.0128444160767991d+1*t126*t127*t161* 7619 @ t89+1.0128444160767991d+1*t124*t125*t161*t89-5.0496872792 7620 1 02681d+5*t122*t127*t162*t88+8.416145465337803d+5*t120*t12 7621 2 5*t162*t88+8.416145465337804d+4*t107*t124*t162*t88-4.2080 7622 3 727326689016d+5*t118*t123*t162*t88-1.350459221435732d+1*t 7623 4 124*t125*t161*t88+1.350459221435732d+1*t122*t123*t161*t88 7624 5 +2.1040363663344508d+5*t122*t127*t162*t87-1.0520181831672 7625 6 254d+6*t120*t125*t162*t87+1.578027274750838d+6*t118*t123* 7626 7 t162*t87-7.364127282170578d+5*t116*t121*t162*t87-1.688074 7627 8 0267946648d+1*t122*t123*t161*t87+1.6880740267946648d+1*t1 7628 9 20*t121*t161*t87+4.208072732668902d+5*t120*t125*t162*t86- 7629 : 1.893632729701006d+6*t118*t123*t162*t86+2.651085821581408 7630 ; 7d+6*t116*t121*t162*t86-1.1782603651472927d+6*t114*t119*t 7631 < 162*t86-2.0256888321535982d+1*t120*t121*t161*t86+2.025688 7632 = 8321535982d+1*t118*t119*t161*t86+7.364127282170578d+5*t11 7633 > 8*t123*t162*t85-3.0929334585116436d+6*t116*t121*t162*t85+ 7634 ? 4.123911278015524d+6*t114*t119*t162*t85-1.767390547720938 7635 @ 7d+6*t112*t117*t162*t85-2.3633036375125308d+1*t118*t119*t 7636 1 161*t85+2.3633036375125308d+1*t116*t117*t161*t85+1.178260 7637 2 3651472927d+6*t116*t121*t162*t84-4.713041460589171d+6*t11 7638 3 4*t119*t162*t84+6.059624735043219d+6*t112*t117*t162*t84-2 7639 4 .524843639601341d+6*t110*t115*t162*t84-2.700918442871464d 7640 5 +1*t116*t117*t161*t84+2.700918442871464d+1*t114*t115*t161 7641 6 *t84-3.4716600044518436d+6*t113*t154*t162*t83+1.767390547 7642 7 720939d+6*t114*t119*t162*t83-6.817077826923622d+6*t112*t1 7643 8 17*t162*t83+8.521347283654526d+6*t110*t115*t162*t83-3.038 7644 9 5332482303967d+1*t114*t115*t161*t83+3.0385332482303967d+1 7645 : *t112*t113*t161*t83-4.628880005935792d+6*t111*t162*t200*t 7646 ; 82+1.1572200014839477d+7*t113*t154*t162*t82+2.52484363960 7647 < 1341d+6*t112*t117*t162*t82-9.468163648505028d+6*t110*t115 7648 = *t162*t82-3.3761480535893296d+1*t112*t113*t161*t82+3.3761 7649 > 480535893296d+1*t110*t111*t161*t82-6.01754400771653d+6*t1 7650 ? 08*t162*t261*t81+1.5275304019588112d+7*t111*t162*t200*t81 7651 @ -1.2729420016323426d+7*t113*t154*t162*t81+3.4716600044518 7652 1 436d+6*t110*t115*t162*t81+3.713762858948263d+1*t108*t154* 7653 2 t161*t81-3.713762858948263d+1*t110*t111*t161*t81)+t134*t9 7654 3 5*(-9.232684300601568d+2*t128*t78*t97+9.232684300601568d+ 7655 4 2*t107*t126*t78*t97+9.232684300601568d+2*t128*t77*t97+2.7 7656 5 69805290180471d+3*t124*t127*t77*t97-3.693073720240627d+3* 7657 6 t107*t126*t77*t97-8.309415870541413d+3*t124*t127*t76*t97+ 7658 7 2.769805290180471d+3*t107*t126*t76*t97+5.539610580360942d 7659 8 +3*t122*t125*t76*t97+5.539610580360942d+3*t124*t127*t75*t 7660 9 97-1.4772294880962508d+4*t122*t125*t75*t97+9.232684300601 7661 : 568d+3*t120*t123*t75*t97+9.232684300601568d+3*t122*t125*t 7662 ; 74*t97-2.308171075150392d+4*t120*t123*t74*t97+1.384902645 7663 < 0902355d+4*t118*t121*t74*t97+1.3849026450902355d+4*t120*t 7664 = 123*t73*t97-3.323766348216566d+4*t118*t121*t73*t97+1.9388 7665 > 637031263292d+4*t116*t119*t73*t97+1.9388637031263292d+4*t 7666 ? 118*t121*t72*t97-4.5240153072947686d+4*t116*t119*t72*t97+ 7667 @ 2.585151604168439d+4*t114*t117*t72*t97+2.585151604168439d 7668 1 +4*t116*t119*t71*t97-5.908917952385003d+4*t114*t117*t71*t 7669 2 97+3.3237663482165647d+4*t112*t115*t71*t97+3.323766348216 7670 3 5647d+4*t114*t117*t70*t97-7.478474283487271d+4*t112*t115* 7671 4 t70*t97+4.1547079352707056d+4*t110*t113*t70*t97+5.0779763 7672 5 65330862d+4*t111*t154*t69*t97+4.154707935270705d+4*t112*t 7673 6 115*t69*t97-9.232684300601568d+4*t110*t113*t69*t97+6.0935 7674 7 71638397036d+4*t108*t200*t68*t97-1.1171548003727898d+5*t1 7675 8 11*t154*t68*t97+5.077976365330863d+4*t110*t113*t68*t97+2. 7676 9 104036366334451d+4*t126*t162*t78-2.104036366334451d+4*t10 7677 : 7*t124*t162*t78-3.37614805358933d+0*t129*t161*t78+3.37614 7678 ; 805358933d+0*t107*t128*t161*t78-8.416145465337804d+4*t122 7679 < *t127*t162*t77-4.208072732668902d+4*t126*t162*t77+1.26242 7680 = 18198006704d+5*t107*t124*t162*t77-6.75229610717866d+0*t10 7681 > 7*t128*t161*t77+6.75229610717866d+0*t126*t127*t161*t77+3. 7682 ? 787265459402013d+5*t122*t127*t162*t76+2.104036366334451d+ 7683 @ 4*t126*t162*t76-2.104036366334451d+5*t120*t125*t162*t76-1 7684 1 .8936327297010064d+5*t107*t124*t162*t76-1.012844416076799 7685 2 1d+1*t126*t127*t161*t76+1.0128444160767991d+1*t124*t125*t 7686 3 161*t76-5.049687279202681d+5*t122*t127*t162*t75+8.4161454 7687 4 65337803d+5*t120*t125*t162*t75+8.416145465337804d+4*t107* 7688 5 t124*t162*t75-4.2080727326689016d+5*t118*t123*t162*t75-1. 7689 6 350459221435732d+1*t124*t125*t161*t75+1.350459221435732d+ 7690 7 1*t122*t123*t161*t75+2.1040363663344508d+5*t122*t127*t162 7691 8 *t74-1.0520181831672254d+6*t120*t125*t162*t74+1.578027274 7692 9 750838d+6*t118*t123*t162*t74-7.364127282170578d+5*t116*t1 7693 : 21*t162*t74-1.6880740267946648d+1*t122*t123*t161*t74+1.68 7694 ; 80740267946648d+1*t120*t121*t161*t74+4.208072732668902d+5 7695 < *t120*t125*t162*t73-1.893632729701006d+6*t118*t123*t162*t 7696 = 73+2.6510858215814087d+6*t116*t121*t162*t73-1.17826036514 7697 > 72927d+6*t114*t119*t162*t73-2.0256888321535982d+1*t120*t1 7698 ? 21*t161*t73+2.0256888321535982d+1*t118*t119*t161*t73+7.36 7699 @ 4127282170578d+5*t118*t123*t162*t72-3.0929334585116436d+6 7700 1 *t116*t121*t162*t72+4.123911278015524d+6*t114*t119*t162*t 7701 2 72-1.7673905477209387d+6*t112*t117*t162*t72-2.36330363751 7702 3 25308d+1*t118*t119*t161*t72+2.3633036375125308d+1*t116*t1 7703 4 17*t161*t72+1.1782603651472927d+6*t116*t121*t162*t71-4.71 7704 5 3041460589171d+6*t114*t119*t162*t71+6.059624735043219d+6* 7705 6 t112*t117*t162*t71-2.524843639601341d+6*t110*t115*t162*t7 7706 7 1-2.700918442871464d+1*t116*t117*t161*t71+2.7009184428714 7707 8 64d+1*t114*t115*t161*t71-3.4716600044518436d+6*t113*t154* 7708 9 t162*t70+1.767390547720939d+6*t114*t119*t162*t70-6.817077 7709 : 826923622d+6*t112*t117*t162*t70+8.521347283654526d+6*t110 7710 ; *t115*t162*t70-3.0385332482303967d+1*t114*t115*t161*t70+3 7711 < .0385332482303967d+1*t112*t113*t161*t70-4.628880005935792 7712 = d+6*t111*t162*t200*t69+1.1572200014839477d+7*t113*t154*t1 7713 > 62*t69+2.524843639601341d+6*t112*t117*t162*t69-9.46816364 7714 ? 8505028d+6*t110*t115*t162*t69-3.3761480535893296d+1*t112* 7715 @ t113*t161*t69+3.3761480535893296d+1*t110*t111*t161*t69-6. 7716 1 01754400771653d+6*t108*t162*t261*t68+1.5275304019588112d+ 7717 2 7*t111*t162*t200*t68-1.2729420016323426d+7*t113*t154*t162 7718 3 *t68+3.4716600044518436d+6*t110*t115*t162*t68+3.713762858 7719 4 948263d+1*t108*t154*t161*t68-3.713762858948263d+1*t110*t1 7720 5 11*t161*t68)-9.305257363491002d-1*t104*t132*t96*(-9.23268 7721 6 4300601568d+2*t128*t64*t97+9.232684300601568d+2*t107*t126 7722 7 *t64*t97+9.232684300601568d+2*t128*t63*t97+2.769805290180 7723 8 471d+3*t124*t127*t63*t97-3.693073720240627d+3*t107*t126*t 7724 9 63*t97-8.309415870541413d+3*t124*t127*t62*t97+2.769805290 7725 : 180471d+3*t107*t126*t62*t97+5.539610580360942d+3*t122*t12 7726 ; 5*t62*t97+5.539610580360942d+3*t124*t127*t61*t97-1.477229 7727 < 4880962508d+4*t122*t125*t61*t97+9.232684300601568d+3*t120 7728 = *t123*t61*t97+9.232684300601568d+3*t122*t125*t60*t97-2.30 7729 > 8171075150392d+4*t120*t123*t60*t97+1.3849026450902355d+4* 7730 ? t118*t121*t60*t97+1.3849026450902355d+4*t120*t123*t59*t97 7731 @ -3.323766348216566d+4*t118*t121*t59*t97+1.938863703126329 7732 1 2d+4*t116*t119*t59*t97+1.9388637031263292d+4*t118*t121*t5 7733 2 8*t97-4.5240153072947686d+4*t116*t119*t58*t97+2.585151604 7734 3 168439d+4*t114*t117*t58*t97+2.585151604168439d+4*t116*t11 7735 4 9*t57*t97-5.908917952385003d+4*t114*t117*t57*t97+3.323766 7736 5 3482165647d+4*t112*t115*t57*t97+3.3237663482165647d+4*t11 7737 6 4*t117*t56*t97-7.478474283487271d+4*t112*t115*t56*t97+4.1 7738 7 547079352707056d+4*t110*t113*t56*t97+5.077976365330862d+4 7739 8 *t111*t154*t55*t97+4.154707935270705d+4*t112*t115*t55*t97 7740 9 -9.232684300601568d+4*t110*t113*t55*t97+6.093571638397036 7741 : d+4*t108*t200*t54*t97-1.1171548003727898d+5*t111*t154*t54 7742 ; *t97+5.077976365330863d+4*t110*t113*t54*t97+2.10403636633 7743 < 4451d+4*t126*t162*t64-2.104036366334451d+4*t107*t124*t162 7744 = *t64-3.37614805358933d+0*t129*t161*t64+3.37614805358933d+ 7745 > 0*t107*t128*t161*t64-8.416145465337804d+4*t122*t127*t162* 7746 ? t63-4.208072732668902d+4*t126*t162*t63+1.2624218198006704 7747 @ d+5*t107*t124*t162*t63-6.75229610717866d+0*t107*t128*t161 7748 1 *t63+6.75229610717866d+0*t126*t127*t161*t63+3.78726545940 7749 2 2013d+5*t122*t127*t162*t62+2.104036366334451d+4*t126*t162 7750 3 *t62-2.104036366334451d+5*t120*t125*t162*t62-1.8936327297 7751 4 010064d+5*t107*t124*t162*t62-1.0128444160767991d+1*t126*t 7752 5 127*t161*t62+1.0128444160767991d+1*t124*t125*t161*t62-5.0 7753 6 49687279202681d+5*t122*t127*t162*t61+8.416145465337803d+5 7754 7 *t120*t125*t162*t61+8.416145465337804d+4*t107*t124*t162*t 7755 8 61-4.2080727326689016d+5*t118*t123*t162*t61-1.35045922143 7756 9 5732d+1*t124*t125*t161*t61+1.350459221435732d+1*t122*t123 7757 : *t161*t61+2.1040363663344508d+5*t122*t127*t162*t60-1.0520 7758 ; 181831672254d+6*t120*t125*t162*t60+1.578027274750838d+6*t 7759 < 118*t123*t162*t60-7.364127282170578d+5*t116*t121*t162*t60 7760 = -1.6880740267946648d+1*t122*t123*t161*t60+1.6880740267946 7761 > 648d+1*t120*t121*t161*t60+4.208072732668902d+5*t120*t125* 7762 ? t162*t59-1.893632729701006d+6*t118*t123*t162*t59+2.651085 7763 @ 8215814087d+6*t116*t121*t162*t59-1.1782603651472927d+6*t1 7764 1 14*t119*t162*t59-2.0256888321535982d+1*t120*t121*t161*t59 7765 2 +2.0256888321535982d+1*t118*t119*t161*t59+7.3641272821705 7766 3 78d+5*t118*t123*t162*t58-3.0929334585116436d+6*t116*t121* 7767 4 t162*t58+4.123911278015524d+6*t114*t119*t162*t58-1.767390 7768 5 5477209387d+6*t112*t117*t162*t58-2.3633036375125308d+1*t1 7769 6 18*t119*t161*t58+2.3633036375125308d+1*t116*t117*t161*t58 7770 7 +1.1782603651472927d+6*t116*t121*t162*t57-4.7130414605891 7771 8 71d+6*t114*t119*t162*t57+6.059624735043219d+6*t112*t117*t 7772 9 162*t57-2.524843639601341d+6*t110*t115*t162*t57-2.7009184 7773 : 42871464d+1*t116*t117*t161*t57+2.700918442871464d+1*t114* 7774 ; t115*t161*t57-3.4716600044518436d+6*t113*t154*t162*t56+1. 7775 < 767390547720939d+6*t114*t119*t162*t56-6.817077826923622d+ 7776 = 6*t112*t117*t162*t56+8.521347283654526d+6*t110*t115*t162* 7777 > t56-3.0385332482303967d+1*t114*t115*t161*t56+3.0385332482 7778 ? 303967d+1*t112*t113*t161*t56-4.628880005935792d+6*t111*t1 7779 @ 62*t200*t55+1.1572200014839477d+7*t113*t154*t162*t55+2.52 7780 1 4843639601341d+6*t112*t117*t162*t55-9.468163648505028d+6* 7781 2 t110*t115*t162*t55-3.3761480535893296d+1*t112*t113*t161*t 7782 3 55+3.3761480535893296d+1*t110*t111*t161*t55-6.01754400771 7783 4 653d+6*t108*t162*t261*t54+1.5275304019588112d+7*t111*t162 7784 5 *t200*t54-1.2729420016323426d+7*t113*t154*t162*t54+3.4716 7785 6 600044518436d+6*t110*t115*t162*t54+3.713762858948263d+1*t 7786 7 108*t154*t161*t54-3.713762858948263d+1*t110*t111*t161*t54 7787 8 )-9.305257363491002d-1*t104*t95*t96*(-9.232684300601568d+ 7788 9 2*t128*t48*t97+9.232684300601568d+2*t107*t126*t48*t97+9.2 7789 : 32684300601568d+2*t128*t45*t97+2.769805290180471d+3*t124* 7790 ; t127*t45*t97-3.693073720240627d+3*t107*t126*t45*t97-8.309 7791 < 415870541413d+3*t124*t127*t42*t97+2.769805290180471d+3*t1 7792 = 07*t126*t42*t97+5.539610580360942d+3*t122*t125*t42*t97+5. 7793 > 539610580360942d+3*t124*t127*t39*t97-1.4772294880962508d+ 7794 ? 4*t122*t125*t39*t97+9.232684300601568d+3*t120*t123*t39*t9 7795 @ 7+9.232684300601568d+3*t122*t125*t36*t97-2.30817107515039 7796 1 2d+4*t120*t123*t36*t97+1.3849026450902355d+4*t118*t121*t3 7797 2 6*t97+1.3849026450902355d+4*t120*t123*t33*t97-3.323766348 7798 3 216566d+4*t118*t121*t33*t97+1.9388637031263292d+4*t116*t1 7799 4 19*t33*t97+1.9388637031263292d+4*t118*t121*t30*t97-4.5240 7800 5 153072947686d+4*t116*t119*t30*t97+2.585151604168439d+4*t1 7801 6 14*t117*t30*t97+2.585151604168439d+4*t116*t119*t27*t97-5. 7802 7 908917952385003d+4*t114*t117*t27*t97+3.3237663482165647d+ 7803 8 4*t112*t115*t27*t97+3.3237663482165647d+4*t114*t117*t24*t 7804 9 97-7.478474283487271d+4*t112*t115*t24*t97+4.1547079352707 7805 : 056d+4*t110*t113*t24*t97+5.077976365330862d+4*t111*t154*t 7806 ; 21*t97+4.154707935270705d+4*t112*t115*t21*t97-9.232684300 7807 < 601568d+4*t110*t113*t21*t97+6.093571638397036d+4*t108*t14 7808 = *t200*t97-1.1171548003727898d+5*t111*t14*t154*t97+5.07797 7809 > 6365330863d+4*t110*t113*t14*t97+2.104036366334451d+4*t126 7810 ? *t162*t48-2.104036366334451d+4*t107*t124*t162*t48-3.37614 7811 @ 805358933d+0*t129*t161*t48+3.37614805358933d+0*t107*t128* 7812 1 t161*t48-8.416145465337804d+4*t122*t127*t162*t45-4.208072 7813 2 732668902d+4*t126*t162*t45+1.2624218198006704d+5*t107*t12 7814 3 4*t162*t45-6.75229610717866d+0*t107*t128*t161*t45+6.75229 7815 4 610717866d+0*t126*t127*t161*t45+3.787265459402013d+5*t122 7816 5 *t127*t162*t42+2.104036366334451d+4*t126*t162*t42-2.10403 7817 6 6366334451d+5*t120*t125*t162*t42-1.8936327297010064d+5*t1 7818 7 07*t124*t162*t42-1.0128444160767991d+1*t126*t127*t161*t42 7819 8 +1.0128444160767991d+1*t124*t125*t161*t42-5.0496872792026 7820 9 81d+5*t122*t127*t162*t39+8.416145465337803d+5*t120*t125*t 7821 : 162*t39+8.416145465337804d+4*t107*t124*t162*t39-4.2080727 7822 ; 326689016d+5*t118*t123*t162*t39-1.350459221435732d+1*t124 7823 < *t125*t161*t39+1.350459221435732d+1*t122*t123*t161*t39+2. 7824 = 1040363663344508d+5*t122*t127*t162*t36-1.0520181831672254 7825 > d+6*t120*t125*t162*t36+1.578027274750838d+6*t118*t123*t16 7826 ? 2*t36-7.364127282170578d+5*t116*t121*t162*t36-1.688074026 7827 @ 7946648d+1*t122*t123*t161*t36+1.6880740267946648d+1*t120* 7828 1 t121*t161*t36+4.208072732668902d+5*t120*t125*t162*t33-1.8 7829 2 93632729701006d+6*t118*t123*t162*t33+2.6510858215814087d+ 7830 3 6*t116*t121*t162*t33-1.1782603651472927d+6*t114*t119*t162 7831 4 *t33-2.0256888321535982d+1*t120*t121*t161*t33+2.025688832 7832 5 1535982d+1*t118*t119*t161*t33+7.364127282170578d+5*t118*t 7833 6 123*t162*t30-3.0929334585116436d+6*t116*t121*t162*t30+4.1 7834 7 23911278015524d+6*t114*t119*t162*t30-1.7673905477209387d+ 7835 8 6*t112*t117*t162*t30-2.3633036375125308d+1*t118*t119*t161 7836 9 *t30+2.3633036375125308d+1*t116*t117*t161*t30+1.178260365 7837 : 1472927d+6*t116*t121*t162*t27-4.713041460589171d+6*t114*t 7838 ; 119*t162*t27+6.059624735043219d+6*t112*t117*t162*t27-2.52 7839 < 4843639601341d+6*t110*t115*t162*t27-2.700918442871464d+1* 7840 = t116*t117*t161*t27+2.700918442871464d+1*t114*t115*t161*t2 7841 > 7-6.01754400771653d+6*t108*t14*t162*t261-3.47166000445184 7842 ? 36d+6*t113*t154*t162*t24+1.767390547720939d+6*t114*t119*t 7843 @ 162*t24-6.817077826923622d+6*t112*t117*t162*t24+8.5213472 7844 1 83654526d+6*t110*t115*t162*t24-3.0385332482303967d+1*t114 7845 2 *t115*t161*t24+3.0385332482303967d+1*t112*t113*t161*t24-4 7846 3 .628880005935792d+6*t111*t162*t200*t21+1.1572200014839477 7847 4 d+7*t113*t154*t162*t21+2.524843639601341d+6*t112*t117*t16 7848 5 2*t21-9.468163648505028d+6*t110*t115*t162*t21-3.376148053 7849 6 5893296d+1*t112*t113*t161*t21+3.3761480535893296d+1*t110* 7850 7 t111*t161*t21+1.5275304019588112d+7*t111*t14*t162*t200-1. 7851 8 2729420016323426d+7*t113*t14*t154*t162+3.4716600044518436 7852 9 d+6*t110*t115*t14*t162+3.713762858948263d+1*t108*t14*t154 7853 : *t161-3.713762858948263d+1*t110*t111*t14*t161)-3.72210294 7854 ; 53964005d+0*t130*t213*t95*t97-3.7221029453964005d+0*t104* 7855 < t201*t95*t97-7.444205890792801d+0*t155*t167*t95*t97-3.722 7856 = 1029453964005d+0*t132*t133*t213*t97-3.7221029453964005d+0 7857 > *t104*t132*t202*t97-7.444205890792801d+0*t132*t156*t167*t 7858 ? 97-9.305257363491002d-1*t130*t267*t95*t96-2.7915772090473 7859 @ 007d+0*t155*t213*t95*t96-2.7915772090473007d+0*t167*t201* 7860 1 t95*t96-9.305257363491002d-1*t132*t133*t267*t96-2.7915772 7861 2 090473007d+0*t132*t156*t213*t96-2.7915772090473007d+0*t13 7862 3 2*t167*t202*t96+t165*(-1.2407009817988002d+0*t130*t167*t9 7863 4 5-1.2407009817988002d+0*t104*t155*t95+3.983592671062089d- 7864 5 3*gammabb*t104*t130*t159*t168+2.2404517531258392d-3*gamma 7865 6 bb*t104*t131*t133*t168-1.2407009817988002d+0*t132*t133*t1 7866 7 67-1.2407009817988002d+0*t104*t132*t156)+t135*t271*t95+3* 7867 8 t157*t216*t95+3*t169*t203*t95+t132*t136*t271-1.6481899623 7868 9 499732d-1*gammabb*t134*t135*t159*t270-9.269748178462429d- 7869 : 2*gammabb*t131*t134*t136*t270+2.5387780752001543d-3*t134* 7870 ; t135*t205*t206*t269+5.84834598311815d-4*t131*t134*t136*t2 7871 < 05*t269-8.295189532329142d-6*t134*t135*t262*t263*t268-5.2 7872 = 17843141140167d-7*t131*t134*t136*t262*t268+2.987694503296 7873 > 569d-2*gammabb*t104*t130*t159*t266+1.6803388148443793d-2* 7874 ? gammabb*t104*t131*t133*t266-1.5033443968152754d-3*t104*t1 7875 @ 30*t205*t206*t265-3.4631141060506576d-4*t104*t131*t133*t2 7876 1 05*t265+7.718887347725925d-6*t104*t130*t262*t263*t264+4.8 7877 2 55337331063556d-7*t104*t131*t133*t262*t264-3.666666666666 7878 3 6664d+0*t215*t221+t206*t214*(2.3960893036683073d-2*gammab 7879 4 b*t220-2.3079800683637772d-4*t135*t169*t205-2.30798006836 7880 5 37772d-4*t134*t157*t205)-3.6666666666666664d+0*t159*t215* 7881 6 t220-2.3333333333333334d+0*t208*t219-6.666666666666666d-1 7882 7 *t211*t218+t206*t207*(2.3960893036683073d-2*gammabb*t217+ 7883 8 2.1476348525932504d-4*t130*t167*t205+2.1476348525932504d- 7884 9 4*t104*t155*t205)-2.3333333333333334d+0*t159*t208*t217+t1 7885 : 68*(-1.6252155897304255d-2*gammabb*t131*t136*t216-1.06333 7886 ; 5633294209d-4*t131*t136*t168*t169*t205-1.063335633294209d 7887 < -4*t131*t134*t158*t168*t205-1.6252155897304255d-2*gammabb 7888 = *t131*t134*t204-3.250431179460851d-2*gammabb*t131*t158*t1 7889 > 69)+t159*t168*(-2.8896837002239784d-2*gammabb*t135*t216-2 7890 ? .8896837002239784d-2*gammabb*t134*t203-5.779367400447957d 7891 @ -2*gammabb*t157*t169)+3*t132*t158*t216+(1.986374609670520 7892 1 4d-2*gammabb*t131*t136*t169+1.9863746096705204d-2*gammabb 7893 2 *t131*t134*t158)*t215+t159*(3.5318356336070855d-2*gammabb 7894 3 *t135*t169+3.5318356336070855d-2*gammabb*t134*t157)*t215+ 7895 4 (-5.316678166471045d-5*t131*t136*t169*t205-5.316678166471 7896 5 045d-5*t131*t134*t158*t205)*t214+t160*(1.5123049333599414 7897 6 d-2*gammabb*t131*t133*t213+9.894611731573306d-5*t131*t133 7898 7 *t167*t168*t205+9.894611731573306d-5*t104*t131*t156*t168* 7899 8 t205+1.5123049333599414d-2*gammabb*t104*t131*t202+3.02460 7900 9 9866719883d-2*gammabb*t131*t156*t167)+t159*t160*(2.688925 7901 : 0529669106d-2*gammabb*t130*t213+2.6889250529669106d-2*gam 7902 ; mabb*t104*t201+5.377850105933821d-2*gammabb*t155*t167)+(8 7903 < .401694074221897d-3*gammabb*t131*t133*t167+8.401694074221 7904 = 897d-3*gammabb*t104*t131*t156)*t208+t159*(1.4938472516482 7905 > 826d-2*gammabb*t130*t167+1.4938472516482826d-2*gammabb*t1 7906 ? 04*t155)*t208+(4.947305865786653d-5*t131*t133*t167*t205+4 7907 @ .947305865786653d-5*t104*t131*t156*t205)*t207+3*t132*t169 7908 1 *t204)*wght+Amat3(iq,D3_RB_RB_RB) 7909 Cmat3(iq,D3_RA_RA_GAA) = 1.0d+0*(t1*(2.0315194871630324d-3*t 7910 1 194*t51*t92+2.0315194871630324d-3*t182*t51*t66+4.06303897 7911 2 4326065d-3*t141*t153*t51)+t152*(3.9875086248532843d-5*gam 7912 3 maaa*t1*t153*t51*t92-1.0834770598202839d-2*t153*t51*t92+3 7913 4 .9875086248532843d-5*gammaaa*t1*t141*t51*t66-1.0834770598 7914 5 202839d-2*t141*t51*t66)+1.956691177927563d-7*t183*t273*t5 7915 6 1*t66*t92+1.9863746096705204d-2*t193*t51*t66*t92-1.794378 7916 7 8811839778d-4*gammaaa*t192*t51*t66*t92+t1*t142*(3.6121046 7917 8 25279974d-3*t194*t79+3.612104625279974d-3*t181*t66+7.2242 7918 9 09250559948d-3*t140*t153)+t142*t152*(-1.9264558001493193d 7919 : -2*t153*t79-1.9264558001493193d-2*t140*t66)+3.11069607462 7920 ; 34286d-6*t183*t252*t273*t66*t79+3.5318356336070855d-2*t14 7921 < 2*t193*t66*t79-7.789432730727747d-4*gammaaa*t184*t192*t66 7922 = *t79+t144*(-1.890381166699927d-3*t191*t51*t65-1.890381166 7923 > 699927d-3*t12*t180*t51-3.780762333399854d-3*t139*t151*t51 7924 ? )+t143*(-3.71047939933999d-5*gammaaa*t1*t151*t51*t65+5.04 7925 @ 1016444533138d-3*t151*t51*t65-3.71047939933999d-5*gammaaa 7926 1 *t1*t12*t139*t51+5.041016444533138d-3*t12*t139*t51)+t149* 7927 2 (-8.401694074221898d-4*t1*t12*t51*t65-1.4938472516482837d 7928 3 -3*t1*t12*t142*t50)-1.8207514991488338d-7*t12*t183*t272*t 7929 4 51*t65-5.041016444533138d-3*t12*t186*t51*t65+1.1749851431 7930 5 243302d-4*gammaaa*t12*t185*t51*t65+t142*t144*(-3.36115631 7931 6 6208638d-3*t191*t50-3.361156316208638d-3*t12*t179-6.72231 7932 7 2632417276d-3*t138*t151)+t142*t143*(8.963083509889702d-3* 7933 8 t151*t50+8.963083509889702d-3*t12*t138)-2.894582755397221 7934 9 4d-6*t12*t183*t252*t272*t50-8.963083509889707d-3*t12*t142 7935 : *t186*t50+5.100632774908971d-4*gammaaa*t12*t184*t185*t50- 7936 ; 8.985334888756153d-3*t184*t198*t223-8.985334888756153d-3* 7937 < t184*t195*t222)*wght+Cmat3(iq,D3_RA_RA_GAA) 7938 Cmat3(iq,D3_RA_RA_GAB) = Cmat3(iq,D3_RA_RA_GAB) 7939 Cmat3(iq,D3_RA_RA_GBB) = Cmat3(iq,D3_RA_RA_GBB) 7940 Cmat3(iq,D3_RA_RB_GAA) = Cmat3(iq,D3_RA_RB_GAA) 7941 Cmat3(iq,D3_RA_RB_GAB) = Cmat3(iq,D3_RA_RB_GAB) 7942 Cmat3(iq,D3_RA_RB_GBB) = Cmat3(iq,D3_RA_RB_GBB) 7943 Cmat3(iq,D3_RB_RB_GAA) = Cmat3(iq,D3_RB_RB_GAA) 7944 Cmat3(iq,D3_RB_RB_GAB) = Cmat3(iq,D3_RB_RB_GAB) 7945 Cmat3(iq,D3_RB_RB_GBB) = 1.0d+0*(t168*(3.9875086248532843d-5 7946 1 *gammabb*t131*t136*t169*t93+3.9875086248532843d-5*gammabb 7947 2 *t131*t134*t158*t93-1.0834770598202839d-2*t131*t136*t169- 7948 3 1.0834770598202839d-2*t131*t134*t158)+t160*(-3.7104793993 7949 4 3999d-5*gammabb*t131*t133*t167*t93-3.71047939933999d-5*ga 7950 5 mmabb*t104*t131*t156*t93+5.041016444533138d-3*t131*t133*t 7951 6 167+5.041016444533138d-3*t104*t131*t156)+t165*(-1.4938472 7952 7 516482837d-3*t104*t130*t159*t93-8.401694074221898d-4*t104 7953 8 *t131*t133*t93)+(2.0315194871630324d-3*t131*t136*t216+2.0 7954 9 315194871630324d-3*t131*t134*t204+4.063038974326065d-3*t1 7955 : 31*t158*t169)*t93+t159*(3.612104625279974d-3*t135*t216+3. 7956 ; 612104625279974d-3*t134*t203+7.224209250559948d-3*t157*t1 7957 < 69)*t93+3.1106960746234286d-6*t134*t135*t205*t263*t275+1. 7958 = 956691177927563d-7*t131*t134*t136*t205*t275-2.89458275539 7959 > 72214d-6*t104*t130*t205*t263*t274-1.8207514991488338d-7*t 7960 ? 104*t131*t133*t205*t274-8.985334888756153d-3*t206*t220*t2 7961 @ 27-8.985334888756153d-3*t206*t217*t226+3.5318356336070855 7962 1 d-2*t134*t135*t159*t215+1.9863746096705204d-2*t131*t134*t 7963 2 136*t215-7.789432730727747d-4*gammabb*t134*t135*t206*t214 7964 3 -1.7943788811839778d-4*gammabb*t131*t134*t136*t214+t161*( 7965 4 -1.890381166699927d-3*t131*t133*t213-1.890381166699927d-3 7966 5 *t104*t131*t202-3.780762333399854d-3*t131*t156*t167)+t159 7967 6 *t161*(-3.361156316208638d-3*t130*t213-3.361156316208638d 7968 7 -3*t104*t201-6.722312632417276d-3*t155*t167)-8.9630835098 7969 8 89707d-3*t104*t130*t159*t208-5.041016444533138d-3*t104*t1 7970 9 31*t133*t208+5.100632774908971d-4*gammabb*t104*t130*t206* 7971 : t207+1.1749851431243302d-4*gammabb*t104*t131*t133*t207+t1 7972 ; 59*t168*(-1.9264558001493193d-2*t135*t169-1.9264558001493 7973 < 193d-2*t134*t157)+t159*t160*(8.963083509889702d-3*t130*t1 7974 = 67+8.963083509889702d-3*t104*t155))*wght+Cmat3(iq,D3_RB_R 7975 > B_GBB) 7976 Cmat3(iq,D3_RA_GAA_GAA) = 1.0d+0*(t1*(-7.476578671599909d-6* 7977 1 t1*t153*t51*t92-7.476578671599909d-6*t1*t141*t51*t66)-7.3 7978 2 37591917228362d-8*gammaaa*t277*t51*t66*t92+3.987508624853 7979 3 2843d-5*t223*t51*t66*t92-1.1665110279837858d-6*gammaaa*t2 7980 4 52*t277*t66*t79+1.7309850512728328d-4*t184*t223*t66*t79+t 7981 5 144*(6.957148873762482d-6*t1*t151*t51*t65+6.9571488737624 7982 6 82d-6*t1*t12*t139*t51)+6.827818121808127d-8*gammaaa*t12*t 7983 7 276*t51*t65-2.7828595495049924d-5*t12*t222*t51*t65+1.0854 7984 8 685332739583d-6*gammaaa*t12*t252*t276*t50-1.2080446045837 7985 9 034d-4*t12*t184*t222*t50-8.985334888756153d-3*t184*t225*t 7986 : 231-8.985334888756153d-3*t184*t224*t230)*wght+Cmat3(iq,D3 7987 ; _RA_GAA_GAA) 7988 Cmat3(iq,D3_RA_GAA_GAB) = Cmat3(iq,D3_RA_GAA_GAB) 7989 Cmat3(iq,D3_RA_GAA_GBB) = Cmat3(iq,D3_RA_GAA_GBB) 7990 Cmat3(iq,D3_RA_GAB_GAB) = Cmat3(iq,D3_RA_GAB_GAB) 7991 Cmat3(iq,D3_RA_GAB_GBB) = Cmat3(iq,D3_RA_GAB_GBB) 7992 Cmat3(iq,D3_RA_GBB_GBB) = Cmat3(iq,D3_RA_GBB_GBB) 7993 Cmat3(iq,D3_RB_GAA_GAA) = Cmat3(iq,D3_RB_GAA_GAA) 7994 Cmat3(iq,D3_RB_GAA_GAB) = Cmat3(iq,D3_RB_GAA_GAB) 7995 Cmat3(iq,D3_RB_GAA_GBB) = Cmat3(iq,D3_RB_GAA_GBB) 7996 Cmat3(iq,D3_RB_GAB_GAB) = Cmat3(iq,D3_RB_GAB_GAB) 7997 Cmat3(iq,D3_RB_GAB_GBB) = Cmat3(iq,D3_RB_GAB_GBB) 7998 Cmat3(iq,D3_RB_GBB_GBB) = 1.0d+0*(t93*(-7.476578671599909d-6 7999 1 *t131*t136*t169*t93-7.476578671599909d-6*t131*t134*t158*t 8000 2 93)+t161*(6.957148873762482d-6*t131*t133*t167*t93+6.95714 8001 3 8873762482d-6*t104*t131*t156*t93)-1.1665110279837858d-6*g 8002 4 ammabb*t134*t135*t263*t279-7.337591917228362d-8*gammabb*t 8003 5 131*t134*t136*t279+1.0854685332739583d-6*gammabb*t104*t13 8004 6 0*t263*t278+6.827818121808127d-8*gammabb*t104*t131*t133*t 8005 7 278-8.985334888756153d-3*t206*t229*t233-8.985334888756153 8006 8 d-3*t206*t228*t232+1.7309850512728328d-4*t134*t135*t206*t 8007 9 227+3.9875086248532843d-5*t131*t134*t136*t227-1.208044604 8008 : 5837034d-4*t104*t130*t206*t226-2.7828595495049924d-5*t104 8009 ; *t131*t133*t226)*wght+Cmat3(iq,D3_RB_GBB_GBB) 8010 Cmat3(iq,D3_GAA_GAA_GAA) = 1.0d+0*(2.751596968960636d-8*t281 8011 1 *t51*t66*t92+4.374416354939197d-7*t252*t281*t66*t79-2.560 8012 2 431795678048d-8*t12*t280*t51*t65-4.070506999777343d-7*t12 8013 3 *t252*t280*t50)*wght+Cmat3(iq,D3_GAA_GAA_GAA) 8014 Cmat3(iq,D3_GAA_GAA_GAB) = Cmat3(iq,D3_GAA_GAA_GAB) 8015 Cmat3(iq,D3_GAA_GAA_GBB) = Cmat3(iq,D3_GAA_GAA_GBB) 8016 Cmat3(iq,D3_GAA_GAB_GAB) = Cmat3(iq,D3_GAA_GAB_GAB) 8017 Cmat3(iq,D3_GAA_GAB_GBB) = Cmat3(iq,D3_GAA_GAB_GBB) 8018 Cmat3(iq,D3_GAA_GBB_GBB) = Cmat3(iq,D3_GAA_GBB_GBB) 8019 Cmat3(iq,D3_GAB_GAB_GAB) = Cmat3(iq,D3_GAB_GAB_GAB) 8020 Cmat3(iq,D3_GAB_GAB_GBB) = Cmat3(iq,D3_GAB_GAB_GBB) 8021 Cmat3(iq,D3_GAB_GBB_GBB) = Cmat3(iq,D3_GAB_GBB_GBB) 8022 Cmat3(iq,D3_GBB_GBB_GBB) = 1.0d+0*(4.374416354939197d-7*t134 8023 1 *t135*t263*t283+2.751596968960636d-8*t131*t134*t136*t283- 8024 2 4.070506999777343d-7*t104*t130*t263*t282-2.56043179567804 8025 3 8d-8*t104*t131*t133*t282)*wght+Cmat3(iq,D3_GBB_GBB_GBB) 8026 Mmat3(iq,D3_RA_RA_TA) = 1.0d+0*(t52*t66*(4.0513776643071964d 8027 1 +1*t17*t44*t6*t91+9.232684300601569d+2*t4*t44*t91-2.76980 8028 2 5290180471d+3*t17*t4*t41*t91-4.0513776643071964d+1*t47*t6 8029 3 *t90+1.2154132992921589d+2*t41*t46*t6*t90-1.1079221160721 8030 4 883d+4*t38*t4*t46*t90+1.846536860120314d+3*t4*t44*t90+5.5 8031 5 39610580360942d+3*t17*t4*t41*t90-1.2154132992921589d+2*t1 8032 6 7*t44*t6*t89+2.4308265985843178d+2*t38*t43*t6*t89+1.66188 8033 7 31741082832d+4*t38*t4*t46*t89-2.769805290180471d+3*t4*t44 8034 8 *t89-2.769805290180471d+4*t35*t4*t43*t89+8.30941587054141 8035 9 6d+3*t17*t4*t41*t89-2.4308265985843178d+2*t41*t46*t6*t88+ 8036 : 4.0513776643071964d+2*t35*t40*t6*t88+2.2158442321443766d+ 8037 ; 4*t38*t4*t46*t88+3.693073720240629d+4*t35*t4*t43*t88-1.10 8038 < 79221160721883d+4*t17*t4*t41*t88-5.539610580360941d+4*t32 8039 = *t4*t40*t88-4.051377664307196d+2*t38*t43*t6*t87+6.0770664 8040 > 96460793d+2*t32*t37*t6*t87-2.7698052901804704d+4*t38*t4*t 8041 ? 46*t87+4.616342150300784d+4*t35*t4*t43*t87+6.924513225451 8042 @ 174d+4*t32*t4*t40*t87-9.694318515631648d+4*t29*t37*t4*t87 8043 1 -6.077066496460795d+2*t35*t40*t6*t86+8.507893095045113d+2 8044 2 *t29*t34*t6*t86-5.539610580360942d+4*t35*t4*t43*t86+8.309 8045 3 415870541416d+4*t32*t4*t40*t86+1.1633182218757979d+5*t29* 8046 4 t37*t4*t86-1.5510909625010638d+5*t26*t34*t4*t86-8.5078930 8047 5 95045111d+2*t32*t37*t6*t85+1.1343857460060149d+3*t26*t31* 8048 6 t6*t85-9.694318515631648d+4*t32*t4*t40*t85+1.357204592188 8049 7 4307d+5*t29*t37*t4*t85+1.809606122917908d+5*t26*t34*t4*t8 8050 8 5-2.3266364437515955d+5*t23*t31*t4*t85-1.1343857460060149 8051 9 d+3*t29*t34*t6*t84+1.4584959591505908d+3*t23*t28*t6*t84-1 8052 : .5510909625010635d+5*t29*t37*t4*t84+2.0681212833347515d+5 8053 ; *t26*t34*t4*t84+2.659013078573252d+5*t23*t31*t4*t84-3.323 8054 < 766348216565d+5*t20*t28*t4*t84-1.4584959591505905d+3*t26* 8055 = t31*t6*t83+1.8231199489382383d+3*t20*t25*t6*t83-2.3266364 8056 > 437515952d+5*t26*t34*t4*t83+2.9913897133949086d+5*t23*t31 8057 ? *t4*t83+3.7392371417436354d+5*t20*t28*t4*t83-4.5701787287 8058 @ 977763d+5*t137*t25*t4*t83-1.8231199489382383d+3*t23*t28*t 8059 1 6*t82+2.2282577153689576d+3*t137*t22*t6*t82-3.32376634821 8060 2 65647d+5*t23*t31*t4*t82+4.1547079352707056d+5*t20*t28*t4* 8061 3 t82+5.077976365330863d+5*t137*t25*t4*t82-6.09357163839703 8062 4 5d+5*t178*t22*t4*t82-2.228257715368958d+3*t20*t25*t6*t81+ 8063 5 2.6739092584427493d+3*t178*t18*t6*t81-4.5701787287977763d 8064 6 +5*t20*t28*t4*t81-7.921643129916147d+5*t18*t250*t4*t81+5. 8065 7 585774001863949d+5*t137*t25*t4*t81+6.702928802236738d+5*t 8066 8 178*t22*t4*t81)+t3*t66*(4.0513776643071964d+1*t17*t44*t6* 8067 9 t78+9.232684300601569d+2*t4*t44*t78-2.769805290180471d+3* 8068 : t17*t4*t41*t78-4.0513776643071964d+1*t47*t6*t77+1.2154132 8069 ; 992921589d+2*t41*t46*t6*t77-1.1079221160721883d+4*t38*t4* 8070 < t46*t77+1.846536860120314d+3*t4*t44*t77+5.539610580360942 8071 = d+3*t17*t4*t41*t77-1.2154132992921589d+2*t17*t44*t6*t76+2 8072 > .4308265985843178d+2*t38*t43*t6*t76+1.6618831741082832d+4 8073 ? *t38*t4*t46*t76-2.769805290180471d+3*t4*t44*t76-2.7698052 8074 @ 90180471d+4*t35*t4*t43*t76+8.309415870541416d+3*t17*t4*t4 8075 1 1*t76-2.4308265985843178d+2*t41*t46*t6*t75+4.051377664307 8076 2 1964d+2*t35*t40*t6*t75+2.2158442321443766d+4*t38*t4*t46*t 8077 3 75+3.693073720240629d+4*t35*t4*t43*t75-1.1079221160721883 8078 4 d+4*t17*t4*t41*t75-5.539610580360941d+4*t32*t4*t40*t75-4. 8079 5 051377664307196d+2*t38*t43*t6*t74+6.077066496460793d+2*t3 8080 6 2*t37*t6*t74-2.7698052901804704d+4*t38*t4*t46*t74+4.61634 8081 7 2150300784d+4*t35*t4*t43*t74+6.924513225451174d+4*t32*t4* 8082 8 t40*t74-9.694318515631648d+4*t29*t37*t4*t74-6.07706649646 8083 9 0795d+2*t35*t40*t6*t73+8.507893095045113d+2*t29*t34*t6*t7 8084 : 3-5.539610580360942d+4*t35*t4*t43*t73+8.309415870541416d+ 8085 ; 4*t32*t4*t40*t73+1.1633182218757979d+5*t29*t37*t4*t73-1.5 8086 < 510909625010638d+5*t26*t34*t4*t73-8.507893095045111d+2*t3 8087 = 2*t37*t6*t72+1.1343857460060149d+3*t26*t31*t6*t72-9.69431 8088 > 8515631648d+4*t32*t4*t40*t72+1.3572045921884307d+5*t29*t3 8089 ? 7*t4*t72+1.809606122917908d+5*t26*t34*t4*t72-2.3266364437 8090 @ 515955d+5*t23*t31*t4*t72-1.1343857460060149d+3*t29*t34*t6 8091 1 *t71+1.4584959591505908d+3*t23*t28*t6*t71-1.5510909625010 8092 2 635d+5*t29*t37*t4*t71+2.0681212833347515d+5*t26*t34*t4*t7 8093 3 1+2.659013078573252d+5*t23*t31*t4*t71-3.323766348216565d+ 8094 4 5*t20*t28*t4*t71-1.4584959591505905d+3*t26*t31*t6*t70+1.8 8095 5 231199489382383d+3*t20*t25*t6*t70-2.3266364437515952d+5*t 8096 6 26*t34*t4*t70+2.9913897133949086d+5*t23*t31*t4*t70+3.7392 8097 7 371417436354d+5*t20*t28*t4*t70-4.5701787287977763d+5*t137 8098 8 *t25*t4*t70-1.8231199489382383d+3*t23*t28*t6*t69+2.228257 8099 9 7153689576d+3*t137*t22*t6*t69-3.3237663482165647d+5*t23*t 8100 : 31*t4*t69+4.1547079352707056d+5*t20*t28*t4*t69+5.07797636 8101 ; 5330863d+5*t137*t25*t4*t69-6.093571638397035d+5*t178*t22* 8102 < t4*t69-2.228257715368958d+3*t20*t25*t6*t68+2.673909258442 8103 = 7493d+3*t178*t18*t6*t68-4.5701787287977763d+5*t20*t28*t4* 8104 > t68-7.921643129916147d+5*t18*t250*t4*t68+5.58577400186394 8105 ? 9d+5*t137*t25*t4*t68+6.702928802236738d+5*t178*t22*t4*t68 8106 @ )+t152*(-1.0834770598202839d-2*gammaaa*t237*t51*t66-1.083 8107 1 4770598202839d-2*gammaaa*t153*t173*t51)+t142*t152*(-1.926 8108 2 4558001493193d-2*gammaaa*t236*t66-1.9264558001493193d-2*g 8109 3 ammaaa*t153*t172)+1.9863746096705204d-2*gammaaa*t173*t193 8110 4 *t51*t66-5.316678166471045d-5*t173*t183*t192*t51*t66+3.53 8111 5 18356336070855d-2*gammaaa*t142*t172*t193*t66-2.3079800683 8112 6 637772d-4*t172*t183*t184*t192*t66-9.305257363491002d-1*t1 8113 7 2*t4*t52*(4.0513776643071964d+1*t17*t44*t6*t64+9.23268430 8114 8 0601569d+2*t4*t44*t64-2.769805290180471d+3*t17*t4*t41*t64 8115 9 -4.0513776643071964d+1*t47*t6*t63+1.2154132992921589d+2*t 8116 : 41*t46*t6*t63-1.1079221160721883d+4*t38*t4*t46*t63+1.8465 8117 ; 36860120314d+3*t4*t44*t63+5.539610580360942d+3*t17*t4*t41 8118 < *t63-1.2154132992921589d+2*t17*t44*t6*t62+2.4308265985843 8119 = 178d+2*t38*t43*t6*t62+1.6618831741082832d+4*t38*t4*t46*t6 8120 > 2-2.769805290180471d+3*t4*t44*t62-2.769805290180471d+4*t3 8121 ? 5*t4*t43*t62+8.309415870541416d+3*t17*t4*t41*t62-2.430826 8122 @ 5985843178d+2*t41*t46*t6*t61+4.0513776643071964d+2*t35*t4 8123 1 0*t6*t61+2.2158442321443766d+4*t38*t4*t46*t61+3.693073720 8124 2 240629d+4*t35*t4*t43*t61-1.1079221160721883d+4*t17*t4*t41 8125 3 *t61-5.539610580360941d+4*t32*t4*t40*t61-4.05137766430719 8126 4 6d+2*t38*t43*t6*t60+6.077066496460793d+2*t32*t37*t6*t60-2 8127 5 .7698052901804704d+4*t38*t4*t46*t60+4.616342150300784d+4* 8128 6 t35*t4*t43*t60+6.924513225451174d+4*t32*t4*t40*t60-9.6943 8129 7 18515631648d+4*t29*t37*t4*t60-6.077066496460795d+2*t35*t4 8130 8 0*t59*t6+8.507893095045113d+2*t29*t34*t59*t6-8.5078930950 8131 9 45111d+2*t32*t37*t58*t6+1.1343857460060149d+3*t26*t31*t58 8132 : *t6-1.1343857460060149d+3*t29*t34*t57*t6+1.45849595915059 8133 ; 08d+3*t23*t28*t57*t6-1.4584959591505905d+3*t26*t31*t56*t6 8134 < +1.8231199489382383d+3*t20*t25*t56*t6-1.8231199489382383d 8135 = +3*t23*t28*t55*t6+2.2282577153689576d+3*t137*t22*t55*t6-2 8136 > .228257715368958d+3*t20*t25*t54*t6+2.6739092584427493d+3* 8137 ? t178*t18*t54*t6-5.539610580360942d+4*t35*t4*t43*t59+8.309 8138 @ 415870541416d+4*t32*t4*t40*t59+1.1633182218757979d+5*t29* 8139 1 t37*t4*t59-1.5510909625010638d+5*t26*t34*t4*t59-9.6943185 8140 2 15631648d+4*t32*t4*t40*t58+1.3572045921884307d+5*t29*t37* 8141 3 t4*t58+1.809606122917908d+5*t26*t34*t4*t58-2.326636443751 8142 4 5955d+5*t23*t31*t4*t58-1.5510909625010635d+5*t29*t37*t4*t 8143 5 57+2.0681212833347515d+5*t26*t34*t4*t57+2.659013078573252 8144 6 d+5*t23*t31*t4*t57-3.323766348216565d+5*t20*t28*t4*t57-2. 8145 7 3266364437515952d+5*t26*t34*t4*t56+2.9913897133949086d+5* 8146 8 t23*t31*t4*t56+3.7392371417436354d+5*t20*t28*t4*t56-4.570 8147 9 1787287977763d+5*t137*t25*t4*t56-3.3237663482165647d+5*t2 8148 : 3*t31*t4*t55+4.1547079352707056d+5*t20*t28*t4*t55+5.07797 8149 ; 6365330863d+5*t137*t25*t4*t55-6.093571638397035d+5*t178*t 8150 < 22*t4*t55-4.5701787287977763d+5*t20*t28*t4*t54-7.92164312 8151 = 9916147d+5*t18*t250*t4*t54+5.585774001863949d+5*t137*t25* 8152 > t4*t54+6.702928802236738d+5*t178*t22*t4*t54)-9.3052573634 8153 ? 91002d-1*t12*t3*t4*(4.0513776643071964d+1*t17*t44*t48*t6- 8154 @ 4.0513776643071964d+1*t45*t47*t6+1.2154132992921589d+2*t4 8155 1 1*t45*t46*t6-2.4308265985843178d+2*t39*t41*t46*t6-1.21541 8156 2 32992921589d+2*t17*t42*t44*t6+2.4308265985843178d+2*t38*t 8157 3 42*t43*t6-4.051377664307196d+2*t36*t38*t43*t6+4.051377664 8158 4 3071964d+2*t35*t39*t40*t6-6.077066496460795d+2*t33*t35*t4 8159 5 0*t6+6.077066496460793d+2*t32*t36*t37*t6-8.50789309504511 8160 6 1d+2*t30*t32*t37*t6+8.507893095045113d+2*t29*t33*t34*t6-1 8161 7 .1343857460060149d+3*t27*t29*t34*t6+1.1343857460060149d+3 8162 8 *t26*t30*t31*t6-1.4584959591505905d+3*t24*t26*t31*t6+1.45 8163 9 84959591505908d+3*t23*t27*t28*t6-1.8231199489382383d+3*t2 8164 : 1*t23*t28*t6+1.8231199489382383d+3*t20*t24*t25*t6-2.22825 8165 ; 7715368958d+3*t14*t20*t25*t6+2.2282577153689576d+3*t137*t 8166 < 21*t22*t6+2.6739092584427493d+3*t14*t178*t18*t6+9.2326843 8167 = 00601569d+2*t4*t44*t48-2.769805290180471d+3*t17*t4*t41*t4 8168 > 8-1.1079221160721883d+4*t38*t4*t45*t46+1.6618831741082832 8169 ? d+4*t38*t4*t42*t46+2.2158442321443766d+4*t38*t39*t4*t46-2 8170 @ .7698052901804704d+4*t36*t38*t4*t46+1.846536860120314d+3* 8171 1 t4*t44*t45+5.539610580360942d+3*t17*t4*t41*t45-2.76980529 8172 2 0180471d+3*t4*t42*t44-2.769805290180471d+4*t35*t4*t42*t43 8173 3 +3.693073720240629d+4*t35*t39*t4*t43+4.616342150300784d+4 8174 4 *t35*t36*t4*t43-5.539610580360942d+4*t33*t35*t4*t43+8.309 8175 5 415870541416d+3*t17*t4*t41*t42-1.1079221160721883d+4*t17* 8176 6 t39*t4*t41-5.539610580360941d+4*t32*t39*t4*t40+6.92451322 8177 7 5451174d+4*t32*t36*t4*t40+8.309415870541416d+4*t32*t33*t4 8178 8 *t40-9.694318515631648d+4*t30*t32*t4*t40-9.69431851563164 8179 9 8d+4*t29*t36*t37*t4+1.1633182218757979d+5*t29*t33*t37*t4+ 8180 : 1.3572045921884307d+5*t29*t30*t37*t4-1.5510909625010635d+ 8181 ; 5*t27*t29*t37*t4-1.5510909625010638d+5*t26*t33*t34*t4+1.8 8182 < 09606122917908d+5*t26*t30*t34*t4+2.0681212833347515d+5*t2 8183 = 6*t27*t34*t4-2.3266364437515952d+5*t24*t26*t34*t4-2.32663 8184 > 64437515955d+5*t23*t30*t31*t4+2.659013078573252d+5*t23*t2 8185 ? 7*t31*t4+2.9913897133949086d+5*t23*t24*t31*t4-3.323766348 8186 @ 2165647d+5*t21*t23*t31*t4-3.323766348216565d+5*t20*t27*t2 8187 1 8*t4+3.7392371417436354d+5*t20*t24*t28*t4+4.1547079352707 8188 2 056d+5*t20*t21*t28*t4-4.5701787287977763d+5*t14*t20*t28*t 8189 3 4-7.921643129916147d+5*t14*t18*t250*t4-4.5701787287977763 8190 4 d+5*t137*t24*t25*t4+5.077976365330863d+5*t137*t21*t25*t4+ 8191 5 5.585774001863949d+5*t137*t14*t25*t4-6.093571638397035d+5 8192 6 *t178*t21*t22*t4+6.702928802236738d+5*t14*t178*t22*t4)+t1 8193 7 49*(-4.135669939329334d-1*t12*t171*t52-4.135669939329334d 8194 8 -1*t12*t170*t3)-2.4814019635976003d+0*t12*t235*t5*t52-2.4 8195 9 814019635976003d+0*t151*t171*t5*t52-1.8610514726982003d+0 8196 : *t151*t235*t4*t52-9.305257363491002d-1*t171*t191*t4*t52+2 8197 ; *t153*t237*t52+t173*t194*t52+t143*(1.0082032889066277d-2* 8198 < gammaaa*t12*t235*t51+1.0082032889066277d-2*gammaaa*t151*t 8199 = 171*t51)-5.041016444533138d-3*gammaaa*t12*t171*t186*t51+4 8200 > .947305865786653d-5*t12*t171*t183*t185*t51-2.481401963597 8201 ? 6003d+0*t12*t234*t3*t5-2.4814019635976003d+0*t151*t170*t3 8202 @ *t5-1.8610514726982003d+0*t151*t234*t3*t4-9.3052573634910 8203 1 02d-1*t170*t191*t3*t4+2*t153*t236*t3+t172*t194*t3+t142*t1 8204 2 43*(1.7926167019779404d-2*gammaaa*t12*t234+1.792616701977 8205 3 9404d-2*gammaaa*t151*t170)-8.963083509889707d-3*gammaaa*t 8206 4 12*t142*t170*t186+2.1476348525932504d-4*t12*t170*t183*t18 8207 5 4*t185)*wght+Mmat3(iq,D3_RA_RA_TA) 8208 Mmat3(iq,D3_RA_RA_TB) = Mmat3(iq,D3_RA_RA_TB) 8209 Mmat3(iq,D3_RA_RB_TA) = Mmat3(iq,D3_RA_RB_TA) 8210 Mmat3(iq,D3_RA_RB_TB) = Mmat3(iq,D3_RA_RB_TB) 8211 Mmat3(iq,D3_RB_RB_TA) = Mmat3(iq,D3_RB_RB_TA) 8212 Mmat3(iq,D3_RB_RB_TB) = 1.0d+0*(t132*t134*(4.051377664307196 8213 1 4d+1*t107*t126*t91*t98-4.0513776643071964d+1*t128*t90*t98 8214 2 +1.2154132992921589d+2*t124*t127*t90*t98-1.21541329929215 8215 3 89d+2*t107*t126*t89*t98+2.4308265985843178d+2*t122*t125*t 8216 4 89*t98-2.4308265985843178d+2*t124*t127*t88*t98+4.05137766 8217 5 43071964d+2*t120*t123*t88*t98-4.051377664307196d+2*t122*t 8218 6 125*t87*t98+6.077066496460793d+2*t118*t121*t87*t98-6.0770 8219 7 66496460795d+2*t120*t123*t86*t98+8.507893095045113d+2*t11 8220 8 6*t119*t86*t98-8.507893095045111d+2*t118*t121*t85*t98+1.1 8221 9 343857460060149d+3*t114*t117*t85*t98-1.1343857460060149d+ 8222 : 3*t116*t119*t84*t98+1.4584959591505908d+3*t112*t115*t84*t 8223 ; 98-1.4584959591505905d+3*t114*t117*t83*t98+1.823119948938 8224 < 2383d+3*t110*t113*t83*t98+2.2282577153689576d+3*t111*t154 8225 = *t82*t98-1.8231199489382383d+3*t112*t115*t82*t98+2.673909 8226 > 2584427493d+3*t108*t200*t81*t98-2.228257715368958d+3*t110 8227 ? *t113*t81*t98+9.232684300601569d+2*t126*t91*t96-2.7698052 8228 @ 90180471d+3*t107*t124*t91*t96-1.1079221160721883d+4*t122* 8229 1 t127*t90*t96+1.846536860120314d+3*t126*t90*t96+5.53961058 8230 2 0360942d+3*t107*t124*t90*t96+1.6618831741082832d+4*t122*t 8231 3 127*t89*t96-2.769805290180471d+3*t126*t89*t96-2.769805290 8232 4 180471d+4*t120*t125*t89*t96+8.309415870541416d+3*t107*t12 8233 5 4*t89*t96+2.2158442321443766d+4*t122*t127*t88*t96+3.69307 8234 6 3720240629d+4*t120*t125*t88*t96-1.1079221160721883d+4*t10 8235 7 7*t124*t88*t96-5.539610580360941d+4*t118*t123*t88*t96-2.7 8236 8 698052901804704d+4*t122*t127*t87*t96+4.616342150300784d+4 8237 9 *t120*t125*t87*t96+6.924513225451174d+4*t118*t123*t87*t96 8238 : -9.694318515631648d+4*t116*t121*t87*t96-5.539610580360942 8239 ; d+4*t120*t125*t86*t96+8.309415870541416d+4*t118*t123*t86* 8240 < t96+1.1633182218757979d+5*t116*t121*t86*t96-1.55109096250 8241 = 10638d+5*t114*t119*t86*t96-9.694318515631648d+4*t118*t123 8242 > *t85*t96+1.3572045921884307d+5*t116*t121*t85*t96+1.809606 8243 ? 122917908d+5*t114*t119*t85*t96-2.3266364437515955d+5*t112 8244 @ *t117*t85*t96-1.5510909625010635d+5*t116*t121*t84*t96+2.0 8245 1 681212833347515d+5*t114*t119*t84*t96+2.659013078573252d+5 8246 2 *t112*t117*t84*t96-3.323766348216565d+5*t110*t115*t84*t96 8247 3 -4.5701787287977763d+5*t113*t154*t83*t96-2.32663644375159 8248 4 52d+5*t114*t119*t83*t96+2.9913897133949086d+5*t112*t117*t 8249 5 83*t96+3.7392371417436354d+5*t110*t115*t83*t96-6.09357163 8250 6 8397035d+5*t111*t200*t82*t96+5.077976365330863d+5*t113*t1 8251 7 54*t82*t96-3.3237663482165647d+5*t112*t117*t82*t96+4.1547 8252 8 079352707056d+5*t110*t115*t82*t96-7.921643129916147d+5*t1 8253 9 08*t261*t81*t96+6.702928802236738d+5*t111*t200*t81*t96+5. 8254 : 585774001863949d+5*t113*t154*t81*t96-4.5701787287977763d+ 8255 ; 5*t110*t115*t81*t96)+t134*t95*(4.0513776643071964d+1*t107 8256 < *t126*t78*t98-4.0513776643071964d+1*t128*t77*t98+1.215413 8257 = 2992921589d+2*t124*t127*t77*t98-1.2154132992921589d+2*t10 8258 > 7*t126*t76*t98+2.4308265985843178d+2*t122*t125*t76*t98-2. 8259 ? 4308265985843178d+2*t124*t127*t75*t98+4.0513776643071964d 8260 @ +2*t120*t123*t75*t98-4.051377664307196d+2*t122*t125*t74*t 8261 1 98+6.077066496460793d+2*t118*t121*t74*t98-6.0770664964607 8262 2 95d+2*t120*t123*t73*t98+8.507893095045113d+2*t116*t119*t7 8263 3 3*t98-8.507893095045111d+2*t118*t121*t72*t98+1.1343857460 8264 4 060149d+3*t114*t117*t72*t98-1.1343857460060149d+3*t116*t1 8265 5 19*t71*t98+1.4584959591505908d+3*t112*t115*t71*t98-1.4584 8266 6 959591505905d+3*t114*t117*t70*t98+1.8231199489382383d+3*t 8267 7 110*t113*t70*t98+2.2282577153689576d+3*t111*t154*t69*t98- 8268 8 1.8231199489382383d+3*t112*t115*t69*t98+2.673909258442749 8269 9 3d+3*t108*t200*t68*t98-2.228257715368958d+3*t110*t113*t68 8270 : *t98+9.232684300601569d+2*t126*t78*t96-2.769805290180471d 8271 ; +3*t107*t124*t78*t96-1.1079221160721883d+4*t122*t127*t77* 8272 < t96+1.846536860120314d+3*t126*t77*t96+5.539610580360942d+ 8273 = 3*t107*t124*t77*t96+1.6618831741082832d+4*t122*t127*t76*t 8274 > 96-2.769805290180471d+3*t126*t76*t96-2.769805290180471d+4 8275 ? *t120*t125*t76*t96+8.309415870541416d+3*t107*t124*t76*t96 8276 @ +2.2158442321443766d+4*t122*t127*t75*t96+3.69307372024062 8277 1 9d+4*t120*t125*t75*t96-1.1079221160721883d+4*t107*t124*t7 8278 2 5*t96-5.539610580360941d+4*t118*t123*t75*t96-2.7698052901 8279 3 804704d+4*t122*t127*t74*t96+4.616342150300784d+4*t120*t12 8280 4 5*t74*t96+6.924513225451174d+4*t118*t123*t74*t96-9.694318 8281 5 515631648d+4*t116*t121*t74*t96-5.539610580360942d+4*t120* 8282 6 t125*t73*t96+8.309415870541416d+4*t118*t123*t73*t96+1.163 8283 7 3182218757979d+5*t116*t121*t73*t96-1.5510909625010638d+5* 8284 8 t114*t119*t73*t96-9.694318515631648d+4*t118*t123*t72*t96+ 8285 9 1.3572045921884307d+5*t116*t121*t72*t96+1.809606122917908 8286 : d+5*t114*t119*t72*t96-2.3266364437515955d+5*t112*t117*t72 8287 ; *t96-1.5510909625010635d+5*t116*t121*t71*t96+2.0681212833 8288 < 347515d+5*t114*t119*t71*t96+2.659013078573252d+5*t112*t11 8289 = 7*t71*t96-3.323766348216565d+5*t110*t115*t71*t96-4.570178 8290 > 7287977763d+5*t113*t154*t70*t96-2.3266364437515952d+5*t11 8291 ? 4*t119*t70*t96+2.9913897133949086d+5*t112*t117*t70*t96+3. 8292 @ 7392371417436354d+5*t110*t115*t70*t96-6.093571638397035d+ 8293 1 5*t111*t200*t69*t96+5.077976365330863d+5*t113*t154*t69*t9 8294 2 6-3.3237663482165647d+5*t112*t117*t69*t96+4.1547079352707 8295 3 056d+5*t110*t115*t69*t96-7.921643129916147d+5*t108*t261*t 8296 4 68*t96+6.702928802236738d+5*t111*t200*t68*t96+5.585774001 8297 5 863949d+5*t113*t154*t68*t96-4.5701787287977763d+5*t110*t1 8298 6 15*t68*t96)-9.305257363491002d-1*t104*t132*t96*(4.0513776 8299 7 643071964d+1*t107*t126*t64*t98-4.0513776643071964d+1*t128 8300 8 *t63*t98+1.2154132992921589d+2*t124*t127*t63*t98-1.215413 8301 9 2992921589d+2*t107*t126*t62*t98+2.4308265985843178d+2*t12 8302 : 2*t125*t62*t98-2.4308265985843178d+2*t124*t127*t61*t98+4. 8303 ; 0513776643071964d+2*t120*t123*t61*t98-4.051377664307196d+ 8304 < 2*t122*t125*t60*t98+6.077066496460793d+2*t118*t121*t60*t9 8305 = 8-6.077066496460795d+2*t120*t123*t59*t98+8.50789309504511 8306 > 3d+2*t116*t119*t59*t98-8.507893095045111d+2*t118*t121*t58 8307 ? *t98+1.1343857460060149d+3*t114*t117*t58*t98-1.1343857460 8308 @ 060149d+3*t116*t119*t57*t98+1.4584959591505908d+3*t112*t1 8309 1 15*t57*t98-1.4584959591505905d+3*t114*t117*t56*t98+1.8231 8310 2 199489382383d+3*t110*t113*t56*t98+2.2282577153689576d+3*t 8311 3 111*t154*t55*t98-1.8231199489382383d+3*t112*t115*t55*t98+ 8312 4 2.6739092584427493d+3*t108*t200*t54*t98-2.228257715368958 8313 5 d+3*t110*t113*t54*t98+9.232684300601569d+2*t126*t64*t96-2 8314 6 .769805290180471d+3*t107*t124*t64*t96-1.1079221160721883d 8315 7 +4*t122*t127*t63*t96+1.846536860120314d+3*t126*t63*t96+5. 8316 8 539610580360942d+3*t107*t124*t63*t96+1.6618831741082832d+ 8317 9 4*t122*t127*t62*t96-2.769805290180471d+3*t126*t62*t96-2.7 8318 : 69805290180471d+4*t120*t125*t62*t96+8.309415870541416d+3* 8319 ; t107*t124*t62*t96+2.2158442321443766d+4*t122*t127*t61*t96 8320 < +3.693073720240629d+4*t120*t125*t61*t96-1.107922116072188 8321 = 3d+4*t107*t124*t61*t96-5.539610580360941d+4*t118*t123*t61 8322 > *t96-2.7698052901804704d+4*t122*t127*t60*t96+4.6163421503 8323 ? 00784d+4*t120*t125*t60*t96+6.924513225451174d+4*t118*t123 8324 @ *t60*t96-9.694318515631648d+4*t116*t121*t60*t96-5.5396105 8325 1 80360942d+4*t120*t125*t59*t96+8.309415870541416d+4*t118*t 8326 2 123*t59*t96+1.1633182218757979d+5*t116*t121*t59*t96-1.551 8327 3 0909625010638d+5*t114*t119*t59*t96-9.694318515631648d+4*t 8328 4 118*t123*t58*t96+1.3572045921884307d+5*t116*t121*t58*t96+ 8329 5 1.809606122917908d+5*t114*t119*t58*t96-2.3266364437515955 8330 6 d+5*t112*t117*t58*t96-1.5510909625010635d+5*t116*t121*t57 8331 7 *t96+2.0681212833347515d+5*t114*t119*t57*t96+2.6590130785 8332 8 73252d+5*t112*t117*t57*t96-3.323766348216565d+5*t110*t115 8333 9 *t57*t96-4.5701787287977763d+5*t113*t154*t56*t96-2.326636 8334 : 4437515952d+5*t114*t119*t56*t96+2.9913897133949086d+5*t11 8335 ; 2*t117*t56*t96+3.7392371417436354d+5*t110*t115*t56*t96-6. 8336 < 093571638397035d+5*t111*t200*t55*t96+5.077976365330863d+5 8337 = *t113*t154*t55*t96-3.3237663482165647d+5*t112*t117*t55*t9 8338 > 6+4.1547079352707056d+5*t110*t115*t55*t96-7.9216431299161 8339 ? 47d+5*t108*t261*t54*t96+6.702928802236738d+5*t111*t200*t5 8340 @ 4*t96+5.585774001863949d+5*t113*t154*t54*t96-4.5701787287 8341 1 977763d+5*t110*t115*t54*t96)-9.305257363491002d-1*t104*t9 8342 2 5*t96*(4.0513776643071964d+1*t107*t126*t48*t98-4.05137766 8343 3 43071964d+1*t128*t45*t98+1.2154132992921589d+2*t124*t127* 8344 4 t45*t98-1.2154132992921589d+2*t107*t126*t42*t98+2.4308265 8345 5 985843178d+2*t122*t125*t42*t98-2.4308265985843178d+2*t124 8346 6 *t127*t39*t98+4.0513776643071964d+2*t120*t123*t39*t98-4.0 8347 7 51377664307196d+2*t122*t125*t36*t98+6.077066496460793d+2* 8348 8 t118*t121*t36*t98-6.077066496460795d+2*t120*t123*t33*t98+ 8349 9 8.507893095045113d+2*t116*t119*t33*t98-8.507893095045111d 8350 : +2*t118*t121*t30*t98+1.1343857460060149d+3*t114*t117*t30* 8351 ; t98-1.1343857460060149d+3*t116*t119*t27*t98+1.45849595915 8352 < 05908d+3*t112*t115*t27*t98-1.4584959591505905d+3*t114*t11 8353 = 7*t24*t98+1.8231199489382383d+3*t110*t113*t24*t98+2.22825 8354 > 77153689576d+3*t111*t154*t21*t98-1.8231199489382383d+3*t1 8355 ? 12*t115*t21*t98+2.6739092584427493d+3*t108*t14*t200*t98-2 8356 @ .228257715368958d+3*t110*t113*t14*t98+9.232684300601569d+ 8357 1 2*t126*t48*t96-2.769805290180471d+3*t107*t124*t48*t96-1.1 8358 2 079221160721883d+4*t122*t127*t45*t96+1.846536860120314d+3 8359 3 *t126*t45*t96+5.539610580360942d+3*t107*t124*t45*t96+1.66 8360 4 18831741082832d+4*t122*t127*t42*t96-2.769805290180471d+3* 8361 5 t126*t42*t96-2.769805290180471d+4*t120*t125*t42*t96+8.309 8362 6 415870541416d+3*t107*t124*t42*t96+2.2158442321443766d+4*t 8363 7 122*t127*t39*t96+3.693073720240629d+4*t120*t125*t39*t96-1 8364 8 .1079221160721883d+4*t107*t124*t39*t96-5.539610580360941d 8365 9 +4*t118*t123*t39*t96-2.7698052901804704d+4*t122*t127*t36* 8366 : t96+4.616342150300784d+4*t120*t125*t36*t96+6.924513225451 8367 ; 174d+4*t118*t123*t36*t96-9.694318515631648d+4*t116*t121*t 8368 < 36*t96-5.539610580360942d+4*t120*t125*t33*t96+8.309415870 8369 = 541416d+4*t118*t123*t33*t96+1.1633182218757979d+5*t116*t1 8370 > 21*t33*t96-1.5510909625010638d+5*t114*t119*t33*t96-9.6943 8371 ? 18515631648d+4*t118*t123*t30*t96+1.3572045921884307d+5*t1 8372 @ 16*t121*t30*t96+1.809606122917908d+5*t114*t119*t30*t96-2. 8373 1 3266364437515955d+5*t112*t117*t30*t96-1.5510909625010635d 8374 2 +5*t116*t121*t27*t96+2.0681212833347515d+5*t114*t119*t27* 8375 3 t96+2.659013078573252d+5*t112*t117*t27*t96-3.323766348216 8376 4 565d+5*t110*t115*t27*t96-7.921643129916147d+5*t108*t14*t2 8377 5 61*t96-4.5701787287977763d+5*t113*t154*t24*t96-2.32663644 8378 6 37515952d+5*t114*t119*t24*t96+2.9913897133949086d+5*t112* 8379 7 t117*t24*t96+3.7392371417436354d+5*t110*t115*t24*t96-6.09 8380 8 3571638397035d+5*t111*t200*t21*t96+5.077976365330863d+5*t 8381 9 113*t154*t21*t96-3.3237663482165647d+5*t112*t117*t21*t96+ 8382 : 4.1547079352707056d+5*t110*t115*t21*t96+6.702928802236738 8383 ; d+5*t111*t14*t200*t96+5.585774001863949d+5*t113*t14*t154* 8384 < t96-4.5701787287977763d+5*t110*t115*t14*t96)-2.4814019635 8385 = 976003d+0*t104*t238*t95*t97-2.4814019635976003d+0*t167*t1 8386 > 74*t95*t97-2.4814019635976003d+0*t104*t132*t239*t97-2.481 8387 ? 4019635976003d+0*t132*t167*t175*t97-1.8610514726982003d+0 8388 @ *t167*t238*t95*t96-9.305257363491002d-1*t174*t213*t95*t96 8389 1 -1.8610514726982003d+0*t132*t167*t239*t96-9.3052573634910 8390 2 02d-1*t132*t175*t213*t96+t165*(-4.135669939329334d-1*t104 8391 3 *t174*t95-4.135669939329334d-1*t104*t132*t175)+2*t169*t24 8392 4 0*t95+t176*t216*t95+t168*(-1.0834770598202839d-2*gammabb* 8393 5 t131*t134*t241-1.0834770598202839d-2*gammabb*t131*t169*t1 8394 6 77)+2*t132*t169*t241+t159*t168*(-1.9264558001493193d-2*ga 8395 7 mmabb*t134*t240-1.9264558001493193d-2*gammabb*t169*t176)+ 8396 8 t160*(1.0082032889066277d-2*gammabb*t104*t131*t239+1.0082 8397 9 032889066277d-2*gammabb*t131*t167*t175)+t159*t160*(1.7926 8398 : 167019779404d-2*gammabb*t104*t238+1.7926167019779404d-2*g 8399 ; ammabb*t167*t174)+t132*t177*t216+1.9863746096705204d-2*ga 8400 < mmabb*t131*t134*t177*t215+3.5318356336070855d-2*gammabb*t 8401 = 134*t159*t176*t215-2.3079800683637772d-4*t134*t176*t205*t 8402 > 206*t214-5.316678166471045d-5*t131*t134*t177*t205*t214-5. 8403 ? 041016444533138d-3*gammabb*t104*t131*t175*t208-8.96308350 8404 @ 9889707d-3*gammabb*t104*t159*t174*t208+2.1476348525932504 8405 1 d-4*t104*t174*t205*t206*t207+4.947305865786653d-5*t104*t1 8406 2 31*t175*t205*t207)*wght+Mmat3(iq,D3_RB_RB_TB) 8407 Mmat3(iq,D3_RA_GAA_TA) = 1.0d+0*(t1*(2.0315194871630324d-3*t 8408 1 237*t51*t66+2.0315194871630324d-3*t153*t173*t51)+t1*t142* 8409 2 (3.612104625279974d-3*t236*t66+3.612104625279974d-3*t153* 8410 3 t172)+1.9937543124266421d-5*gammaaa*t173*t223*t51*t66-5.4 8411 4 17385299101419d-3*t152*t173*t51*t66+8.654925256364164d-5* 8412 5 gammaaa*t172*t184*t223*t66-9.632279000746596d-3*t142*t152 8413 6 *t172*t66+t144*(-1.890381166699927d-3*t12*t235*t51-1.8903 8414 7 81166699927d-3*t151*t171*t51)-1.855239699669995d-5*gammaa 8415 8 a*t12*t171*t222*t51+2.520508222266569d-3*t12*t143*t171*t5 8416 9 1+t142*t144*(-3.361156316208638d-3*t12*t234-3.36115631620 8417 : 8638d-3*t151*t170)-8.05363069722469d-5*gammaaa*t12*t170*t 8418 ; 184*t222+4.481541754944851d-3*t12*t142*t143*t170)*wght+Mm 8419 < at3(iq,D3_RA_GAA_TA) 8420 Mmat3(iq,D3_RA_GAA_TB) = Mmat3(iq,D3_RA_GAA_TB) 8421 Mmat3(iq,D3_RA_GAB_TA) = Mmat3(iq,D3_RA_GAB_TA) 8422 Mmat3(iq,D3_RA_GAB_TB) = Mmat3(iq,D3_RA_GAB_TB) 8423 Mmat3(iq,D3_RA_GBB_TA) = Mmat3(iq,D3_RA_GBB_TA) 8424 Mmat3(iq,D3_RA_GBB_TB) = Mmat3(iq,D3_RA_GBB_TB) 8425 Mmat3(iq,D3_RB_GAA_TA) = Mmat3(iq,D3_RB_GAA_TA) 8426 Mmat3(iq,D3_RB_GAA_TB) = Mmat3(iq,D3_RB_GAA_TB) 8427 Mmat3(iq,D3_RB_GAB_TA) = Mmat3(iq,D3_RB_GAB_TA) 8428 Mmat3(iq,D3_RB_GAB_TB) = Mmat3(iq,D3_RB_GAB_TB) 8429 Mmat3(iq,D3_RB_GBB_TA) = Mmat3(iq,D3_RB_GBB_TA) 8430 Mmat3(iq,D3_RB_GBB_TB) = 1.0d+0*((2.0315194871630324d-3*t131 8431 1 *t134*t241+2.0315194871630324d-3*t131*t169*t177)*t93+t159 8432 2 *(3.612104625279974d-3*t134*t240+3.612104625279974d-3*t16 8433 3 9*t176)*t93+t161*(-1.890381166699927d-3*t104*t131*t239-1. 8434 4 890381166699927d-3*t131*t167*t175)+t159*t161*(-3.36115631 8435 5 6208638d-3*t104*t238-3.361156316208638d-3*t167*t174)+8.65 8436 6 4925256364164d-5*gammabb*t134*t176*t206*t227+1.9937543124 8437 7 266421d-5*gammabb*t131*t134*t177*t227-8.05363069722469d-5 8438 8 *gammabb*t104*t174*t206*t226-1.855239699669995d-5*gammabb 8439 9 *t104*t131*t175*t226-5.417385299101419d-3*t131*t134*t168* 8440 : t177-9.632279000746596d-3*t134*t159*t168*t176+2.520508222 8441 ; 266569d-3*t104*t131*t160*t175+4.481541754944851d-3*t104*t 8442 < 159*t160*t174)*wght+Mmat3(iq,D3_RB_GBB_TB) 8443 Mmat3(iq,D3_RA_TA_TA) = 1.0d+0*(-7.476578671599909d-6*t173*t 8444 1 231*t51*t66-3.245596971136562d-5*t172*t184*t231*t66+6.957 8445 2 148873762482d-6*t12*t171*t230*t51+3.020111511459258d-5*t1 8446 3 2*t170*t184*t230)*wght+Mmat3(iq,D3_RA_TA_TA) 8447 Mmat3(iq,D3_RA_TA_TB) = Mmat3(iq,D3_RA_TA_TB) 8448 Mmat3(iq,D3_RA_TB_TB) = Mmat3(iq,D3_RA_TB_TB) 8449 Mmat3(iq,D3_RB_TA_TA) = Mmat3(iq,D3_RB_TA_TA) 8450 Mmat3(iq,D3_RB_TA_TB) = Mmat3(iq,D3_RB_TA_TB) 8451 Mmat3(iq,D3_RB_TB_TB) = Mmat3(iq,D3_RB_TB_TB) 8452 Mmat3(iq,D3_GAA_GAA_TA) = Mmat3(iq,D3_GAA_GAA_TA) 8453 Mmat3(iq,D3_GAA_GAA_TB) = Mmat3(iq,D3_GAA_GAA_TB) 8454 Mmat3(iq,D3_GAA_GAB_TA) = Mmat3(iq,D3_GAA_GAB_TA) 8455 Mmat3(iq,D3_GAA_GAB_TB) = Mmat3(iq,D3_GAA_GAB_TB) 8456 Mmat3(iq,D3_GAA_GBB_TA) = Mmat3(iq,D3_GAA_GBB_TA) 8457 Mmat3(iq,D3_GAA_GBB_TB) = 1.0d+0*(-3.245596971136562d-5*t134 8458 1 *t176*t206*t233-7.476578671599909d-6*t131*t134*t177*t233+ 8459 2 3.020111511459258d-5*t104*t174*t206*t232+6.95714887376248 8460 3 2d-6*t104*t131*t175*t232)*wght+Mmat3(iq,D3_GAA_GBB_TB) 8461 Mmat3(iq,D3_GAB_GAB_TA) = 1.0d+0*(2.0315194871630324d-3*t1*t 8462 1 245*t51*t66+3.612104625279974d-3*t1*t142*t244*t66-1.89038 8463 2 1166699927d-3*t12*t144*t243*t51-3.361156316208638d-3*t12* 8464 3 t142*t144*t242)*wght+Mmat3(iq,D3_GAB_GAB_TA) 8465 Mmat3(iq,D3_GAB_GAB_TB) = Mmat3(iq,D3_GAB_GAB_TB) 8466 Mmat3(iq,D3_GAB_GBB_TA) = Mmat3(iq,D3_GAB_GBB_TA) 8467 Mmat3(iq,D3_GAB_GBB_TB) = Mmat3(iq,D3_GAB_GBB_TB) 8468 Mmat3(iq,D3_GBB_GBB_TA) = Mmat3(iq,D3_GBB_GBB_TA) 8469 Mmat3(iq,D3_GBB_GBB_TB) = Mmat3(iq,D3_GBB_GBB_TB) 8470 Mmat3(iq,D3_GAA_TA_TA) = Mmat3(iq,D3_GAA_TA_TA) 8471 Mmat3(iq,D3_GAA_TA_TB) = Mmat3(iq,D3_GAA_TA_TB) 8472 Mmat3(iq,D3_GAA_TB_TB) = 1.0d+0*(2.0315194871630324d-3*t131* 8473 1 t134*t249*t93+3.612104625279974d-3*t134*t159*t248*t93-1.8 8474 2 90381166699927d-3*t104*t131*t161*t247-3.361156316208638d- 8475 3 3*t104*t159*t161*t246)*wght+Mmat3(iq,D3_GAA_TB_TB) 8476 Mmat3(iq,D3_GAB_TA_TA) = 1.0d+0*(t52*t66*(-4.8d+1*t44*t91-4. 8477 1 8d+1*t17*t41*t91-1.92d+2*t38*t46*t90-9.6d+1*t44*t90-2.88d 8478 2 +2*t17*t41*t90-8.64d+2*t38*t46*t89-4.8d+1*t44*t89-4.8d+2* 8479 3 t35*t43*t89-4.32d+2*t17*t41*t89-1.152d+3*t38*t46*t88-1.92 8480 4 d+3*t35*t43*t88-1.92d+2*t17*t41*t88-9.6d+2*t32*t40*t88-4. 8481 5 8d+2*t38*t46*t87-2.4d+3*t35*t43*t87-3.6d+3*t32*t40*t87-1. 8482 6 68d+3*t29*t37*t87-9.6d+2*t35*t43*t86-4.32d+3*t32*t40*t86- 8483 7 6.048d+3*t29*t37*t86-2.688d+3*t26*t34*t86-1.68d+3*t32*t40 8484 8 *t85-7.056d+3*t29*t37*t85-9.408d+3*t26*t34*t85-4.032d+3*t 8485 9 23*t31*t85-2.688d+3*t29*t37*t84-1.0752d+4*t26*t34*t84-1.3 8486 : 824d+4*t23*t31*t84-5.76d+3*t20*t28*t84-4.032d+3*t26*t34*t 8487 ; 83-1.5552d+4*t23*t31*t83-1.944d+4*t20*t28*t83-7.92d+3*t13 8488 < 7*t25*t83-5.76d+3*t23*t31*t82-2.16d+4*t20*t28*t82-2.64d+4 8489 = *t137*t25*t82-1.056d+4*t178*t22*t82-7.92d+3*t20*t28*t81-1 8490 > .3728d+4*t18*t250*t81-2.904d+4*t137*t25*t81-3.4848d+4*t17 8491 ? 8*t22*t81)+t3*t66*(-4.8d+1*t44*t78-4.8d+1*t17*t41*t78-1.9 8492 @ 2d+2*t38*t46*t77-9.6d+1*t44*t77-2.88d+2*t17*t41*t77-8.64d 8493 1 +2*t38*t46*t76-4.8d+1*t44*t76-4.8d+2*t35*t43*t76-4.32d+2* 8494 2 t17*t41*t76-1.152d+3*t38*t46*t75-1.92d+3*t35*t43*t75-1.92 8495 3 d+2*t17*t41*t75-9.6d+2*t32*t40*t75-4.8d+2*t38*t46*t74-2.4 8496 4 d+3*t35*t43*t74-3.6d+3*t32*t40*t74-1.68d+3*t29*t37*t74-9. 8497 5 6d+2*t35*t43*t73-4.32d+3*t32*t40*t73-6.048d+3*t29*t37*t73 8498 6 -2.688d+3*t26*t34*t73-1.68d+3*t32*t40*t72-7.056d+3*t29*t3 8499 7 7*t72-9.408d+3*t26*t34*t72-4.032d+3*t23*t31*t72-2.688d+3* 8500 8 t29*t37*t71-1.0752d+4*t26*t34*t71-1.3824d+4*t23*t31*t71-5 8501 9 .76d+3*t20*t28*t71-4.032d+3*t26*t34*t70-1.5552d+4*t23*t31 8502 : *t70-1.944d+4*t20*t28*t70-7.92d+3*t137*t25*t70-5.76d+3*t2 8503 ; 3*t31*t69-2.16d+4*t20*t28*t69-2.64d+4*t137*t25*t69-1.056d 8504 < +4*t178*t22*t69-7.92d+3*t20*t28*t68-1.3728d+4*t18*t250*t6 8505 = 8-2.904d+4*t137*t25*t68-3.4848d+4*t178*t22*t68)-9.3052573 8506 > 63491002d-1*t12*t4*t52*(-4.8d+1*t44*t64-4.8d+1*t17*t41*t6 8507 ? 4-1.92d+2*t38*t46*t63-9.6d+1*t44*t63-2.88d+2*t17*t41*t63- 8508 @ 8.64d+2*t38*t46*t62-4.8d+1*t44*t62-4.8d+2*t35*t43*t62-4.3 8509 1 2d+2*t17*t41*t62-1.152d+3*t38*t46*t61-1.92d+3*t35*t43*t61 8510 2 -1.92d+2*t17*t41*t61-9.6d+2*t32*t40*t61-4.8d+2*t38*t46*t6 8511 3 0-2.4d+3*t35*t43*t60-3.6d+3*t32*t40*t60-1.68d+3*t29*t37*t 8512 4 60-9.6d+2*t35*t43*t59-4.32d+3*t32*t40*t59-6.048d+3*t29*t3 8513 5 7*t59-2.688d+3*t26*t34*t59-1.68d+3*t32*t40*t58-7.056d+3*t 8514 6 29*t37*t58-9.408d+3*t26*t34*t58-4.032d+3*t23*t31*t58-2.68 8515 7 8d+3*t29*t37*t57-1.0752d+4*t26*t34*t57-1.3824d+4*t23*t31* 8516 8 t57-5.76d+3*t20*t28*t57-4.032d+3*t26*t34*t56-1.5552d+4*t2 8517 9 3*t31*t56-1.944d+4*t20*t28*t56-7.92d+3*t137*t25*t56-5.76d 8518 : +3*t23*t31*t55-2.16d+4*t20*t28*t55-2.64d+4*t137*t25*t55-1 8519 ; .056d+4*t178*t22*t55-7.92d+3*t20*t28*t54-1.3728d+4*t18*t2 8520 < 50*t54-2.904d+4*t137*t25*t54-3.4848d+4*t178*t22*t54)-9.30 8521 = 5257363491002d-1*t12*t3*t4*(-4.8d+1*t44*t48-4.8d+1*t17*t4 8522 > 1*t48-1.92d+2*t38*t45*t46-8.64d+2*t38*t42*t46-1.152d+3*t3 8523 ? 8*t39*t46-4.8d+2*t36*t38*t46-9.6d+1*t44*t45-2.88d+2*t17*t 8524 @ 41*t45-4.8d+1*t42*t44-4.8d+2*t35*t42*t43-1.92d+3*t35*t39* 8525 1 t43-2.4d+3*t35*t36*t43-9.6d+2*t33*t35*t43-4.32d+2*t17*t41 8526 2 *t42-1.92d+2*t17*t39*t41-9.6d+2*t32*t39*t40-3.6d+3*t32*t3 8527 3 6*t40-4.32d+3*t32*t33*t40-1.68d+3*t30*t32*t40-1.68d+3*t29 8528 4 *t36*t37-6.048d+3*t29*t33*t37-7.056d+3*t29*t30*t37-2.688d 8529 5 +3*t27*t29*t37-2.688d+3*t26*t33*t34-9.408d+3*t26*t30*t34- 8530 6 1.0752d+4*t26*t27*t34-4.032d+3*t24*t26*t34-4.032d+3*t23*t 8531 7 30*t31-1.3824d+4*t23*t27*t31-1.5552d+4*t23*t24*t31-5.76d+ 8532 8 3*t21*t23*t31-5.76d+3*t20*t27*t28-1.944d+4*t20*t24*t28-2. 8533 9 16d+4*t20*t21*t28-7.92d+3*t14*t20*t28-1.3728d+4*t14*t18*t 8534 : 250-7.92d+3*t137*t24*t25-2.64d+4*t137*t21*t25-2.904d+4*t1 8535 ; 37*t14*t25-1.056d+4*t178*t21*t22-3.4848d+4*t14*t178*t22)) 8536 < *wght+Mmat3(iq,D3_GAB_TA_TA) 8537 Mmat3(iq,D3_GAB_TA_TB) = Mmat3(iq,D3_GAB_TA_TB) 8538 Mmat3(iq,D3_GAB_TB_TB) = Mmat3(iq,D3_GAB_TB_TB) 8539 Mmat3(iq,D3_GBB_TA_TA) = 1.0d+0*(-9.305257363491002d-1*t104* 8540 1 (-4.8d+1*t126*t48-4.8d+1*t107*t124*t48-1.92d+2*t122*t127* 8541 2 t45-9.6d+1*t126*t45-2.88d+2*t107*t124*t45-8.64d+2*t122*t1 8542 3 27*t42-4.8d+1*t126*t42-4.8d+2*t120*t125*t42-4.32d+2*t107* 8543 4 t124*t42-1.152d+3*t122*t127*t39-1.92d+3*t120*t125*t39-1.9 8544 5 2d+2*t107*t124*t39-9.6d+2*t118*t123*t39-4.8d+2*t122*t127* 8545 6 t36-2.4d+3*t120*t125*t36-3.6d+3*t118*t123*t36-1.68d+3*t11 8546 7 6*t121*t36-9.6d+2*t120*t125*t33-4.32d+3*t118*t123*t33-6.0 8547 8 48d+3*t116*t121*t33-2.688d+3*t114*t119*t33-1.68d+3*t118*t 8548 9 123*t30-7.056d+3*t116*t121*t30-9.408d+3*t114*t119*t30-4.0 8549 : 32d+3*t112*t117*t30-2.688d+3*t116*t121*t27-1.0752d+4*t114 8550 ; *t119*t27-1.3824d+4*t112*t117*t27-5.76d+3*t110*t115*t27-1 8551 < .3728d+4*t108*t14*t261-7.92d+3*t113*t154*t24-4.032d+3*t11 8552 = 4*t119*t24-1.5552d+4*t112*t117*t24-1.944d+4*t110*t115*t24 8553 > -1.056d+4*t111*t200*t21-2.64d+4*t113*t154*t21-5.76d+3*t11 8554 ? 2*t117*t21-2.16d+4*t110*t115*t21-3.4848d+4*t111*t14*t200- 8555 @ 2.904d+4*t113*t14*t154-7.92d+3*t110*t115*t14)*t95*t96-9.3 8556 1 05257363491002d-1*t104*t132*(-4.8d+1*t126*t64-4.8d+1*t107 8557 2 *t124*t64-1.92d+2*t122*t127*t63-9.6d+1*t126*t63-2.88d+2*t 8558 3 107*t124*t63-8.64d+2*t122*t127*t62-4.8d+1*t126*t62-4.8d+2 8559 4 *t120*t125*t62-4.32d+2*t107*t124*t62-1.152d+3*t122*t127*t 8560 5 61-1.92d+3*t120*t125*t61-1.92d+2*t107*t124*t61-9.6d+2*t11 8561 6 8*t123*t61-4.8d+2*t122*t127*t60-2.4d+3*t120*t125*t60-3.6d 8562 7 +3*t118*t123*t60-1.68d+3*t116*t121*t60-9.6d+2*t120*t125*t 8563 8 59-4.32d+3*t118*t123*t59-6.048d+3*t116*t121*t59-2.688d+3* 8564 9 t114*t119*t59-1.68d+3*t118*t123*t58-7.056d+3*t116*t121*t5 8565 : 8-9.408d+3*t114*t119*t58-4.032d+3*t112*t117*t58-2.688d+3* 8566 ; t116*t121*t57-1.0752d+4*t114*t119*t57-1.3824d+4*t112*t117 8567 < *t57-5.76d+3*t110*t115*t57-7.92d+3*t113*t154*t56-4.032d+3 8568 = *t114*t119*t56-1.5552d+4*t112*t117*t56-1.944d+4*t110*t115 8569 > *t56-1.056d+4*t111*t200*t55-2.64d+4*t113*t154*t55-5.76d+3 8570 ? *t112*t117*t55-2.16d+4*t110*t115*t55-1.3728d+4*t108*t261* 8571 @ t54-3.4848d+4*t111*t200*t54-2.904d+4*t113*t154*t54-7.92d+ 8572 1 3*t110*t115*t54)*t96+t134*(-4.8d+1*t126*t78-4.8d+1*t107*t 8573 2 124*t78-1.92d+2*t122*t127*t77-9.6d+1*t126*t77-2.88d+2*t10 8574 3 7*t124*t77-8.64d+2*t122*t127*t76-4.8d+1*t126*t76-4.8d+2*t 8575 4 120*t125*t76-4.32d+2*t107*t124*t76-1.152d+3*t122*t127*t75 8576 5 -1.92d+3*t120*t125*t75-1.92d+2*t107*t124*t75-9.6d+2*t118* 8577 6 t123*t75-4.8d+2*t122*t127*t74-2.4d+3*t120*t125*t74-3.6d+3 8578 7 *t118*t123*t74-1.68d+3*t116*t121*t74-9.6d+2*t120*t125*t73 8579 8 -4.32d+3*t118*t123*t73-6.048d+3*t116*t121*t73-2.688d+3*t1 8580 9 14*t119*t73-1.68d+3*t118*t123*t72-7.056d+3*t116*t121*t72- 8581 : 9.408d+3*t114*t119*t72-4.032d+3*t112*t117*t72-2.688d+3*t1 8582 ; 16*t121*t71-1.0752d+4*t114*t119*t71-1.3824d+4*t112*t117*t 8583 < 71-5.76d+3*t110*t115*t71-7.92d+3*t113*t154*t70-4.032d+3*t 8584 = 114*t119*t70-1.5552d+4*t112*t117*t70-1.944d+4*t110*t115*t 8585 > 70-1.056d+4*t111*t200*t69-2.64d+4*t113*t154*t69-5.76d+3*t 8586 ? 112*t117*t69-2.16d+4*t110*t115*t69-1.3728d+4*t108*t261*t6 8587 @ 8-3.4848d+4*t111*t200*t68-2.904d+4*t113*t154*t68-7.92d+3* 8588 1 t110*t115*t68)*t95+t132*t134*(-4.8d+1*t126*t91-4.8d+1*t10 8589 2 7*t124*t91-1.92d+2*t122*t127*t90-9.6d+1*t126*t90-2.88d+2* 8590 3 t107*t124*t90-8.64d+2*t122*t127*t89-4.8d+1*t126*t89-4.8d+ 8591 4 2*t120*t125*t89-4.32d+2*t107*t124*t89-1.152d+3*t122*t127* 8592 5 t88-1.92d+3*t120*t125*t88-1.92d+2*t107*t124*t88-9.6d+2*t1 8593 6 18*t123*t88-4.8d+2*t122*t127*t87-2.4d+3*t120*t125*t87-3.6 8594 7 d+3*t118*t123*t87-1.68d+3*t116*t121*t87-9.6d+2*t120*t125* 8595 8 t86-4.32d+3*t118*t123*t86-6.048d+3*t116*t121*t86-2.688d+3 8596 9 *t114*t119*t86-1.68d+3*t118*t123*t85-7.056d+3*t116*t121*t 8597 : 85-9.408d+3*t114*t119*t85-4.032d+3*t112*t117*t85-2.688d+3 8598 ; *t116*t121*t84-1.0752d+4*t114*t119*t84-1.3824d+4*t112*t11 8599 < 7*t84-5.76d+3*t110*t115*t84-7.92d+3*t113*t154*t83-4.032d+ 8600 = 3*t114*t119*t83-1.5552d+4*t112*t117*t83-1.944d+4*t110*t11 8601 > 5*t83-1.056d+4*t111*t200*t82-2.64d+4*t113*t154*t82-5.76d+ 8602 ? 3*t112*t117*t82-2.16d+4*t110*t115*t82-1.3728d+4*t108*t261 8603 @ *t81-3.4848d+4*t111*t200*t81-2.904d+4*t113*t154*t81-7.92d 8604 1 +3*t110*t115*t81))*wght+Mmat3(iq,D3_GBB_TA_TA) 8605 elseif (rhoa.gt.tol_rho.and.rhob.le.tol_rho) then 8606 t1 = 1/rhoa**2.6666666666666666d+0 8607 t2 = 4.492667444378077d-3*gammaaa*t1+1.0d+0 8608 t3 = 8.04d-1*(1.0d+0-1.0d+0/t2)+1.0d+0 8609 t4 = rhoa**1.3333333333333333d+0 8610 t5 = rhoa**3.333333333333333d-1 8611 t6 = 1/t5 8612 t7 = 1/rhoa 8613 t8 = 1.282782438530422d-1*t6-2.63857249068588d-4*t7 8614 t9 = rhoa**6.666666666666666d-1 8615 t10 = exp(-2.4308265985843178d+2*t9) 8616 t11 = t10*t8+2.63857249068588d-4*t7-1.924173657795633d-1*t6+ 8617 1 3.544907701811032d+0*erf(1.5591108358883013d+1*t5) 8618 t12 = 1.0d+0-4.275941461768073d-2*t11*t6 8619 t13 = param(12) 8620 t14 = rhoa**1.6666666666666669d+0 8621 t15 = 9.115599744691192d+0*t14 8622 t16 = t15-2.0d+0*taua 8623 t17 = t16**11 8624 t18 = 2.0d+0*taua+t15 8625 t19 = 1/t18**11 8626 t20 = param(11) 8627 t21 = t16**10 8628 t22 = 1/t18**10 8629 t23 = param(10) 8630 t24 = t16**9 8631 t25 = 1/t18**9 8632 t26 = param(9) 8633 t27 = t16**8 8634 t28 = 1/t18**8 8635 t29 = param(8) 8636 t30 = t16**7 8637 t31 = 1/t18**7 8638 t32 = param(7) 8639 t33 = t16**6 8640 t34 = 1/t18**6 8641 t35 = param(6) 8642 t36 = t16**5 8643 t37 = 1/t18**5 8644 t38 = param(5) 8645 t39 = t16**4 8646 t40 = 1/t18**4 8647 t41 = param(4) 8648 t42 = t16**3 8649 t43 = 1/t18**3 8650 t44 = param(3) 8651 t45 = t16**2 8652 t46 = 1/t18**2 8653 t47 = param(2) 8654 t48 = 1/t18 8655 t49 = t16*t47*t48+t44*t45*t46+t41*t42*t43+t38*t39*t40+t35*t3 8656 1 6*t37+t32*t33*t34+t29*t30*t31+t26*t27*t28+t23*t24*t25+t20 8657 2 *t21*t22+t13*t17*t19+param(1) 8658 t50 = exp(-3.6802889260199856d-3*gammaaa*t1) 8659 t51 = 5.52d-1*(1.0d+0-t50)+1.0d+0 8660 t52 = param(24) 8661 t53 = param(23) 8662 t54 = param(22) 8663 t55 = param(21) 8664 t56 = param(20) 8665 t57 = param(19) 8666 t58 = param(18) 8667 t59 = param(17) 8668 t60 = param(16) 8669 t61 = param(15) 8670 t62 = param(14) 8671 t63 = t16*t48*t62+t45*t46*t61+t42*t43*t60+t39*t40*t59+t36*t3 8672 1 7*t58+t33*t34*t57+t30*t31*t56+t27*t28*t55+t24*t25*t54+t21 8673 2 *t22*t53+t17*t19*t52+param(13) 8674 t64 = 9.305257363491002d-1*t12*t4-9.305257363491002d-1*t4 8675 t65 = param(36) 8676 t66 = param(35) 8677 t67 = param(34) 8678 t68 = param(33) 8679 t69 = param(32) 8680 t70 = param(31) 8681 t71 = param(30) 8682 t72 = param(29) 8683 t73 = param(28) 8684 t74 = param(27) 8685 t75 = param(26) 8686 t76 = t16*t48*t75+t45*t46*t74+t42*t43*t73+t39*t40*t72+t36*t3 8687 1 7*t71+t33*t34*t70+t30*t31*t69+t27*t28*t68+t24*t25*t67+t21 8688 2 *t22*t66+t17*t19*t65+param(25) 8689 t77 = param(48) 8690 t78 = param(47) 8691 t79 = param(46) 8692 t80 = param(45) 8693 t81 = param(44) 8694 t82 = param(43) 8695 t83 = param(42) 8696 t84 = param(41) 8697 t85 = param(40) 8698 t86 = param(39) 8699 t87 = param(38) 8700 t88 = t16*t48*t87+t45*t46*t86+t42*t43*t85+t39*t40*t84+t36*t3 8701 1 7*t83+t33*t34*t82+t30*t31*t81+t27*t28*t80+t24*t25*t79+t21 8702 2 *t22*t78+t17*t19*t77+param(37) 8703 t89 = 1/t18**12 8704 t90 = -1.6711932865267184d+2*t13*t17*t89*t9+1.51926662411519 8705 1 86d+1*t47*t48*t9-1.5192666241151986d+1*t16*t46*t47*t9+3.0 8706 2 38533248230397d+1*t16*t44*t46*t9-3.038533248230397d+1*t43 8707 3 *t44*t45*t9+4.5577998723455965d+1*t41*t43*t45*t9-4.557799 8708 4 8723455965d+1*t40*t41*t42*t9+6.077066496460795d+1*t38*t40 8709 5 *t42*t9-6.077066496460795d+1*t37*t38*t39*t9+7.59633312057 8710 6 5993d+1*t35*t37*t39*t9-7.596333120575993d+1*t34*t35*t36*t 8711 7 9+9.115599744691193d+1*t32*t34*t36*t9-9.115599744691193d+ 8712 8 1*t31*t32*t33*t9+1.0634866368806391d+2*t29*t31*t33*t9-1.0 8713 9 634866368806391d+2*t28*t29*t30*t9+1.2154132992921589d+2*t 8714 : 26*t28*t30*t9-1.2154132992921589d+2*t25*t26*t27*t9+1.3673 8715 ; 399617036788d+2*t23*t25*t27*t9-1.3673399617036788d+2*t22* 8716 < t23*t24*t9+1.5192666241151986d+2*t20*t22*t24*t9-1.5192666 8717 = 241151986d+2*t19*t20*t21*t9+1.6711932865267184d+2*t13*t19 8718 > *t21*t9 8719 t91 = -1.6711932865267184d+2*t17*t52*t89*t9+1.51926662411519 8720 1 86d+1*t48*t62*t9-1.5192666241151986d+1*t16*t46*t62*t9+3.0 8721 2 38533248230397d+1*t16*t46*t61*t9-3.038533248230397d+1*t43 8722 3 *t45*t61*t9+4.5577998723455965d+1*t43*t45*t60*t9-4.557799 8723 4 8723455965d+1*t40*t42*t60*t9+6.077066496460795d+1*t40*t42 8724 5 *t59*t9-6.077066496460795d+1*t37*t39*t59*t9+7.59633312057 8725 6 5993d+1*t37*t39*t58*t9-7.596333120575993d+1*t34*t36*t58*t 8726 7 9+9.115599744691193d+1*t34*t36*t57*t9-9.115599744691193d+ 8727 8 1*t31*t33*t57*t9+1.0634866368806391d+2*t31*t33*t56*t9-1.0 8728 9 634866368806391d+2*t28*t30*t56*t9+1.2154132992921589d+2*t 8729 : 28*t30*t55*t9-1.2154132992921589d+2*t25*t27*t55*t9+1.3673 8730 ; 399617036788d+2*t25*t27*t54*t9-1.3673399617036788d+2*t22* 8731 < t24*t54*t9+1.5192666241151986d+2*t22*t24*t53*t9-1.5192666 8732 = 241151986d+2*t19*t21*t53*t9+1.6711932865267184d+2*t19*t21 8733 > *t52*t9 8734 t92 = -1.6711932865267184d+2*t17*t65*t89*t9+1.51926662411519 8735 1 86d+1*t48*t75*t9-1.5192666241151986d+1*t16*t46*t75*t9+3.0 8736 2 38533248230397d+1*t16*t46*t74*t9-3.038533248230397d+1*t43 8737 3 *t45*t74*t9+4.5577998723455965d+1*t43*t45*t73*t9-4.557799 8738 4 8723455965d+1*t40*t42*t73*t9+6.077066496460795d+1*t40*t42 8739 5 *t72*t9-6.077066496460795d+1*t37*t39*t72*t9+7.59633312057 8740 6 5993d+1*t37*t39*t71*t9-7.596333120575993d+1*t34*t36*t71*t 8741 7 9+9.115599744691193d+1*t34*t36*t70*t9-9.115599744691193d+ 8742 8 1*t31*t33*t70*t9+1.0634866368806391d+2*t31*t33*t69*t9-1.0 8743 9 634866368806391d+2*t28*t30*t69*t9+1.2154132992921589d+2*t 8744 : 28*t30*t68*t9-1.2154132992921589d+2*t25*t27*t68*t9+1.3673 8745 ; 399617036788d+2*t25*t27*t67*t9-1.3673399617036788d+2*t22* 8746 < t24*t67*t9+1.5192666241151986d+2*t22*t24*t66*t9-1.5192666 8747 = 241151986d+2*t19*t21*t66*t9+1.6711932865267184d+2*t19*t21 8748 > *t65*t9 8749 t93 = -1.6711932865267184d+2*t17*t77*t89*t9+1.51926662411519 8750 1 86d+1*t48*t87*t9-1.5192666241151986d+1*t16*t46*t87*t9+3.0 8751 2 38533248230397d+1*t16*t46*t86*t9-3.038533248230397d+1*t43 8752 3 *t45*t86*t9+4.5577998723455965d+1*t43*t45*t85*t9-4.557799 8753 4 8723455965d+1*t40*t42*t85*t9+6.077066496460795d+1*t40*t42 8754 5 *t84*t9-6.077066496460795d+1*t37*t39*t84*t9+7.59633312057 8755 6 5993d+1*t37*t39*t83*t9-7.596333120575993d+1*t34*t36*t83*t 8756 7 9+9.115599744691193d+1*t34*t36*t82*t9-9.115599744691193d+ 8757 8 1*t31*t33*t82*t9+1.0634866368806391d+2*t31*t33*t81*t9-1.0 8758 9 634866368806391d+2*t28*t30*t81*t9+1.2154132992921589d+2*t 8759 : 28*t30*t80*t9-1.2154132992921589d+2*t25*t27*t80*t9+1.3673 8760 ; 399617036788d+2*t25*t27*t79*t9-1.3673399617036788d+2*t22* 8761 < t24*t79*t9+1.5192666241151986d+2*t22*t24*t78*t9-1.5192666 8762 = 241151986d+2*t19*t21*t78*t9+1.6711932865267184d+2*t19*t21 8763 > *t77*t9 8764 t94 = 1/t2**2 8765 t95 = 1/rhoa**2.3333333333333334d+0 8766 t96 = 1/t4 8767 t97 = rhoa**2 8768 t98 = 1/t97 8769 t99 = 2.63857249068588d-4*t98-4.2759414617680735d-2*t96 8770 t100 = 5.641895835477563d-1 8771 t101 = 1/t9 8772 t102 = t10*t99-2.63857249068588d-4*t98+6.41391219265211d-2*t 8773 1 96-1.6205510657228786d+2*t10*t6*t8+3.6846026734116505d+1* 8774 2 t10*t100*t101 8775 t103 = 1.4253138205893576d-2*t11*t96-4.275941461768073d-2*t1 8776 1 02*t6 8777 t104 = 1/rhoa**3.6666666666666664d+0 8778 t105 = 1.2407009817988002d+0*t12*t5-1.2407009817988002d+0*t5 8779 1 +9.305257363491002d-1*t103*t4 8780 t106 = -2.2d+1*t13*t17*t89-2.0d+0*t47*t48-2.0d+0*t16*t46*t47 8781 1 -4.0d+0*t16*t44*t46-4.0d+0*t43*t44*t45-6.0d+0*t41*t43*t45 8782 2 -6.0d+0*t40*t41*t42-8.0d+0*t38*t40*t42-8.0d+0*t37*t38*t39 8783 3 -1.0d+1*t35*t37*t39-1.0d+1*t34*t35*t36-1.2d+1*t32*t34*t36 8784 4 -1.2d+1*t31*t32*t33-1.4d+1*t29*t31*t33-1.4d+1*t28*t29*t30 8785 5 -1.6d+1*t26*t28*t30-1.6d+1*t25*t26*t27-1.8d+1*t23*t25*t27 8786 6 -1.8d+1*t22*t23*t24-2.0d+1*t20*t22*t24-2.0d+1*t19*t20*t21 8787 7 -2.2d+1*t13*t19*t21 8788 t107 = -2.2d+1*t17*t52*t89-2.0d+0*t48*t62-2.0d+0*t16*t46*t62 8789 1 -4.0d+0*t16*t46*t61-4.0d+0*t43*t45*t61-6.0d+0*t43*t45*t60 8790 2 -6.0d+0*t40*t42*t60-8.0d+0*t40*t42*t59-8.0d+0*t37*t39*t59 8791 3 -1.0d+1*t37*t39*t58-1.0d+1*t34*t36*t58-1.2d+1*t34*t36*t57 8792 4 -1.2d+1*t31*t33*t57-1.4d+1*t31*t33*t56-1.4d+1*t28*t30*t56 8793 5 -1.6d+1*t28*t30*t55-1.6d+1*t25*t27*t55-1.8d+1*t25*t27*t54 8794 6 -1.8d+1*t22*t24*t54-2.0d+1*t22*t24*t53-2.0d+1*t19*t21*t53 8795 7 -2.2d+1*t19*t21*t52 8796 t108 = -2.2d+1*t17*t65*t89-2.0d+0*t48*t75-2.0d+0*t16*t46*t75 8797 1 -4.0d+0*t16*t46*t74-4.0d+0*t43*t45*t74-6.0d+0*t43*t45*t73 8798 2 -6.0d+0*t40*t42*t73-8.0d+0*t40*t42*t72-8.0d+0*t37*t39*t72 8799 3 -1.0d+1*t37*t39*t71-1.0d+1*t34*t36*t71-1.2d+1*t34*t36*t70 8800 4 -1.2d+1*t31*t33*t70-1.4d+1*t31*t33*t69-1.4d+1*t28*t30*t69 8801 5 -1.6d+1*t28*t30*t68-1.6d+1*t25*t27*t68-1.8d+1*t25*t27*t67 8802 6 -1.8d+1*t22*t24*t67-2.0d+1*t22*t24*t66-2.0d+1*t19*t21*t66 8803 7 -2.2d+1*t19*t21*t65 8804 t109 = -2.2d+1*t17*t77*t89-2.0d+0*t48*t87-2.0d+0*t16*t46*t87 8805 1 -4.0d+0*t16*t46*t86-4.0d+0*t43*t45*t86-6.0d+0*t43*t45*t85 8806 2 -6.0d+0*t40*t42*t85-8.0d+0*t40*t42*t84-8.0d+0*t37*t39*t84 8807 3 -1.0d+1*t37*t39*t83-1.0d+1*t34*t36*t83-1.2d+1*t34*t36*t82 8808 4 -1.2d+1*t31*t33*t82-1.4d+1*t31*t33*t81-1.4d+1*t28*t30*t81 8809 5 -1.6d+1*t28*t30*t80-1.6d+1*t25*t27*t80-1.8d+1*t25*t27*t79 8810 6 -1.8d+1*t22*t24*t79-2.0d+1*t22*t24*t78-2.0d+1*t19*t21*t78 8811 7 -2.2d+1*t19*t21*t77 8812 t110 = 1/t18**13 8813 t111 = -1.1141288576844789d+2*t13*t17*t6*t89+2.5389881826654 8814 1 315d+4*t20*t21*t4*t89-5.585774001863949d+4*t13*t21*t4*t89 8815 2 +1.0128444160767991d+1*t47*t48*t6-1.0128444160767991d+1*t 8816 3 16*t46*t47*t6+2.0256888321535982d+1*t16*t44*t46*t6-2.0256 8817 4 888321535982d+1*t43*t44*t45*t6+3.038533248230397d+1*t41*t 8818 5 43*t45*t6-3.038533248230397d+1*t40*t41*t42*t6+4.051377664 8819 6 3071964d+1*t38*t40*t42*t6-4.0513776643071964d+1*t37*t38*t 8820 7 39*t6+5.064222080383994d+1*t35*t37*t39*t6-5.0642220803839 8821 8 94d+1*t34*t35*t36*t6+6.077066496460795d+1*t32*t34*t36*t6- 8822 9 6.077066496460795d+1*t31*t32*t33*t6+7.089910912537593d+1* 8823 : t29*t31*t33*t6-7.089910912537593d+1*t28*t29*t30*t6+8.1027 8824 ; 55328614393d+1*t26*t28*t30*t6-8.102755328614393d+1*t25*t2 8825 < 6*t27*t6+9.115599744691191d+1*t23*t25*t27*t6-9.1155997446 8826 = 91191d+1*t22*t23*t24*t6+1.012844416076799d+2*t20*t22*t24* 8827 > t6-1.012844416076799d+2*t19*t20*t21*t6+1.1141288576844789 8828 ? d+2*t13*t19*t21*t6-4.6163421503007845d+2*t4*t46*t47+4.616 8829 @ 3421503007845d+2*t16*t4*t43*t47+4.6163421503007845d+2*t4* 8830 1 t44*t46+1.3849026450902355d+3*t4*t40*t44*t45-4.1547079352 8831 2 707067d+3*t4*t40*t41*t45+2.769805290180471d+3*t38*t4*t40* 8832 3 t45-1.846536860120314d+3*t16*t4*t43*t44+1.384902645090235 8833 4 5d+3*t16*t4*t41*t43+2.769805290180471d+3*t37*t4*t41*t42-7 8834 5 .386147440481255d+3*t37*t38*t4*t42+4.616342150300784d+3*t 8835 6 35*t37*t4*t42+4.616342150300784d+3*t34*t38*t39*t4-1.15408 8836 7 5537575196d+4*t34*t35*t39*t4+6.924513225451178d+3*t32*t34 8837 8 *t39*t4+6.924513225451178d+3*t31*t35*t36*t4-1.66188317410 8838 9 8283d+4*t31*t32*t36*t4+9.694318515631648d+3*t29*t31*t36*t 8839 : 4+9.694318515631648d+3*t28*t32*t33*t4-2.2620076536473846d 8840 ; +4*t28*t29*t33*t4+1.2925758020842196d+4*t26*t28*t33*t4+1. 8841 < 2925758020842196d+4*t25*t29*t30*t4-2.954458976192502d+4*t 8842 = 25*t26*t30*t4+1.6618831741082823d+4*t23*t25*t30*t4+1.6618 8843 > 831741082823d+4*t22*t26*t27*t4-3.7392371417436354d+4*t22* 8844 ? t23*t27*t4+2.0773539676353528d+4*t20*t22*t27*t4+2.0773539 8845 @ 676353528d+4*t19*t23*t24*t4-4.616342150300784d+4*t19*t20* 8846 1 t24*t4+2.5389881826654315d+4*t13*t19*t24*t4+3.04678581919 8847 2 8518d+4*t110*t13*t17*t4 8848 t112 = -1.1141288576844789d+2*t17*t52*t6*t89+2.5389881826654 8849 1 315d+4*t21*t4*t53*t89-5.585774001863949d+4*t21*t4*t52*t89 8850 2 +1.0128444160767991d+1*t48*t6*t62-1.0128444160767991d+1*t 8851 3 16*t46*t6*t62-4.6163421503007845d+2*t4*t46*t62+4.61634215 8852 4 03007845d+2*t16*t4*t43*t62+2.0256888321535982d+1*t16*t46* 8853 5 t6*t61-2.0256888321535982d+1*t43*t45*t6*t61+4.61634215030 8854 6 07845d+2*t4*t46*t61+1.3849026450902355d+3*t4*t40*t45*t61- 8855 7 1.846536860120314d+3*t16*t4*t43*t61+3.038533248230397d+1* 8856 8 t43*t45*t6*t60-3.038533248230397d+1*t40*t42*t6*t60-4.1547 8857 9 079352707067d+3*t4*t40*t45*t60+1.3849026450902355d+3*t16* 8858 : t4*t43*t60+2.769805290180471d+3*t37*t4*t42*t60+4.05137766 8859 ; 43071964d+1*t40*t42*t59*t6-4.0513776643071964d+1*t37*t39* 8860 < t59*t6+5.064222080383994d+1*t37*t39*t58*t6-5.064222080383 8861 = 994d+1*t34*t36*t58*t6+6.077066496460795d+1*t34*t36*t57*t6 8862 > -6.077066496460795d+1*t31*t33*t57*t6+7.089910912537593d+1 8863 ? *t31*t33*t56*t6-7.089910912537593d+1*t28*t30*t56*t6+8.102 8864 @ 755328614393d+1*t28*t30*t55*t6-8.102755328614393d+1*t25*t 8865 1 27*t55*t6+9.115599744691191d+1*t25*t27*t54*t6-9.115599744 8866 2 691191d+1*t22*t24*t54*t6+1.012844416076799d+2*t22*t24*t53 8867 3 *t6-1.012844416076799d+2*t19*t21*t53*t6+1.114128857684478 8868 4 9d+2*t19*t21*t52*t6+2.769805290180471d+3*t4*t40*t45*t59-7 8869 5 .386147440481255d+3*t37*t4*t42*t59+4.616342150300784d+3*t 8870 6 34*t39*t4*t59+4.616342150300784d+3*t37*t4*t42*t58-1.15408 8871 7 5537575196d+4*t34*t39*t4*t58+6.924513225451178d+3*t31*t36 8872 8 *t4*t58+6.924513225451178d+3*t34*t39*t4*t57-1.66188317410 8873 9 8283d+4*t31*t36*t4*t57+9.694318515631648d+3*t28*t33*t4*t5 8874 : 7+9.694318515631648d+3*t31*t36*t4*t56-2.2620076536473846d 8875 ; +4*t28*t33*t4*t56+1.2925758020842196d+4*t25*t30*t4*t56+1. 8876 < 2925758020842196d+4*t28*t33*t4*t55-2.954458976192502d+4*t 8877 = 25*t30*t4*t55+1.6618831741082823d+4*t22*t27*t4*t55+1.6618 8878 > 831741082823d+4*t25*t30*t4*t54-3.7392371417436354d+4*t22* 8879 ? t27*t4*t54+2.0773539676353528d+4*t19*t24*t4*t54+2.0773539 8880 @ 676353528d+4*t22*t27*t4*t53-4.616342150300784d+4*t19*t24* 8881 1 t4*t53+2.5389881826654315d+4*t19*t24*t4*t52+3.04678581919 8882 2 8518d+4*t110*t17*t4*t52 8883 t113 = 2.5389881826654315d+4*t21*t4*t66*t89-1.11412885768447 8884 1 89d+2*t17*t6*t65*t89-5.585774001863949d+4*t21*t4*t65*t89+ 8885 2 1.0128444160767991d+1*t48*t6*t75-1.0128444160767991d+1*t1 8886 3 6*t46*t6*t75-4.6163421503007845d+2*t4*t46*t75+4.616342150 8887 4 3007845d+2*t16*t4*t43*t75+2.0256888321535982d+1*t16*t46*t 8888 5 6*t74-2.0256888321535982d+1*t43*t45*t6*t74+4.616342150300 8889 6 7845d+2*t4*t46*t74+1.3849026450902355d+3*t4*t40*t45*t74-1 8890 7 .846536860120314d+3*t16*t4*t43*t74+3.038533248230397d+1*t 8891 8 43*t45*t6*t73-3.038533248230397d+1*t40*t42*t6*t73-4.15470 8892 9 79352707067d+3*t4*t40*t45*t73+1.3849026450902355d+3*t16*t 8893 : 4*t43*t73+2.769805290180471d+3*t37*t4*t42*t73+4.051377664 8894 ; 3071964d+1*t40*t42*t6*t72-4.0513776643071964d+1*t37*t39*t 8895 < 6*t72+2.769805290180471d+3*t4*t40*t45*t72-7.3861474404812 8896 = 55d+3*t37*t4*t42*t72+4.616342150300784d+3*t34*t39*t4*t72+ 8897 > 5.064222080383994d+1*t37*t39*t6*t71-5.064222080383994d+1* 8898 ? t34*t36*t6*t71+4.616342150300784d+3*t37*t4*t42*t71-1.1540 8899 @ 85537575196d+4*t34*t39*t4*t71+6.924513225451178d+3*t31*t3 8900 1 6*t4*t71+6.077066496460795d+1*t34*t36*t6*t70-6.0770664964 8901 2 60795d+1*t31*t33*t6*t70+6.924513225451178d+3*t34*t39*t4*t 8902 3 70-1.661883174108283d+4*t31*t36*t4*t70+9.694318515631648d 8903 4 +3*t28*t33*t4*t70+7.089910912537593d+1*t31*t33*t6*t69-7.0 8904 5 89910912537593d+1*t28*t30*t6*t69+9.694318515631648d+3*t31 8905 6 *t36*t4*t69-2.2620076536473846d+4*t28*t33*t4*t69+1.292575 8906 7 8020842196d+4*t25*t30*t4*t69+8.102755328614393d+1*t28*t30 8907 8 *t6*t68-8.102755328614393d+1*t25*t27*t6*t68+1.29257580208 8908 9 42196d+4*t28*t33*t4*t68-2.954458976192502d+4*t25*t30*t4*t 8909 : 68+1.6618831741082823d+4*t22*t27*t4*t68+9.115599744691191 8910 ; d+1*t25*t27*t6*t67-9.115599744691191d+1*t22*t24*t6*t67+1. 8911 < 6618831741082823d+4*t25*t30*t4*t67-3.7392371417436354d+4* 8912 = t22*t27*t4*t67+2.0773539676353528d+4*t19*t24*t4*t67+1.012 8913 > 844416076799d+2*t22*t24*t6*t66-1.012844416076799d+2*t19*t 8914 ? 21*t6*t66+2.0773539676353528d+4*t22*t27*t4*t66-4.61634215 8915 @ 0300784d+4*t19*t24*t4*t66+1.1141288576844789d+2*t19*t21*t 8916 1 6*t65+2.5389881826654315d+4*t19*t24*t4*t65+3.046785819198 8917 2 518d+4*t110*t17*t4*t65 8918 t114 = 2.5389881826654315d+4*t21*t4*t78*t89-1.11412885768447 8919 1 89d+2*t17*t6*t77*t89-5.585774001863949d+4*t21*t4*t77*t89+ 8920 2 1.0128444160767991d+1*t48*t6*t87-1.0128444160767991d+1*t1 8921 3 6*t46*t6*t87-4.6163421503007845d+2*t4*t46*t87+4.616342150 8922 4 3007845d+2*t16*t4*t43*t87+2.0256888321535982d+1*t16*t46*t 8923 5 6*t86-2.0256888321535982d+1*t43*t45*t6*t86+4.616342150300 8924 6 7845d+2*t4*t46*t86+1.3849026450902355d+3*t4*t40*t45*t86-1 8925 7 .846536860120314d+3*t16*t4*t43*t86+3.038533248230397d+1*t 8926 8 43*t45*t6*t85-3.038533248230397d+1*t40*t42*t6*t85-4.15470 8927 9 79352707067d+3*t4*t40*t45*t85+1.3849026450902355d+3*t16*t 8928 : 4*t43*t85+2.769805290180471d+3*t37*t4*t42*t85+4.051377664 8929 ; 3071964d+1*t40*t42*t6*t84-4.0513776643071964d+1*t37*t39*t 8930 < 6*t84+2.769805290180471d+3*t4*t40*t45*t84-7.3861474404812 8931 = 55d+3*t37*t4*t42*t84+4.616342150300784d+3*t34*t39*t4*t84+ 8932 > 5.064222080383994d+1*t37*t39*t6*t83-5.064222080383994d+1* 8933 ? t34*t36*t6*t83+4.616342150300784d+3*t37*t4*t42*t83-1.1540 8934 @ 85537575196d+4*t34*t39*t4*t83+6.924513225451178d+3*t31*t3 8935 1 6*t4*t83+6.077066496460795d+1*t34*t36*t6*t82-6.0770664964 8936 2 60795d+1*t31*t33*t6*t82+6.924513225451178d+3*t34*t39*t4*t 8937 3 82-1.661883174108283d+4*t31*t36*t4*t82+9.694318515631648d 8938 4 +3*t28*t33*t4*t82+7.089910912537593d+1*t31*t33*t6*t81-7.0 8939 5 89910912537593d+1*t28*t30*t6*t81+9.694318515631648d+3*t31 8940 6 *t36*t4*t81-2.2620076536473846d+4*t28*t33*t4*t81+1.292575 8941 7 8020842196d+4*t25*t30*t4*t81+8.102755328614393d+1*t28*t30 8942 8 *t6*t80-8.102755328614393d+1*t25*t27*t6*t80+1.29257580208 8943 9 42196d+4*t28*t33*t4*t80-2.954458976192502d+4*t25*t30*t4*t 8944 : 80+1.6618831741082823d+4*t22*t27*t4*t80+9.115599744691191 8945 ; d+1*t25*t27*t6*t79-9.115599744691191d+1*t22*t24*t6*t79+1. 8946 < 6618831741082823d+4*t25*t30*t4*t79-3.7392371417436354d+4* 8947 = t22*t27*t4*t79+2.0773539676353528d+4*t19*t24*t4*t79+1.012 8948 > 844416076799d+2*t22*t24*t6*t78-1.012844416076799d+2*t19*t 8949 ? 21*t6*t78+2.0773539676353528d+4*t22*t27*t4*t78-4.61634215 8950 @ 0300784d+4*t19*t24*t4*t78+1.1141288576844789d+2*t19*t21*t 8951 1 6*t77+2.5389881826654315d+4*t19*t24*t4*t77+3.046785819198 8952 2 518d+4*t110*t17*t4*t77 8953 t115 = gammaaa**2 8954 t116 = 1/t2**3 8955 t117 = 1/rhoa**6 8956 t118 = 1/rhoa**3.3333333333333337d+0 8957 t119 = 1/rhoa**3 8958 t120 = 5.701255282357431d-2*t95-5.27714498137176d-4*t119 8959 t121 = 1/t14 8960 t122 = -3.241102131445757d+2*t10*t6*t99+5.401836885742928d+1 8961 1 *t10*t8*t96-8.551882923536147d-2*t95+2.626185756615557d+4 8962 2 *t10*t101*t8-5.971086789162617d+3*t10*t100*t7-2.456401782 8963 3 2744336d+1*t10*t100*t121+t10*t120+5.27714498137176d-4*t11 8964 4 9 8965 t123 = 2.850627641178715d-2*t102*t96-1.9004184274524766d-2*t 8966 1 11*t95-4.275941461768073d-2*t122*t6 8967 t124 = 1/rhoa**7.333333333333333d+0 8968 t125 = 1/rhoa**4.666666666666667d+0 8969 t126 = 2.4814019635976003d+0*t103*t5+9.305257363491002d-1*t1 8970 1 23*t4+4.135669939329334d-1*t101*t12-4.135669939329334d-1* 8971 2 t101 8972 t127 = 1.7926167019779404d-2*gammaaa*t12*t90+1.7926167019779 8973 1 404d-2*gammaaa*t103*t49 8974 t128 = -4.135669939329334d-1*t12*t51*t63-4.135669939329334d- 8975 1 1*t12*t3*t49 8976 t129 = 1.0082032889066277d-2*gammaaa*t12*t50*t91+1.008203288 8977 1 9066277d-2*gammaaa*t103*t50*t63 8978 t130 = -1.9264558001493193d-2*gammaaa*t64*t92-1.926455800149 8979 1 3193d-2*gammaaa*t105*t76 8980 t131 = -1.0834770598202839d-2*gammaaa*t50*t64*t93-1.08347705 8981 1 98202839d-2*gammaaa*t105*t50*t88 8982 t132 = 1/rhoa**5 8983 t133 = 1/rhoa**6.333333333333333d+0 8984 t134 = -3.361156316208638d-3*t12*t90-3.361156316208638d-3*t1 8985 1 03*t49 8986 t135 = 3.612104625279974d-3*t64*t92+3.612104625279974d-3*t10 8987 1 5*t76 8988 t136 = 1/rhoa**4 8989 t137 = 1/rhoa**5.333333333333333d+0 8990 t138 = 3.342386573053437d+3*t20*t21*t89*t9+6.077066496460795 8991 1 d+1*t16*t43*t47*t9-6.077066496460795d+1*t44*t46*t9+1.8231 8992 2 199489382385d+2*t40*t44*t45*t9-3.646239897876477d+2*t38*t 8993 3 40*t45*t9-1.8231199489382385d+2*t16*t41*t43*t9+3.64623989 8994 4 7876477d+2*t37*t41*t42*t9-6.077066496460795d+2*t35*t37*t4 8995 5 2*t9+6.077066496460795d+2*t34*t38*t39*t9-9.11559974469119 8996 6 2d+2*t32*t34*t39*t9+9.115599744691192d+2*t31*t35*t36*t9-1 8997 7 .276183964256767d+3*t29*t31*t36*t9+1.276183964256767d+3*t 8998 8 28*t32*t33*t9-1.7015786190090226d+3*t26*t28*t33*t9+1.7015 8999 9 786190090226d+3*t25*t29*t30*t9-2.187743938725886d+3*t23*t 9000 : 25*t30*t9+2.187743938725886d+3*t22*t26*t27*t9-2.734679923 9001 ; 407357d+3*t20*t22*t27*t9+2.734679923407357d+3*t19*t23*t24 9002 < *t9-3.342386573053437d+3*t13*t19*t24*t9+4.010863887664124 9003 = 5d+3*t110*t13*t17*t9 9004 t139 = 3.342386573053437d+3*t21*t53*t89*t9+6.077066496460795 9005 1 d+1*t16*t43*t62*t9-6.077066496460795d+1*t46*t61*t9+1.8231 9006 2 199489382385d+2*t40*t45*t61*t9-1.8231199489382385d+2*t16* 9007 3 t43*t60*t9+3.646239897876477d+2*t37*t42*t60*t9-3.64623989 9008 4 7876477d+2*t40*t45*t59*t9+6.077066496460795d+2*t34*t39*t5 9009 5 9*t9-6.077066496460795d+2*t37*t42*t58*t9+9.11559974469119 9010 6 2d+2*t31*t36*t58*t9-9.115599744691192d+2*t34*t39*t57*t9+1 9011 7 .276183964256767d+3*t28*t33*t57*t9-1.276183964256767d+3*t 9012 8 31*t36*t56*t9+1.7015786190090226d+3*t25*t30*t56*t9-1.7015 9013 9 786190090226d+3*t28*t33*t55*t9+2.187743938725886d+3*t22*t 9014 : 27*t55*t9-2.187743938725886d+3*t25*t30*t54*t9+2.734679923 9015 ; 407357d+3*t19*t24*t54*t9-2.734679923407357d+3*t22*t27*t53 9016 < *t9-3.342386573053437d+3*t19*t24*t52*t9+4.010863887664124 9017 = 5d+3*t110*t17*t52*t9 9018 t140 = 3.342386573053437d+3*t21*t66*t89*t9+6.077066496460795 9019 1 d+1*t16*t43*t75*t9-6.077066496460795d+1*t46*t74*t9+1.8231 9020 2 199489382385d+2*t40*t45*t74*t9-1.8231199489382385d+2*t16* 9021 3 t43*t73*t9+3.646239897876477d+2*t37*t42*t73*t9-3.64623989 9022 4 7876477d+2*t40*t45*t72*t9+6.077066496460795d+2*t34*t39*t7 9023 5 2*t9-6.077066496460795d+2*t37*t42*t71*t9+9.11559974469119 9024 6 2d+2*t31*t36*t71*t9-9.115599744691192d+2*t34*t39*t70*t9+1 9025 7 .276183964256767d+3*t28*t33*t70*t9-1.276183964256767d+3*t 9026 8 31*t36*t69*t9+1.7015786190090226d+3*t25*t30*t69*t9-1.7015 9027 9 786190090226d+3*t28*t33*t68*t9+2.187743938725886d+3*t22*t 9028 : 27*t68*t9-2.187743938725886d+3*t25*t30*t67*t9+2.734679923 9029 ; 407357d+3*t19*t24*t67*t9-2.734679923407357d+3*t22*t27*t66 9030 < *t9-3.342386573053437d+3*t19*t24*t65*t9+4.010863887664124 9031 = 5d+3*t110*t17*t65*t9 9032 t141 = 3.342386573053437d+3*t21*t78*t89*t9+6.077066496460795 9033 1 d+1*t16*t43*t87*t9-6.077066496460795d+1*t46*t86*t9+1.8231 9034 2 199489382385d+2*t40*t45*t86*t9-1.8231199489382385d+2*t16* 9035 3 t43*t85*t9+3.646239897876477d+2*t37*t42*t85*t9-3.64623989 9036 4 7876477d+2*t40*t45*t84*t9+6.077066496460795d+2*t34*t39*t8 9037 5 4*t9-6.077066496460795d+2*t37*t42*t83*t9+9.11559974469119 9038 6 2d+2*t31*t36*t83*t9-9.115599744691192d+2*t34*t39*t82*t9+1 9039 7 .276183964256767d+3*t28*t33*t82*t9-1.276183964256767d+3*t 9040 8 31*t36*t81*t9+1.7015786190090226d+3*t25*t30*t81*t9-1.7015 9041 9 786190090226d+3*t28*t33*t80*t9+2.187743938725886d+3*t22*t 9042 : 27*t80*t9-2.187743938725886d+3*t25*t30*t79*t9+2.734679923 9043 ; 407357d+3*t19*t24*t79*t9-2.734679923407357d+3*t22*t27*t78 9044 < *t9-3.342386573053437d+3*t19*t24*t77*t9+4.010863887664124 9045 = 5d+3*t110*t17*t77*t9 9046 t142 = 4.4d+2*t20*t21*t89+9.68d+2*t13*t21*t89+8.0d+0*t46*t47 9047 1 +8.0d+0*t16*t43*t47+8.0d+0*t44*t46+2.4d+1*t40*t44*t45+7.2 9048 2 d+1*t40*t41*t45+4.8d+1*t38*t40*t45+3.2d+1*t16*t43*t44+2.4 9049 3 d+1*t16*t41*t43+4.8d+1*t37*t41*t42+1.28d+2*t37*t38*t42+8. 9050 4 0d+1*t35*t37*t42+8.0d+1*t34*t38*t39+2.0d+2*t34*t35*t39+1. 9051 5 2d+2*t32*t34*t39+1.2d+2*t31*t35*t36+2.88d+2*t31*t32*t36+1 9052 6 .68d+2*t29*t31*t36+1.68d+2*t28*t32*t33+3.92d+2*t28*t29*t3 9053 7 3+2.24d+2*t26*t28*t33+2.24d+2*t25*t29*t30+5.12d+2*t25*t26 9054 8 *t30+2.88d+2*t23*t25*t30+2.88d+2*t22*t26*t27+6.48d+2*t22* 9055 9 t23*t27+3.6d+2*t20*t22*t27+3.6d+2*t19*t23*t24+8.0d+2*t19* 9056 : t20*t24+4.4d+2*t13*t19*t24+5.28d+2*t110*t13*t17 9057 t143 = 4.4d+2*t21*t53*t89+9.68d+2*t21*t52*t89+8.0d+0*t46*t62 9058 1 +8.0d+0*t16*t43*t62+8.0d+0*t46*t61+2.4d+1*t40*t45*t61+3.2 9059 2 d+1*t16*t43*t61+7.2d+1*t40*t45*t60+2.4d+1*t16*t43*t60+4.8 9060 3 d+1*t37*t42*t60+4.8d+1*t40*t45*t59+1.28d+2*t37*t42*t59+8. 9061 4 0d+1*t34*t39*t59+8.0d+1*t37*t42*t58+2.0d+2*t34*t39*t58+1. 9062 5 2d+2*t31*t36*t58+1.2d+2*t34*t39*t57+2.88d+2*t31*t36*t57+1 9063 6 .68d+2*t28*t33*t57+1.68d+2*t31*t36*t56+3.92d+2*t28*t33*t5 9064 7 6+2.24d+2*t25*t30*t56+2.24d+2*t28*t33*t55+5.12d+2*t25*t30 9065 8 *t55+2.88d+2*t22*t27*t55+2.88d+2*t25*t30*t54+6.48d+2*t22* 9066 9 t27*t54+3.6d+2*t19*t24*t54+3.6d+2*t22*t27*t53+8.0d+2*t19* 9067 : t24*t53+4.4d+2*t19*t24*t52+5.28d+2*t110*t17*t52 9068 t144 = 4.4d+2*t21*t66*t89+9.68d+2*t21*t65*t89+8.0d+0*t46*t75 9069 1 +8.0d+0*t16*t43*t75+8.0d+0*t46*t74+2.4d+1*t40*t45*t74+3.2 9070 2 d+1*t16*t43*t74+7.2d+1*t40*t45*t73+2.4d+1*t16*t43*t73+4.8 9071 3 d+1*t37*t42*t73+4.8d+1*t40*t45*t72+1.28d+2*t37*t42*t72+8. 9072 4 0d+1*t34*t39*t72+8.0d+1*t37*t42*t71+2.0d+2*t34*t39*t71+1. 9073 5 2d+2*t31*t36*t71+1.2d+2*t34*t39*t70+2.88d+2*t31*t36*t70+1 9074 6 .68d+2*t28*t33*t70+1.68d+2*t31*t36*t69+3.92d+2*t28*t33*t6 9075 7 9+2.24d+2*t25*t30*t69+2.24d+2*t28*t33*t68+5.12d+2*t25*t30 9076 8 *t68+2.88d+2*t22*t27*t68+2.88d+2*t25*t30*t67+6.48d+2*t22* 9077 9 t27*t67+3.6d+2*t19*t24*t67+3.6d+2*t22*t27*t66+8.0d+2*t19* 9078 : t24*t66+4.4d+2*t19*t24*t65+5.28d+2*t110*t17*t65 9079 t145 = 4.4d+2*t21*t78*t89+9.68d+2*t21*t77*t89+8.0d+0*t46*t87 9080 1 +8.0d+0*t16*t43*t87+8.0d+0*t46*t86+2.4d+1*t40*t45*t86+3.2 9081 2 d+1*t16*t43*t86+7.2d+1*t40*t45*t85+2.4d+1*t16*t43*t85+4.8 9082 3 d+1*t37*t42*t85+4.8d+1*t40*t45*t84+1.28d+2*t37*t42*t84+8. 9083 4 0d+1*t34*t39*t84+8.0d+1*t37*t42*t83+2.0d+2*t34*t39*t83+1. 9084 5 2d+2*t31*t36*t83+1.2d+2*t34*t39*t82+2.88d+2*t31*t36*t82+1 9085 6 .68d+2*t28*t33*t82+1.68d+2*t31*t36*t81+3.92d+2*t28*t33*t8 9086 7 1+2.24d+2*t25*t30*t81+2.24d+2*t28*t33*t80+5.12d+2*t25*t30 9087 8 *t80+2.88d+2*t22*t27*t80+2.88d+2*t25*t30*t79+6.48d+2*t22* 9088 9 t27*t79+3.6d+2*t19*t24*t79+3.6d+2*t22*t27*t78+8.0d+2*t19* 9089 : t24*t78+4.4d+2*t19*t24*t77+5.28d+2*t110*t17*t77 9090 t146 = 1/t18**14 9091 t147 = gammaaa**3 9092 t148 = 1/t2**4 9093 t149 = 1/rhoa**9.666666666666666d+0 9094 t150 = 1/rhoa**7 9095 t151 = 1/rhoa**4.333333333333333d+0 9096 t152 = -4.275941461768073d-2*t6*(1.6205510657228786d+2*t10*t 9097 1 96*t99+7.878557269846671d+4*t10*t101*t99+9.95181131527102 9098 2 9d+3*t10*t100*t98+9.676451059701281d+5*t10*t100*t96-7.202 9099 3 44918099057d+1*t10*t8*t95-4.255868126669586d+6*t10*t7*t8- 9100 4 2.626185756615557d+4*t10*t121*t8-4.8616531971686355d+2*t1 9101 5 0*t120*t6-1.5831434944115283d-3*t136+t10*(1.5831434944115 9102 6 283d-3*t136-1.330292899216734d-1*t118)+1.995439348825101d 9103 7 -1*t118+4.0940029704573894d+1*t1*t10*t100)+4.275941461768 9104 8 0724d-2*t122*t96-5.701255282357429d-2*t102*t95+4.43430966 9105 9 4055779d-2*t11*t118 9106 t153 = 1/rhoa**11 9107 t154 = 1/rhoa**8.333333333333334d+0 9108 t155 = 1/rhoa**5.666666666666667d+0 9109 t156 = 3.7221029453964005d+0*t123*t5+9.305257363491002d-1*t1 9110 1 52*t4-2.7571132928862224d-1*t12*t121+2.7571132928862224d- 9111 2 1*t121+1.2407009817988002d+0*t101*t103 9112 t157 = 1/rhoa**8.666666666666666d+0 9113 t158 = 1/rhoa**10 9114 t159 = 1/rhoa**7.666666666666667d+0 9115 t160 = 1/rhoa**9 9116 t161 = 1/rhoa**6.666666666666667d+0 9117 t162 = 1/rhoa**8 9118 fnc(iq) = 1.0d+0*(t51*t64*t88+t3*t64*t76-9.305257363491002d- 9119 1 1*t12*t4*t51*t63-9.305257363491002d-1*t12*t3*t4*t49)*wght 9120 2 +fnc(iq) 9121 Amat(iq,D1_RA) = 1.0d+0*(8.963083509889702d-3*gammaaa*t12*t4 9122 1 9*t94*t95+5.041016444533138d-3*gammaaa*t12*t50*t63*t95-9. 9123 2 632279000746596d-3*gammaaa*t104*t64*t76*t94+t51*t64*t93+t 9124 3 3*t64*t92-9.305257363491002d-1*t12*t4*t51*t91-9.305257363 9125 4 491002d-1*t12*t3*t4*t90-5.417385299101419d-3*gammaaa*t104 9126 5 *t50*t64*t88+t105*t51*t88+t105*t3*t76-1.2407009817988002d 9127 6 +0*t12*t5*t51*t63-9.305257363491002d-1*t103*t4*t51*t63-1. 9128 7 2407009817988002d+0*t12*t3*t49*t5-9.305257363491002d-1*t1 9129 8 03*t3*t4*t49)*wght+Amat(iq,D1_RA) 9130 Cmat(iq,D1_GAA) = 1.0d+0*(-3.361156316208638d-3*t12*t49*t94* 9131 1 t96-1.890381166699927d-3*t12*t50*t63*t96+3.61210462527997 9132 2 4d-3*t1*t64*t76*t94+2.0315194871630324d-3*t1*t50*t64*t88) 9133 3 *wght+Cmat(iq,D1_GAA) 9134 Mmat(iq,D1_TA) = 1.0d+0*(t109*t51*t64+t108*t3*t64-9.30525736 9135 1 3491002d-1*t107*t12*t4*t51-9.305257363491002d-1*t106*t12* 9136 2 t3*t4)*wght+Mmat(iq,D1_TA) 9137 Mmat(iq,D1_TB) = Mmat(iq,D1_TB) 9138 Amat2(iq,D2_RA_RA) = 1.0d+0*(t127*t94*t95+t129*t95+3.5318356 9139 1 336070855d-2*gammaaa*t125*t64*t76*t94-8.963083509889707d- 9140 2 3*gammaaa*t118*t12*t49*t94+t104*t130*t94+2*t105*t51*t93+2 9141 3 *t105*t3*t92-2.4814019635976003d+0*t12*t5*t51*t91-1.86105 9142 4 14726982003d+0*t103*t4*t51*t91-2.4814019635976003d+0*t12* 9143 5 t3*t5*t90-1.8610514726982003d+0*t103*t3*t4*t90+1.98637460 9144 6 96705204d-2*gammaaa*t125*t50*t64*t88-5.316678166471045d-5 9145 7 *t115*t124*t50*t64*t88+t126*t51*t88-2.3079800683637772d-4 9146 8 *t115*t116*t124*t64*t76+t126*t3*t76+t114*t51*t64+t113*t3* 9147 9 t64-2.4814019635976003d+0*t103*t5*t51*t63-9.3052573634910 9148 : 02d-1*t123*t4*t51*t63-5.041016444533138d-3*gammaaa*t118*t 9149 ; 12*t50*t63+4.947305865786653d-5*t115*t117*t12*t50*t63-9.3 9150 < 05257363491002d-1*t112*t12*t4*t51-2.4814019635976003d+0*t 9151 = 103*t3*t49*t5-9.305257363491002d-1*t123*t3*t4*t49+2.14763 9152 > 48525932504d-4*t115*t116*t117*t12*t49-9.305257363491002d- 9153 ? 1*t111*t12*t3*t4+t104*t131+t101*t128)*wght+Amat2(iq,D2_RA 9154 @ _RA) 9155 Cmat2(iq,D2_RA_GAA) = 1.0d+0*(t134*t94*t96+(-1.8903811666999 9156 1 27d-3*t12*t50*t91-1.890381166699927d-3*t103*t50*t63)*t96+ 9157 2 4.481541754944851d-3*t12*t49*t94*t95+2.520508222266569d-3 9158 3 *t12*t50*t63*t95-9.632279000746596d-3*t104*t64*t76*t94+t1 9159 4 *t135*t94+t1*(2.0315194871630324d-3*t50*t64*t93+2.0315194 9160 5 871630324d-3*t105*t50*t88)+1.9937543124266421d-5*gammaaa* 9161 6 t133*t50*t64*t88-5.417385299101419d-3*t104*t50*t64*t88+8. 9162 7 654925256364164d-5*gammaaa*t116*t133*t64*t76-1.8552396996 9163 8 69995d-5*gammaaa*t12*t132*t50*t63-8.05363069722469d-5*gam 9164 9 maaa*t116*t12*t132*t49)*wght+Cmat2(iq,D2_RA_GAA) 9165 Cmat2(iq,D2_GAA_GAA) = 1.0d+0*(-7.476578671599909d-6*t137*t5 9166 1 0*t64*t88-3.245596971136562d-5*t116*t137*t64*t76+6.957148 9167 2 873762482d-6*t12*t136*t50*t63+3.020111511459258d-5*t116*t 9168 3 12*t136*t49)*wght+Cmat2(iq,D2_GAA_GAA) 9169 Mmat2(iq,D2_RA_TA) = 1.0d+0*(8.963083509889702d-3*gammaaa*t1 9170 1 06*t12*t94*t95+5.041016444533138d-3*gammaaa*t107*t12*t50* 9171 2 t95-9.632279000746596d-3*gammaaa*t104*t108*t64*t94+t141*t 9172 3 51*t64-5.417385299101419d-3*gammaaa*t104*t109*t50*t64+t14 9173 4 0*t3*t64-1.2407009817988002d+0*t107*t12*t5*t51-9.30525736 9174 5 3491002d-1*t12*t139*t4*t51-9.305257363491002d-1*t103*t107 9175 6 *t4*t51+t105*t109*t51-1.2407009817988002d+0*t106*t12*t3*t 9176 7 5-9.305257363491002d-1*t12*t138*t3*t4-9.305257363491002d- 9177 8 1*t103*t106*t3*t4+t105*t108*t3)*wght+Mmat2(iq,D2_RA_TA) 9178 Mmat2(iq,D2_RA_TB) = Mmat2(iq,D2_RA_TB) 9179 Mmat2(iq,D2_GAA_TA) = 1.0d+0*(-3.361156316208638d-3*t106*t12 9180 1 *t94*t96-1.890381166699927d-3*t107*t12*t50*t96+3.61210462 9181 2 5279974d-3*t1*t108*t64*t94+2.0315194871630324d-3*t1*t109* 9182 3 t50*t64)*wght+Mmat2(iq,D2_GAA_TA) 9183 Mmat2(iq,D2_GAA_TB) = Mmat2(iq,D2_GAA_TB) 9184 Mmat2(iq,D2_TA_TA) = 1.0d+0*(t145*t51*t64+t144*t3*t64-9.3052 9185 1 57363491002d-1*t12*t143*t4*t51-9.305257363491002d-1*t12*t 9186 2 142*t3*t4)*wght+Mmat2(iq,D2_TA_TA) 9187 Mmat2(iq,D2_TA_TB) = Mmat2(iq,D2_TA_TB) 9188 Mmat2(iq,D2_TB_TB) = Mmat2(iq,D2_TB_TB) 9189 Amat3(iq,D3_RA_RA_RA) = 1.0d+0*(t51*t64*(-3.4716600044518436 9190 1 d+6*t24*t79*t89*t97+1.1572200014839477d+7*t24*t78*t89*t97 9191 2 -1.2729420016323426d+7*t24*t77*t89*t97+2.104036366334451d 9192 3 +4*t43*t87*t97-2.104036366334451d+4*t16*t40*t87*t97-8.416 9193 4 145465337804d+4*t37*t45*t86*t97-4.208072732668902d+4*t43* 9194 5 t86*t97+1.2624218198006704d+5*t16*t40*t86*t97+3.787265459 9195 6 402013d+5*t37*t45*t85*t97+2.104036366334451d+4*t43*t85*t9 9196 7 7-2.104036366334451d+5*t34*t42*t85*t97-1.8936327297010064 9197 8 d+5*t16*t40*t85*t97-5.049687279202681d+5*t37*t45*t84*t97+ 9198 9 8.416145465337803d+5*t34*t42*t84*t97+8.416145465337804d+4 9199 : *t16*t40*t84*t97-4.2080727326689016d+5*t31*t39*t84*t97+2. 9200 ; 1040363663344508d+5*t37*t45*t83*t97-1.0520181831672254d+6 9201 < *t34*t42*t83*t97+1.578027274750838d+6*t31*t39*t83*t97-7.3 9202 = 64127282170578d+5*t28*t36*t83*t97+4.208072732668902d+5*t3 9203 > 4*t42*t82*t97-1.893632729701006d+6*t31*t39*t82*t97+2.6510 9204 ? 858215814087d+6*t28*t36*t82*t97-1.1782603651472927d+6*t25 9205 @ *t33*t82*t97+7.364127282170578d+5*t31*t39*t81*t97-3.09293 9206 1 34585116436d+6*t28*t36*t81*t97+4.123911278015524d+6*t25*t 9207 2 33*t81*t97-1.7673905477209387d+6*t22*t30*t81*t97+1.178260 9208 3 3651472927d+6*t28*t36*t80*t97-4.713041460589171d+6*t25*t3 9209 4 3*t80*t97+6.059624735043219d+6*t22*t30*t80*t97-2.52484363 9210 5 9601341d+6*t19*t27*t80*t97+1.767390547720939d+6*t25*t33*t 9211 6 79*t97-6.817077826923622d+6*t22*t30*t79*t97+8.52134728365 9212 7 4526d+6*t19*t27*t79*t97+2.524843639601341d+6*t22*t30*t78* 9213 8 t97-9.468163648505028d+6*t19*t27*t78*t97-4.62888000593579 9214 9 2d+6*t110*t21*t78*t97+3.4716600044518436d+6*t19*t27*t77*t 9215 : 97+1.5275304019588112d+7*t110*t21*t77*t97-6.0175440077165 9216 ; 3d+6*t146*t17*t77*t97+3.713762858948263d+1*t17*t77*t89*t9 9217 < 6-3.37614805358933d+0*t48*t87*t96+3.37614805358933d+0*t16 9218 = *t46*t87*t96-6.75229610717866d+0*t16*t46*t86*t96+6.752296 9219 > 10717866d+0*t43*t45*t86*t96-1.0128444160767991d+1*t43*t45 9220 ? *t85*t96+1.0128444160767991d+1*t40*t42*t85*t96-1.35045922 9221 @ 1435732d+1*t40*t42*t84*t96+1.350459221435732d+1*t37*t39*t 9222 1 84*t96-1.6880740267946648d+1*t37*t39*t83*t96+1.6880740267 9223 2 946648d+1*t34*t36*t83*t96-2.0256888321535982d+1*t34*t36*t 9224 3 82*t96+2.0256888321535982d+1*t31*t33*t82*t96-2.3633036375 9225 4 125308d+1*t31*t33*t81*t96+2.3633036375125308d+1*t28*t30*t 9226 5 81*t96-2.700918442871464d+1*t28*t30*t80*t96+2.70091844287 9227 6 1464d+1*t25*t27*t80*t96-3.0385332482303967d+1*t25*t27*t79 9228 7 *t96+3.0385332482303967d+1*t22*t24*t79*t96-3.376148053589 9229 8 3296d+1*t22*t24*t78*t96+3.3761480535893296d+1*t19*t21*t78 9230 9 *t96-3.713762858948263d+1*t19*t21*t77*t96+5.0779763653308 9231 : 62d+4*t21*t5*t78*t89-1.1171548003727898d+5*t21*t5*t77*t89 9232 ; -9.232684300601568d+2*t46*t5*t87+9.232684300601568d+2*t16 9233 < *t43*t5*t87+9.232684300601568d+2*t46*t5*t86+2.76980529018 9234 = 0471d+3*t40*t45*t5*t86-3.693073720240627d+3*t16*t43*t5*t8 9235 > 6-8.309415870541413d+3*t40*t45*t5*t85+2.769805290180471d+ 9236 ? 3*t16*t43*t5*t85+5.539610580360942d+3*t37*t42*t5*t85+5.53 9237 @ 9610580360942d+3*t40*t45*t5*t84-1.4772294880962508d+4*t37 9238 1 *t42*t5*t84+9.232684300601568d+3*t34*t39*t5*t84+9.2326843 9239 2 00601568d+3*t37*t42*t5*t83-2.308171075150392d+4*t34*t39*t 9240 3 5*t83+1.3849026450902355d+4*t31*t36*t5*t83+1.384902645090 9241 4 2355d+4*t34*t39*t5*t82-3.323766348216566d+4*t31*t36*t5*t8 9242 5 2+1.9388637031263292d+4*t28*t33*t5*t82+1.9388637031263292 9243 6 d+4*t31*t36*t5*t81-4.5240153072947686d+4*t28*t33*t5*t81+2 9244 7 .585151604168439d+4*t25*t30*t5*t81+2.585151604168439d+4*t 9245 8 28*t33*t5*t80-5.908917952385003d+4*t25*t30*t5*t80+3.32376 9246 9 63482165647d+4*t22*t27*t5*t80+3.3237663482165647d+4*t25*t 9247 : 30*t5*t79-7.478474283487271d+4*t22*t27*t5*t79+4.154707935 9248 ; 2707056d+4*t19*t24*t5*t79+4.154707935270705d+4*t22*t27*t5 9249 < *t78-9.232684300601568d+4*t19*t24*t5*t78+5.07797636533086 9250 = 3d+4*t19*t24*t5*t77+6.093571638397036d+4*t110*t17*t5*t77) 9251 > +t3*t64*(-3.4716600044518436d+6*t24*t67*t89*t97+1.1572200 9252 ? 014839477d+7*t24*t66*t89*t97-1.2729420016323426d+7*t24*t6 9253 @ 5*t89*t97+2.104036366334451d+4*t43*t75*t97-2.104036366334 9254 1 451d+4*t16*t40*t75*t97-8.416145465337804d+4*t37*t45*t74*t 9255 2 97-4.208072732668902d+4*t43*t74*t97+1.2624218198006704d+5 9256 3 *t16*t40*t74*t97+3.787265459402013d+5*t37*t45*t73*t97+2.1 9257 4 04036366334451d+4*t43*t73*t97-2.104036366334451d+5*t34*t4 9258 5 2*t73*t97-1.8936327297010064d+5*t16*t40*t73*t97-5.0496872 9259 6 79202681d+5*t37*t45*t72*t97+8.416145465337803d+5*t34*t42* 9260 7 t72*t97+8.416145465337804d+4*t16*t40*t72*t97-4.2080727326 9261 8 689016d+5*t31*t39*t72*t97+2.1040363663344508d+5*t37*t45*t 9262 9 71*t97-1.0520181831672254d+6*t34*t42*t71*t97+1.5780272747 9263 : 50838d+6*t31*t39*t71*t97-7.364127282170578d+5*t28*t36*t71 9264 ; *t97+4.208072732668902d+5*t34*t42*t70*t97-1.8936327297010 9265 < 06d+6*t31*t39*t70*t97+2.6510858215814087d+6*t28*t36*t70*t 9266 = 97-1.1782603651472927d+6*t25*t33*t70*t97+7.36412728217057 9267 > 8d+5*t31*t39*t69*t97-3.0929334585116436d+6*t28*t36*t69*t9 9268 ? 7+4.123911278015524d+6*t25*t33*t69*t97-1.7673905477209387 9269 @ d+6*t22*t30*t69*t97+1.1782603651472927d+6*t28*t36*t68*t97 9270 1 -4.713041460589171d+6*t25*t33*t68*t97+6.059624735043219d+ 9271 2 6*t22*t30*t68*t97-2.524843639601341d+6*t19*t27*t68*t97+1. 9272 3 767390547720939d+6*t25*t33*t67*t97-6.817077826923622d+6*t 9273 4 22*t30*t67*t97+8.521347283654526d+6*t19*t27*t67*t97+2.524 9274 5 843639601341d+6*t22*t30*t66*t97-9.468163648505028d+6*t19* 9275 6 t27*t66*t97-4.628880005935792d+6*t110*t21*t66*t97+3.47166 9276 7 00044518436d+6*t19*t27*t65*t97+1.5275304019588112d+7*t110 9277 8 *t21*t65*t97-6.01754400771653d+6*t146*t17*t65*t97+3.71376 9278 9 2858948263d+1*t17*t65*t89*t96-3.37614805358933d+0*t48*t75 9279 : *t96+3.37614805358933d+0*t16*t46*t75*t96-6.75229610717866 9280 ; d+0*t16*t46*t74*t96+6.75229610717866d+0*t43*t45*t74*t96-1 9281 < .0128444160767991d+1*t43*t45*t73*t96+1.0128444160767991d+ 9282 = 1*t40*t42*t73*t96-1.350459221435732d+1*t40*t42*t72*t96+1. 9283 > 350459221435732d+1*t37*t39*t72*t96-1.6880740267946648d+1* 9284 ? t37*t39*t71*t96+1.6880740267946648d+1*t34*t36*t71*t96-2.0 9285 @ 256888321535982d+1*t34*t36*t70*t96+2.0256888321535982d+1* 9286 1 t31*t33*t70*t96-2.3633036375125308d+1*t31*t33*t69*t96+2.3 9287 2 633036375125308d+1*t28*t30*t69*t96-2.700918442871464d+1*t 9288 3 28*t30*t68*t96+2.700918442871464d+1*t25*t27*t68*t96-3.038 9289 4 5332482303967d+1*t25*t27*t67*t96+3.0385332482303967d+1*t2 9290 5 2*t24*t67*t96-3.3761480535893296d+1*t22*t24*t66*t96+3.376 9291 6 1480535893296d+1*t19*t21*t66*t96-3.713762858948263d+1*t19 9292 7 *t21*t65*t96+5.077976365330862d+4*t21*t5*t66*t89-1.117154 9293 8 8003727898d+5*t21*t5*t65*t89-9.232684300601568d+2*t46*t5* 9294 9 t75+9.232684300601568d+2*t16*t43*t5*t75+9.232684300601568 9295 : d+2*t46*t5*t74+2.769805290180471d+3*t40*t45*t5*t74-3.6930 9296 ; 73720240627d+3*t16*t43*t5*t74-8.309415870541413d+3*t40*t4 9297 < 5*t5*t73+2.769805290180471d+3*t16*t43*t5*t73+5.5396105803 9298 = 60942d+3*t37*t42*t5*t73+5.539610580360942d+3*t40*t45*t5*t 9299 > 72-1.4772294880962508d+4*t37*t42*t5*t72+9.232684300601568 9300 ? d+3*t34*t39*t5*t72+9.232684300601568d+3*t37*t42*t5*t71-2. 9301 @ 308171075150392d+4*t34*t39*t5*t71+1.3849026450902355d+4*t 9302 1 31*t36*t5*t71+1.3849026450902355d+4*t34*t39*t5*t70-3.3237 9303 2 66348216566d+4*t31*t36*t5*t70+1.9388637031263292d+4*t28*t 9304 3 33*t5*t70+1.9388637031263292d+4*t31*t36*t5*t69-4.52401530 9305 4 72947686d+4*t28*t33*t5*t69+2.585151604168439d+4*t25*t30*t 9306 5 5*t69+2.585151604168439d+4*t28*t33*t5*t68-5.9089179523850 9307 6 03d+4*t25*t30*t5*t68+3.3237663482165647d+4*t22*t27*t5*t68 9308 7 +3.3237663482165647d+4*t25*t30*t5*t67-7.478474283487271d+ 9309 8 4*t22*t27*t5*t67+4.1547079352707056d+4*t19*t24*t5*t67+4.1 9310 9 54707935270705d+4*t22*t27*t5*t66-9.232684300601568d+4*t19 9311 : *t24*t5*t66+5.077976365330863d+4*t19*t24*t5*t65+6.0935716 9312 ; 38397036d+4*t110*t17*t5*t65)-9.305257363491002d-1*t12*t4* 9313 < t51*(-3.4716600044518436d+6*t24*t54*t89*t97+1.15722000148 9314 = 39477d+7*t24*t53*t89*t97-1.2729420016323426d+7*t24*t52*t8 9315 > 9*t97+2.104036366334451d+4*t43*t62*t97-2.104036366334451d 9316 ? +4*t16*t40*t62*t97-8.416145465337804d+4*t37*t45*t61*t97-4 9317 @ .208072732668902d+4*t43*t61*t97+1.2624218198006704d+5*t16 9318 1 *t40*t61*t97+3.787265459402013d+5*t37*t45*t60*t97+2.10403 9319 2 6366334451d+4*t43*t60*t97-2.104036366334451d+5*t34*t42*t6 9320 3 0*t97-1.8936327297010064d+5*t16*t40*t60*t97-5.04968727920 9321 4 2681d+5*t37*t45*t59*t97+8.416145465337803d+5*t34*t42*t59* 9322 5 t97+8.416145465337804d+4*t16*t40*t59*t97-4.20807273266890 9323 6 16d+5*t31*t39*t59*t97+2.1040363663344508d+5*t37*t45*t58*t 9324 7 97-1.0520181831672254d+6*t34*t42*t58*t97+1.57802727475083 9325 8 8d+6*t31*t39*t58*t97-7.364127282170578d+5*t28*t36*t58*t97 9326 9 +4.208072732668902d+5*t34*t42*t57*t97-1.893632729701006d+ 9327 : 6*t31*t39*t57*t97+2.6510858215814087d+6*t28*t36*t57*t97-1 9328 ; .1782603651472927d+6*t25*t33*t57*t97+7.364127282170578d+5 9329 < *t31*t39*t56*t97-3.0929334585116436d+6*t28*t36*t56*t97+4. 9330 = 123911278015524d+6*t25*t33*t56*t97-1.7673905477209387d+6* 9331 > t22*t30*t56*t97+1.1782603651472927d+6*t28*t36*t55*t97-4.7 9332 ? 13041460589171d+6*t25*t33*t55*t97+6.059624735043219d+6*t2 9333 @ 2*t30*t55*t97-2.524843639601341d+6*t19*t27*t55*t97+1.7673 9334 1 90547720939d+6*t25*t33*t54*t97-6.817077826923622d+6*t22*t 9335 2 30*t54*t97+8.521347283654526d+6*t19*t27*t54*t97+2.5248436 9336 3 39601341d+6*t22*t30*t53*t97-9.468163648505028d+6*t19*t27* 9337 4 t53*t97-4.628880005935792d+6*t110*t21*t53*t97+3.471660004 9338 5 4518436d+6*t19*t27*t52*t97+1.5275304019588112d+7*t110*t21 9339 6 *t52*t97-6.01754400771653d+6*t146*t17*t52*t97+3.713762858 9340 7 948263d+1*t17*t52*t89*t96-3.37614805358933d+0*t48*t62*t96 9341 8 +3.37614805358933d+0*t16*t46*t62*t96-6.75229610717866d+0* 9342 9 t16*t46*t61*t96+6.75229610717866d+0*t43*t45*t61*t96-1.012 9343 : 8444160767991d+1*t43*t45*t60*t96+1.0128444160767991d+1*t4 9344 ; 0*t42*t60*t96-1.350459221435732d+1*t40*t42*t59*t96+1.3504 9345 < 59221435732d+1*t37*t39*t59*t96-1.6880740267946648d+1*t37* 9346 = t39*t58*t96+1.6880740267946648d+1*t34*t36*t58*t96-2.02568 9347 > 88321535982d+1*t34*t36*t57*t96+2.0256888321535982d+1*t31* 9348 ? t33*t57*t96-2.3633036375125308d+1*t31*t33*t56*t96+2.36330 9349 @ 36375125308d+1*t28*t30*t56*t96-2.700918442871464d+1*t28*t 9350 1 30*t55*t96+2.700918442871464d+1*t25*t27*t55*t96-3.0385332 9351 2 482303967d+1*t25*t27*t54*t96+3.0385332482303967d+1*t22*t2 9352 3 4*t54*t96-3.3761480535893296d+1*t22*t24*t53*t96+3.3761480 9353 4 535893296d+1*t19*t21*t53*t96-3.713762858948263d+1*t19*t21 9354 5 *t52*t96+5.077976365330862d+4*t21*t5*t53*t89-1.1171548003 9355 6 727898d+5*t21*t5*t52*t89-9.232684300601568d+2*t46*t5*t62+ 9356 7 9.232684300601568d+2*t16*t43*t5*t62+9.232684300601568d+2* 9357 8 t46*t5*t61+2.769805290180471d+3*t40*t45*t5*t61-3.69307372 9358 9 0240627d+3*t16*t43*t5*t61-8.309415870541413d+3*t40*t45*t5 9359 : *t60+2.769805290180471d+3*t16*t43*t5*t60+5.53961058036094 9360 ; 2d+3*t37*t42*t5*t60+5.539610580360942d+3*t40*t45*t5*t59-1 9361 < .4772294880962508d+4*t37*t42*t5*t59+9.232684300601568d+3* 9362 = t34*t39*t5*t59+9.232684300601568d+3*t37*t42*t5*t58-2.3081 9363 > 71075150392d+4*t34*t39*t5*t58+1.3849026450902355d+4*t31*t 9364 ? 36*t5*t58+1.3849026450902355d+4*t34*t39*t5*t57-3.32376634 9365 @ 8216566d+4*t31*t36*t5*t57+1.9388637031263292d+4*t28*t33*t 9366 1 5*t57+1.9388637031263292d+4*t31*t36*t5*t56-4.524015307294 9367 2 7686d+4*t28*t33*t5*t56+2.585151604168439d+4*t25*t30*t5*t5 9368 3 6+2.585151604168439d+4*t28*t33*t5*t55-5.908917952385003d+ 9369 4 4*t25*t30*t5*t55+3.3237663482165647d+4*t22*t27*t5*t55+3.3 9370 5 237663482165647d+4*t25*t30*t5*t54-7.478474283487271d+4*t2 9371 6 2*t27*t5*t54+4.1547079352707056d+4*t19*t24*t5*t54+4.15470 9372 7 7935270705d+4*t22*t27*t5*t53-9.232684300601568d+4*t19*t24 9373 8 *t5*t53+5.077976365330863d+4*t19*t24*t5*t52+6.09357163839 9374 9 7036d+4*t110*t17*t5*t52)-9.305257363491002d-1*t12*t3*t4*( 9375 : -3.4716600044518436d+6*t23*t24*t89*t97+1.1572200014839477 9376 ; d+7*t20*t24*t89*t97-1.2729420016323426d+7*t13*t24*t89*t97 9377 < +2.104036366334451d+4*t43*t47*t97-2.104036366334451d+4*t1 9378 = 6*t40*t47*t97-8.416145465337804d+4*t37*t44*t45*t97+3.7872 9379 > 65459402013d+5*t37*t41*t45*t97-5.049687279202681d+5*t37*t 9380 ? 38*t45*t97+2.1040363663344508d+5*t35*t37*t45*t97-4.208072 9381 @ 732668902d+4*t43*t44*t97+1.2624218198006704d+5*t16*t40*t4 9382 1 4*t97+2.104036366334451d+4*t41*t43*t97-2.104036366334451d 9383 2 +5*t34*t41*t42*t97+8.416145465337803d+5*t34*t38*t42*t97-1 9384 3 .0520181831672254d+6*t34*t35*t42*t97+4.208072732668902d+5 9385 4 *t32*t34*t42*t97-1.8936327297010064d+5*t16*t40*t41*t97+8. 9386 5 416145465337804d+4*t16*t38*t40*t97-4.2080727326689016d+5* 9387 6 t31*t38*t39*t97+1.578027274750838d+6*t31*t35*t39*t97-1.89 9388 7 3632729701006d+6*t31*t32*t39*t97+7.364127282170578d+5*t29 9389 8 *t31*t39*t97-7.364127282170578d+5*t28*t35*t36*t97+2.65108 9390 9 58215814087d+6*t28*t32*t36*t97-3.0929334585116436d+6*t28* 9391 : t29*t36*t97+1.1782603651472927d+6*t26*t28*t36*t97-1.17826 9392 ; 03651472927d+6*t25*t32*t33*t97+4.123911278015524d+6*t25*t 9393 < 29*t33*t97-4.713041460589171d+6*t25*t26*t33*t97+1.7673905 9394 = 47720939d+6*t23*t25*t33*t97-1.7673905477209387d+6*t22*t29 9395 > *t30*t97+6.059624735043219d+6*t22*t26*t30*t97-6.817077826 9396 ? 923622d+6*t22*t23*t30*t97+2.524843639601341d+6*t20*t22*t3 9397 @ 0*t97-2.524843639601341d+6*t19*t26*t27*t97+8.521347283654 9398 1 526d+6*t19*t23*t27*t97-9.468163648505028d+6*t19*t20*t27*t 9399 2 97+3.4716600044518436d+6*t13*t19*t27*t97-4.62888000593579 9400 3 2d+6*t110*t20*t21*t97+1.5275304019588112d+7*t110*t13*t21* 9401 4 t97-6.01754400771653d+6*t13*t146*t17*t97+3.71376285894826 9402 5 3d+1*t13*t17*t89*t96-3.37614805358933d+0*t47*t48*t96+3.37 9403 6 614805358933d+0*t16*t46*t47*t96-6.75229610717866d+0*t16*t 9404 7 44*t46*t96+6.75229610717866d+0*t43*t44*t45*t96-1.01284441 9405 8 60767991d+1*t41*t43*t45*t96+1.0128444160767991d+1*t40*t41 9406 9 *t42*t96-1.350459221435732d+1*t38*t40*t42*t96+1.350459221 9407 : 435732d+1*t37*t38*t39*t96-1.6880740267946648d+1*t35*t37*t 9408 ; 39*t96+1.6880740267946648d+1*t34*t35*t36*t96-2.0256888321 9409 < 535982d+1*t32*t34*t36*t96+2.0256888321535982d+1*t31*t32*t 9410 = 33*t96-2.3633036375125308d+1*t29*t31*t33*t96+2.3633036375 9411 > 125308d+1*t28*t29*t30*t96-2.700918442871464d+1*t26*t28*t3 9412 ? 0*t96+2.700918442871464d+1*t25*t26*t27*t96-3.038533248230 9413 @ 3967d+1*t23*t25*t27*t96+3.0385332482303967d+1*t22*t23*t24 9414 1 *t96-3.3761480535893296d+1*t20*t22*t24*t96+3.376148053589 9415 2 3296d+1*t19*t20*t21*t96-3.713762858948263d+1*t13*t19*t21* 9416 3 t96+5.077976365330862d+4*t20*t21*t5*t89-1.117154800372789 9417 4 8d+5*t13*t21*t5*t89-9.232684300601568d+2*t46*t47*t5+9.232 9418 5 684300601568d+2*t16*t43*t47*t5+9.232684300601568d+2*t44*t 9419 6 46*t5+2.769805290180471d+3*t40*t44*t45*t5-8.3094158705414 9420 7 13d+3*t40*t41*t45*t5+5.539610580360942d+3*t38*t40*t45*t5- 9421 8 3.693073720240627d+3*t16*t43*t44*t5+2.769805290180471d+3* 9422 9 t16*t41*t43*t5+5.539610580360942d+3*t37*t41*t42*t5-1.4772 9423 : 294880962508d+4*t37*t38*t42*t5+9.232684300601568d+3*t35*t 9424 ; 37*t42*t5+9.232684300601568d+3*t34*t38*t39*t5-2.308171075 9425 < 150392d+4*t34*t35*t39*t5+1.3849026450902355d+4*t32*t34*t3 9426 = 9*t5+1.3849026450902355d+4*t31*t35*t36*t5-3.3237663482165 9427 > 66d+4*t31*t32*t36*t5+1.9388637031263292d+4*t29*t31*t36*t5 9428 ? +1.9388637031263292d+4*t28*t32*t33*t5-4.5240153072947686d 9429 @ +4*t28*t29*t33*t5+2.585151604168439d+4*t26*t28*t33*t5+2.5 9430 1 85151604168439d+4*t25*t29*t30*t5-5.908917952385003d+4*t25 9431 2 *t26*t30*t5+3.3237663482165647d+4*t23*t25*t30*t5+3.323766 9432 3 3482165647d+4*t22*t26*t27*t5-7.478474283487271d+4*t22*t23 9433 4 *t27*t5+4.154707935270705d+4*t20*t22*t27*t5+4.15470793527 9434 5 07056d+4*t19*t23*t24*t5-9.232684300601568d+4*t19*t20*t24* 9435 6 t5+5.077976365330863d+4*t13*t19*t24*t5+6.093571638397036d 9436 7 +4*t110*t13*t17*t5)+(5.377850105933821d-2*gammaaa*t103*t9 9437 8 0+2.6889250529669106d-2*gammaaa*t123*t49+2.68892505296691 9438 9 06d-2*gammaaa*t111*t12)*t94*t95+(9.894611731573306d-5*t10 9439 : 4*t115*t12*t50*t91+3.024609866719883d-2*gammaaa*t103*t50* 9440 ; t91+1.5123049333599414d-2*gammaaa*t123*t50*t63+9.89461173 9441 < 1573306d-5*t103*t104*t115*t50*t63+1.5123049333599414d-2*g 9442 = ammaaa*t112*t12*t50)*t95+t101*(3.983592671062089d-3*gamma 9443 > aa*t104*t12*t49*t94-1.2407009817988002d+0*t12*t51*t91-1.2 9444 ? 407009817988002d+0*t12*t3*t90-1.2407009817988002d+0*t103* 9445 @ t51*t63+2.2404517531258392d-3*gammaaa*t104*t12*t50*t63-1. 9446 1 2407009817988002d+0*t103*t3*t49)+t125*(3.5318356336070855 9447 2 d-2*gammaaa*t64*t92+3.5318356336070855d-2*gammaaa*t105*t7 9448 3 6)*t94+t104*(-5.779367400447957d-2*gammaaa*t105*t92-2.889 9449 4 6837002239784d-2*gammaaa*t126*t76-2.8896837002239784d-2*g 9450 5 ammaaa*t113*t64)*t94+t118*(1.4938472516482826d-2*gammaaa* 9451 6 t12*t90+1.4938472516482826d-2*gammaaa*t103*t49)*t94-1.648 9452 7 1899623499732d-1*gammaaa*t155*t64*t76*t94+2.9876945032965 9453 8 69d-2*gammaaa*t12*t151*t49*t94-3.6666666666666664d+0*t125 9454 9 *t130*t94-2.3333333333333334d+0*t118*t127*t94+t104*(-1.06 9455 : 3335633294209d-4*t104*t115*t50*t64*t93-3.250431179460851d 9456 ; -2*gammaaa*t105*t50*t93-1.6252155897304255d-2*gammaaa*t12 9457 < 6*t50*t88-1.063335633294209d-4*t104*t105*t115*t50*t88-1.6 9458 = 252155897304255d-2*gammaaa*t114*t50*t64)+t124*(-5.3166781 9459 > 66471045d-5*t115*t50*t64*t93-5.316678166471045d-5*t105*t1 9460 ? 15*t50*t88)+t125*(1.9863746096705204d-2*gammaaa*t50*t64*t 9461 @ 93+1.9863746096705204d-2*gammaaa*t105*t50*t88)+3*t126*t51 9462 1 *t93+t116*t124*(-2.3079800683637772d-4*t115*t64*t92-2.307 9463 2 9800683637772d-4*t105*t115*t76+2.3960893036683073d-2*gamm 9464 3 aaa*t130)+3*t126*t3*t92+t117*(4.947305865786653d-5*t115*t 9465 4 12*t50*t91+4.947305865786653d-5*t103*t115*t50*t63)+t118*( 9466 5 8.401694074221897d-3*gammaaa*t12*t50*t91+8.40169407422189 9467 6 7d-3*gammaaa*t103*t50*t63)-7.444205890792801d+0*t103*t5*t 9468 7 51*t91-2.7915772090473007d+0*t123*t4*t51*t91+t116*t117*(2 9469 8 .1476348525932504d-4*t115*t12*t90+2.1476348525932504d-4*t 9470 9 103*t115*t49+2.3960893036683073d-2*gammaaa*t127)-7.444205 9471 : 890792801d+0*t103*t3*t5*t90-2.7915772090473007d+0*t123*t3 9472 ; *t4*t90-9.269748178462429d-2*gammaaa*t155*t50*t64*t88+5.8 9473 < 4834598311815d-4*t115*t154*t50*t64*t88-5.217843141140167d 9474 = -7*t147*t153*t50*t64*t88+t156*t51*t88+2.5387780752001543d 9475 > -3*t115*t116*t154*t64*t76-8.295189532329142d-6*t147*t148* 9476 ? t153*t64*t76+t156*t3*t76-3.7221029453964005d+0*t123*t5*t5 9477 @ 1*t63-9.305257363491002d-1*t152*t4*t51*t63+1.680338814844 9478 1 3793d-2*gammaaa*t12*t151*t50*t63-3.4631141060506576d-4*t1 9479 2 15*t12*t150*t50*t63+4.855337331063556d-7*t12*t147*t149*t5 9480 3 0*t63-3.7221029453964005d+0*t112*t12*t5*t51-2.79157720904 9481 4 73007d+0*t103*t112*t4*t51+3*t105*t114*t51-3.7221029453964 9482 5 005d+0*t123*t3*t49*t5-3.7221029453964005d+0*t111*t12*t3*t 9483 6 5-9.305257363491002d-1*t152*t3*t4*t49-1.5033443968152754d 9484 7 -3*t115*t116*t12*t150*t49+7.718887347725925d-6*t12*t147*t 9485 8 148*t149*t49-2.7915772090473007d+0*t103*t111*t3*t4+3*t105 9486 9 *t113*t3-3.6666666666666664d+0*t125*t131-2.33333333333333 9487 : 34d+0*t118*t129-6.666666666666666d-1*t121*t128)*wght+Amat 9488 ; 3(iq,D3_RA_RA_RA) 9489 Cmat3(iq,D3_RA_RA_GAA) = 1.0d+0*((-6.722312632417276d-3*t103 9490 1 *t90-3.361156316208638d-3*t123*t49-3.361156316208638d-3*t 9491 2 111*t12)*t94*t96+(-3.780762333399854d-3*t103*t50*t91-1.89 9492 3 0381166699927d-3*t123*t50*t63-1.890381166699927d-3*t112*t 9493 4 12*t50)*t96+(8.963083509889702d-3*t12*t90+8.9630835098897 9494 5 02d-3*t103*t49)*t94*t95+(-3.71047939933999d-5*gammaaa*t1* 9495 6 t12*t50*t91+5.041016444533138d-3*t12*t50*t91-3.7104793993 9496 7 3999d-5*gammaaa*t1*t103*t50*t63+5.041016444533138d-3*t103 9497 8 *t50*t63)*t95+t101*(-1.4938472516482837d-3*t1*t12*t49*t94 9498 9 -8.401694074221898d-4*t1*t12*t50*t63)+t104*(-1.9264558001 9499 : 493193d-2*t64*t92-1.9264558001493193d-2*t105*t76)*t94+t1* 9500 ; (7.224209250559948d-3*t105*t92+3.612104625279974d-3*t126* 9501 < t76+3.612104625279974d-3*t113*t64)*t94+3.5318356336070855 9502 = d-2*t125*t64*t76*t94-8.963083509889707d-3*t118*t12*t49*t9 9503 > 4+t104*(3.9875086248532843d-5*gammaaa*t1*t50*t64*t93-1.08 9504 ? 34770598202839d-2*t50*t64*t93+3.9875086248532843d-5*gamma 9505 @ aa*t1*t105*t50*t88-1.0834770598202839d-2*t105*t50*t88)+t1 9506 1 *(4.063038974326065d-3*t105*t50*t93+2.0315194871630324d-3 9507 2 *t126*t50*t88+2.0315194871630324d-3*t114*t50*t64)+1.95669 9508 3 1177927563d-7*t115*t158*t50*t64*t88+1.9863746096705204d-2 9509 4 *t125*t50*t64*t88-1.7943788811839778d-4*gammaaa*t124*t50* 9510 5 t64*t88+3.1106960746234286d-6*t115*t148*t158*t64*t76-7.78 9511 6 9432730727747d-4*gammaaa*t116*t124*t64*t76-1.820751499148 9512 7 8338d-7*t115*t12*t157*t50*t63-5.041016444533138d-3*t118*t 9513 8 12*t50*t63+1.1749851431243302d-4*gammaaa*t117*t12*t50*t63 9514 9 -2.8945827553972214d-6*t115*t12*t148*t157*t49+5.100632774 9515 : 908971d-4*gammaaa*t116*t117*t12*t49-8.985334888756153d-3* 9516 ; t116*t130*t133-8.985334888756153d-3*t116*t127*t132)*wght+ 9517 < Cmat3(iq,D3_RA_RA_GAA) 9518 Cmat3(iq,D3_RA_GAA_GAA) = 1.0d+0*((6.957148873762482d-6*t1*t 9519 1 12*t50*t91+6.957148873762482d-6*t1*t103*t50*t63)*t96+t1*( 9520 2 -7.476578671599909d-6*t1*t50*t64*t93-7.476578671599909d-6 9521 3 *t1*t105*t50*t88)-7.337591917228362d-8*gammaaa*t160*t50*t 9522 4 64*t88+3.9875086248532843d-5*t133*t50*t64*t88-1.166511027 9523 5 9837858d-6*gammaaa*t148*t160*t64*t76+1.7309850512728328d- 9524 6 4*t116*t133*t64*t76+6.827818121808127d-8*gammaaa*t12*t159 9525 7 *t50*t63-2.7828595495049924d-5*t12*t132*t50*t63+1.0854685 9526 8 332739583d-6*gammaaa*t12*t148*t159*t49-1.2080446045837034 9527 9 d-4*t116*t12*t132*t49-8.985334888756153d-3*t116*t135*t137 9528 : -8.985334888756153d-3*t116*t134*t136)*wght+Cmat3(iq,D3_RA 9529 ; _GAA_GAA) 9530 Cmat3(iq,D3_GAA_GAA_GAA) = 1.0d+0*(2.751596968960636d-8*t162 9531 1 *t50*t64*t88+4.374416354939197d-7*t148*t162*t64*t76-2.560 9532 2 431795678048d-8*t12*t161*t50*t63-4.070506999777343d-7*t12 9533 3 *t148*t161*t49)*wght+Cmat3(iq,D3_GAA_GAA_GAA) 9534 Mmat3(iq,D3_RA_RA_TA) = 1.0d+0*((1.7926167019779404d-2*gamma 9535 1 aa*t12*t138+1.7926167019779404d-2*gammaaa*t103*t106)*t94* 9536 2 t95+(1.0082032889066277d-2*gammaaa*t12*t139*t50+1.0082032 9537 3 889066277d-2*gammaaa*t103*t107*t50)*t95+t104*(-1.92645580 9538 4 01493193d-2*gammaaa*t140*t64-1.9264558001493193d-2*gammaa 9539 5 a*t105*t108)*t94+3.5318356336070855d-2*gammaaa*t108*t125* 9540 6 t64*t94-8.963083509889707d-3*gammaaa*t106*t118*t12*t94+t5 9541 7 1*t64*(-4.5701787287977763d+5*t24*t4*t79*t89+2.2282577153 9542 8 689576d+3*t21*t6*t78*t89+5.077976365330863d+5*t24*t4*t78* 9543 9 t89+5.585774001863949d+5*t24*t4*t77*t89+4.051377664307196 9544 : 4d+1*t16*t43*t6*t87+9.232684300601569d+2*t4*t43*t87-2.769 9545 ; 805290180471d+3*t16*t4*t40*t87-4.0513776643071964d+1*t46* 9546 < t6*t86+1.2154132992921589d+2*t40*t45*t6*t86-1.10792211607 9547 = 21883d+4*t37*t4*t45*t86+1.846536860120314d+3*t4*t43*t86+5 9548 > .539610580360942d+3*t16*t4*t40*t86-1.2154132992921589d+2* 9549 ? t16*t43*t6*t85+2.4308265985843178d+2*t37*t42*t6*t85+1.661 9550 @ 8831741082832d+4*t37*t4*t45*t85-2.769805290180471d+3*t4*t 9551 1 43*t85-2.769805290180471d+4*t34*t4*t42*t85+8.309415870541 9552 2 416d+3*t16*t4*t40*t85-2.4308265985843178d+2*t40*t45*t6*t8 9553 3 4+4.0513776643071964d+2*t34*t39*t6*t84+2.2158442321443766 9554 4 d+4*t37*t4*t45*t84+3.693073720240629d+4*t34*t4*t42*t84-1. 9555 5 1079221160721883d+4*t16*t4*t40*t84-5.539610580360941d+4*t 9556 6 31*t39*t4*t84-4.051377664307196d+2*t37*t42*t6*t83+6.07706 9557 7 6496460793d+2*t31*t36*t6*t83-2.7698052901804704d+4*t37*t4 9558 8 *t45*t83+4.616342150300784d+4*t34*t4*t42*t83+6.9245132254 9559 9 51174d+4*t31*t39*t4*t83-9.694318515631648d+4*t28*t36*t4*t 9560 : 83-6.077066496460795d+2*t34*t39*t6*t82+8.507893095045113d 9561 ; +2*t28*t33*t6*t82-5.539610580360942d+4*t34*t4*t42*t82+8.3 9562 < 09415870541416d+4*t31*t39*t4*t82+1.1633182218757979d+5*t2 9563 = 8*t36*t4*t82-1.5510909625010638d+5*t25*t33*t4*t82-8.50789 9564 > 3095045111d+2*t31*t36*t6*t81+1.1343857460060149d+3*t25*t3 9565 ? 0*t6*t81-9.694318515631648d+4*t31*t39*t4*t81+1.3572045921 9566 @ 884307d+5*t28*t36*t4*t81+1.809606122917908d+5*t25*t33*t4* 9567 1 t81-2.3266364437515955d+5*t22*t30*t4*t81-1.13438574600601 9568 2 49d+3*t28*t33*t6*t80+1.4584959591505908d+3*t22*t27*t6*t80 9569 3 -1.5510909625010635d+5*t28*t36*t4*t80+2.0681212833347515d 9570 4 +5*t25*t33*t4*t80+2.659013078573252d+5*t22*t30*t4*t80-3.3 9571 5 23766348216565d+5*t19*t27*t4*t80-1.4584959591505905d+3*t2 9572 6 5*t30*t6*t79+1.8231199489382383d+3*t19*t24*t6*t79-2.32663 9573 7 64437515952d+5*t25*t33*t4*t79+2.9913897133949086d+5*t22*t 9574 8 30*t4*t79+3.7392371417436354d+5*t19*t27*t4*t79-1.82311994 9575 9 89382383d+3*t22*t27*t6*t78-3.3237663482165647d+5*t22*t30* 9576 : t4*t78+4.1547079352707056d+5*t19*t27*t4*t78-6.09357163839 9577 ; 7035d+5*t110*t21*t4*t78-2.228257715368958d+3*t19*t24*t6*t 9578 < 77+2.6739092584427493d+3*t110*t17*t6*t77-4.57017872879777 9579 = 63d+5*t19*t27*t4*t77+6.702928802236738d+5*t110*t21*t4*t77 9580 > -7.921643129916147d+5*t146*t17*t4*t77)+t3*t64*(-4.5701787 9581 ? 287977763d+5*t24*t4*t67*t89+2.2282577153689576d+3*t21*t6* 9582 @ t66*t89+5.077976365330863d+5*t24*t4*t66*t89+5.58577400186 9583 1 3949d+5*t24*t4*t65*t89+4.0513776643071964d+1*t16*t43*t6*t 9584 2 75+9.232684300601569d+2*t4*t43*t75-2.769805290180471d+3*t 9585 3 16*t4*t40*t75-4.0513776643071964d+1*t46*t6*t74+1.21541329 9586 4 92921589d+2*t40*t45*t6*t74-1.1079221160721883d+4*t37*t4*t 9587 5 45*t74+1.846536860120314d+3*t4*t43*t74+5.539610580360942d 9588 6 +3*t16*t4*t40*t74-1.2154132992921589d+2*t16*t43*t6*t73+2. 9589 7 4308265985843178d+2*t37*t42*t6*t73+1.6618831741082832d+4* 9590 8 t37*t4*t45*t73-2.769805290180471d+3*t4*t43*t73-2.76980529 9591 9 0180471d+4*t34*t4*t42*t73+8.309415870541416d+3*t16*t4*t40 9592 : *t73-2.4308265985843178d+2*t40*t45*t6*t72+4.0513776643071 9593 ; 964d+2*t34*t39*t6*t72+2.2158442321443766d+4*t37*t4*t45*t7 9594 < 2+3.693073720240629d+4*t34*t4*t42*t72-1.1079221160721883d 9595 = +4*t16*t4*t40*t72-5.539610580360941d+4*t31*t39*t4*t72-4.0 9596 > 51377664307196d+2*t37*t42*t6*t71+6.077066496460793d+2*t31 9597 ? *t36*t6*t71-2.7698052901804704d+4*t37*t4*t45*t71+4.616342 9598 @ 150300784d+4*t34*t4*t42*t71+6.924513225451174d+4*t31*t39* 9599 1 t4*t71-9.694318515631648d+4*t28*t36*t4*t71-6.077066496460 9600 2 795d+2*t34*t39*t6*t70+8.507893095045113d+2*t28*t33*t6*t70 9601 3 -5.539610580360942d+4*t34*t4*t42*t70+8.309415870541416d+4 9602 4 *t31*t39*t4*t70+1.1633182218757979d+5*t28*t36*t4*t70-1.55 9603 5 10909625010638d+5*t25*t33*t4*t70-8.507893095045111d+2*t31 9604 6 *t36*t6*t69+1.1343857460060149d+3*t25*t30*t6*t69-9.694318 9605 7 515631648d+4*t31*t39*t4*t69+1.3572045921884307d+5*t28*t36 9606 8 *t4*t69+1.809606122917908d+5*t25*t33*t4*t69-2.32663644375 9607 9 15955d+5*t22*t30*t4*t69-1.1343857460060149d+3*t28*t33*t6* 9608 : t68+1.4584959591505908d+3*t22*t27*t6*t68-1.55109096250106 9609 ; 35d+5*t28*t36*t4*t68+2.0681212833347515d+5*t25*t33*t4*t68 9610 < +2.659013078573252d+5*t22*t30*t4*t68-3.323766348216565d+5 9611 = *t19*t27*t4*t68-1.4584959591505905d+3*t25*t30*t6*t67+1.82 9612 > 31199489382383d+3*t19*t24*t6*t67-2.3266364437515952d+5*t2 9613 ? 5*t33*t4*t67+2.9913897133949086d+5*t22*t30*t4*t67+3.73923 9614 @ 71417436354d+5*t19*t27*t4*t67-1.8231199489382383d+3*t22*t 9615 1 27*t6*t66-3.3237663482165647d+5*t22*t30*t4*t66+4.15470793 9616 2 52707056d+5*t19*t27*t4*t66-6.093571638397035d+5*t110*t21* 9617 3 t4*t66-2.228257715368958d+3*t19*t24*t6*t65+2.673909258442 9618 4 7493d+3*t110*t17*t6*t65-4.5701787287977763d+5*t19*t27*t4* 9619 5 t65+6.702928802236738d+5*t110*t21*t4*t65-7.92164312991614 9620 6 7d+5*t146*t17*t4*t65)-9.305257363491002d-1*t12*t4*t51*(2. 9621 7 2282577153689576d+3*t21*t53*t6*t89-4.5701787287977763d+5* 9622 8 t24*t4*t54*t89+5.077976365330863d+5*t24*t4*t53*t89+5.5857 9623 9 74001863949d+5*t24*t4*t52*t89+4.0513776643071964d+1*t16*t 9624 : 43*t6*t62+9.232684300601569d+2*t4*t43*t62-2.7698052901804 9625 ; 71d+3*t16*t4*t40*t62-4.0513776643071964d+1*t46*t6*t61+1.2 9626 < 154132992921589d+2*t40*t45*t6*t61-1.1079221160721883d+4*t 9627 = 37*t4*t45*t61+1.846536860120314d+3*t4*t43*t61+5.539610580 9628 > 360942d+3*t16*t4*t40*t61-1.2154132992921589d+2*t16*t43*t6 9629 ? *t60+2.4308265985843178d+2*t37*t42*t6*t60+1.6618831741082 9630 @ 832d+4*t37*t4*t45*t60-2.769805290180471d+3*t4*t43*t60-2.7 9631 1 69805290180471d+4*t34*t4*t42*t60+8.309415870541416d+3*t16 9632 2 *t4*t40*t60-2.4308265985843178d+2*t40*t45*t59*t6+4.051377 9633 3 6643071964d+2*t34*t39*t59*t6-4.051377664307196d+2*t37*t42 9634 4 *t58*t6+6.077066496460793d+2*t31*t36*t58*t6-6.07706649646 9635 5 0795d+2*t34*t39*t57*t6+8.507893095045113d+2*t28*t33*t57*t 9636 6 6-8.507893095045111d+2*t31*t36*t56*t6+1.1343857460060149d 9637 7 +3*t25*t30*t56*t6-1.1343857460060149d+3*t28*t33*t55*t6+1. 9638 8 4584959591505908d+3*t22*t27*t55*t6-1.4584959591505905d+3* 9639 9 t25*t30*t54*t6+1.8231199489382383d+3*t19*t24*t54*t6-1.823 9640 : 1199489382383d+3*t22*t27*t53*t6-2.228257715368958d+3*t19* 9641 ; t24*t52*t6+2.6739092584427493d+3*t110*t17*t52*t6+2.215844 9642 < 2321443766d+4*t37*t4*t45*t59+3.693073720240629d+4*t34*t4* 9643 = t42*t59-1.1079221160721883d+4*t16*t4*t40*t59-5.5396105803 9644 > 60941d+4*t31*t39*t4*t59-2.7698052901804704d+4*t37*t4*t45* 9645 ? t58+4.616342150300784d+4*t34*t4*t42*t58+6.924513225451174 9646 @ d+4*t31*t39*t4*t58-9.694318515631648d+4*t28*t36*t4*t58-5. 9647 1 539610580360942d+4*t34*t4*t42*t57+8.309415870541416d+4*t3 9648 2 1*t39*t4*t57+1.1633182218757979d+5*t28*t36*t4*t57-1.55109 9649 3 09625010638d+5*t25*t33*t4*t57-9.694318515631648d+4*t31*t3 9650 4 9*t4*t56+1.3572045921884307d+5*t28*t36*t4*t56+1.809606122 9651 5 917908d+5*t25*t33*t4*t56-2.3266364437515955d+5*t22*t30*t4 9652 6 *t56-1.5510909625010635d+5*t28*t36*t4*t55+2.0681212833347 9653 7 515d+5*t25*t33*t4*t55+2.659013078573252d+5*t22*t30*t4*t55 9654 8 -3.323766348216565d+5*t19*t27*t4*t55-2.3266364437515952d+ 9655 9 5*t25*t33*t4*t54+2.9913897133949086d+5*t22*t30*t4*t54+3.7 9656 : 392371417436354d+5*t19*t27*t4*t54-3.3237663482165647d+5*t 9657 ; 22*t30*t4*t53+4.1547079352707056d+5*t19*t27*t4*t53-6.0935 9658 < 71638397035d+5*t110*t21*t4*t53-4.5701787287977763d+5*t19* 9659 = t27*t4*t52+6.702928802236738d+5*t110*t21*t4*t52-7.9216431 9660 > 29916147d+5*t146*t17*t4*t52)-9.305257363491002d-1*t12*t3* 9661 ? t4*(2.2282577153689576d+3*t20*t21*t6*t89-4.57017872879777 9662 @ 63d+5*t23*t24*t4*t89+5.077976365330863d+5*t20*t24*t4*t89+ 9663 1 5.585774001863949d+5*t13*t24*t4*t89+4.0513776643071964d+1 9664 2 *t16*t43*t47*t6-4.0513776643071964d+1*t44*t46*t6+1.215413 9665 3 2992921589d+2*t40*t44*t45*t6-2.4308265985843178d+2*t38*t4 9666 4 0*t45*t6-1.2154132992921589d+2*t16*t41*t43*t6+2.430826598 9667 5 5843178d+2*t37*t41*t42*t6-4.051377664307196d+2*t35*t37*t4 9668 6 2*t6+4.0513776643071964d+2*t34*t38*t39*t6-6.0770664964607 9669 7 95d+2*t32*t34*t39*t6+6.077066496460793d+2*t31*t35*t36*t6- 9670 8 8.507893095045111d+2*t29*t31*t36*t6+8.507893095045113d+2* 9671 9 t28*t32*t33*t6-1.1343857460060149d+3*t26*t28*t33*t6+1.134 9672 : 3857460060149d+3*t25*t29*t30*t6-1.4584959591505905d+3*t23 9673 ; *t25*t30*t6+1.4584959591505908d+3*t22*t26*t27*t6-1.823119 9674 < 9489382383d+3*t20*t22*t27*t6+1.8231199489382383d+3*t19*t2 9675 = 3*t24*t6-2.228257715368958d+3*t13*t19*t24*t6+2.6739092584 9676 > 427493d+3*t110*t13*t17*t6+9.232684300601569d+2*t4*t43*t47 9677 ? -2.769805290180471d+3*t16*t4*t40*t47-1.1079221160721883d+ 9678 @ 4*t37*t4*t44*t45+1.6618831741082832d+4*t37*t4*t41*t45+2.2 9679 1 158442321443766d+4*t37*t38*t4*t45-2.7698052901804704d+4*t 9680 2 35*t37*t4*t45+1.846536860120314d+3*t4*t43*t44+5.539610580 9681 3 360942d+3*t16*t4*t40*t44-2.769805290180471d+3*t4*t41*t43- 9682 4 2.769805290180471d+4*t34*t4*t41*t42+3.693073720240629d+4* 9683 5 t34*t38*t4*t42+4.616342150300784d+4*t34*t35*t4*t42-5.5396 9684 6 10580360942d+4*t32*t34*t4*t42+8.309415870541416d+3*t16*t4 9685 7 *t40*t41-1.1079221160721883d+4*t16*t38*t4*t40-5.539610580 9686 8 360941d+4*t31*t38*t39*t4+6.924513225451174d+4*t31*t35*t39 9687 9 *t4+8.309415870541416d+4*t31*t32*t39*t4-9.694318515631648 9688 : d+4*t29*t31*t39*t4-9.694318515631648d+4*t28*t35*t36*t4+1. 9689 ; 1633182218757979d+5*t28*t32*t36*t4+1.3572045921884307d+5* 9690 < t28*t29*t36*t4-1.5510909625010635d+5*t26*t28*t36*t4-1.551 9691 = 0909625010638d+5*t25*t32*t33*t4+1.809606122917908d+5*t25* 9692 > t29*t33*t4+2.0681212833347515d+5*t25*t26*t33*t4-2.3266364 9693 ? 437515952d+5*t23*t25*t33*t4-2.3266364437515955d+5*t22*t29 9694 @ *t30*t4+2.659013078573252d+5*t22*t26*t30*t4+2.99138971339 9695 1 49086d+5*t22*t23*t30*t4-3.3237663482165647d+5*t20*t22*t30 9696 2 *t4-3.323766348216565d+5*t19*t26*t27*t4+3.739237141743635 9697 3 4d+5*t19*t23*t27*t4+4.1547079352707056d+5*t19*t20*t27*t4- 9698 4 4.5701787287977763d+5*t13*t19*t27*t4-6.093571638397035d+5 9699 5 *t110*t20*t21*t4+6.702928802236738d+5*t110*t13*t21*t4-7.9 9700 6 21643129916147d+5*t13*t146*t17*t4)+t104*(-1.0834770598202 9701 7 839d-2*gammaaa*t141*t50*t64-1.0834770598202839d-2*gammaaa 9702 8 *t105*t109*t50)+1.9863746096705204d-2*gammaaa*t109*t125*t 9703 9 50*t64-5.316678166471045d-5*t109*t115*t124*t50*t64-2.3079 9704 : 800683637772d-4*t108*t115*t116*t124*t64+t101*(-4.13566993 9705 ; 9329334d-1*t107*t12*t51-4.135669939329334d-1*t106*t12*t3) 9706 < -2.4814019635976003d+0*t12*t139*t5*t51-2.4814019635976003 9707 = d+0*t103*t107*t5*t51-1.8610514726982003d+0*t103*t139*t4*t 9708 > 51-9.305257363491002d-1*t107*t123*t4*t51+2*t105*t141*t51+ 9709 ? t109*t126*t51-5.041016444533138d-3*gammaaa*t107*t118*t12* 9710 @ t50+4.947305865786653d-5*t107*t115*t117*t12*t50-2.4814019 9711 1 635976003d+0*t12*t138*t3*t5-2.4814019635976003d+0*t103*t1 9712 2 06*t3*t5-1.8610514726982003d+0*t103*t138*t3*t4-9.30525736 9713 3 3491002d-1*t106*t123*t3*t4+2*t105*t140*t3+t108*t126*t3+2. 9714 4 1476348525932504d-4*t106*t115*t116*t117*t12)*wght+Mmat3(i 9715 5 q,D3_RA_RA_TA) 9716 Mmat3(iq,D3_RA_RA_TB) = Mmat3(iq,D3_RA_RA_TB) 9717 Mmat3(iq,D3_RA_GAA_TA) = 1.0d+0*((-3.361156316208638d-3*t12* 9718 1 t138-3.361156316208638d-3*t103*t106)*t94*t96+(-1.89038116 9719 2 6699927d-3*t12*t139*t50-1.890381166699927d-3*t103*t107*t5 9720 3 0)*t96+4.481541754944851d-3*t106*t12*t94*t95+2.5205082222 9721 4 66569d-3*t107*t12*t50*t95+t1*(3.612104625279974d-3*t140*t 9722 5 64+3.612104625279974d-3*t105*t108)*t94-9.632279000746596d 9723 6 -3*t104*t108*t64*t94+t1*(2.0315194871630324d-3*t141*t50*t 9724 7 64+2.0315194871630324d-3*t105*t109*t50)+1.993754312426642 9725 8 1d-5*gammaaa*t109*t133*t50*t64-5.417385299101419d-3*t104* 9726 9 t109*t50*t64+8.654925256364164d-5*gammaaa*t108*t116*t133* 9727 : t64-1.855239699669995d-5*gammaaa*t107*t12*t132*t50-8.0536 9728 ; 3069722469d-5*gammaaa*t106*t116*t12*t132)*wght+Mmat3(iq,D 9729 < 3_RA_GAA_TA) 9730 Mmat3(iq,D3_RA_GAA_TB) = Mmat3(iq,D3_RA_GAA_TB) 9731 Mmat3(iq,D3_GAA_GAA_TA) = 1.0d+0*(-7.476578671599909d-6*t109 9732 1 *t137*t50*t64-3.245596971136562d-5*t108*t116*t137*t64+6.9 9733 2 57148873762482d-6*t107*t12*t136*t50+3.020111511459258d-5* 9734 3 t106*t116*t12*t136)*wght+Mmat3(iq,D3_GAA_GAA_TA) 9735 Mmat3(iq,D3_GAA_GAA_TB) = Mmat3(iq,D3_GAA_GAA_TB) 9736 Mmat3(iq,D3_RA_TA_TA) = 1.0d+0*(8.963083509889702d-3*gammaaa 9737 1 *t12*t142*t94*t95+5.041016444533138d-3*gammaaa*t12*t143*t 9738 2 50*t95-9.632279000746596d-3*gammaaa*t104*t144*t64*t94+t51 9739 3 *t64*(-6.016295831496187d+4*t24*t79*t89*t9-6.684773146106 9740 4 873d+4*t24*t78*t89*t9+7.353250460717561d+4*t24*t77*t89*t9 9741 5 -1.2154132992921589d+2*t43*t87*t9-3.646239897876477d+2*t1 9742 6 6*t40*t87*t9-1.4584959591505908d+3*t37*t45*t86*t9+2.43082 9743 7 65985843178d+2*t43*t86*t9-7.292479795752954d+2*t16*t40*t8 9744 8 6*t9-2.1877439387258865d+3*t37*t45*t85*t9+3.6462398978764 9745 9 77d+2*t43*t85*t9-3.646239897876477d+3*t34*t42*t85*t9+1.09 9746 : 38719693629433d+3*t16*t40*t85*t9+2.9169919183011817d+3*t3 9747 ; 7*t45*t84*t9-4.8616531971686355d+3*t34*t42*t84*t9+1.45849 9748 < 59591505908d+3*t16*t40*t84*t9-7.292479795752954d+3*t31*t3 9749 = 9*t84*t9+3.646239897876477d+3*t37*t45*t83*t9+6.0770664964 9750 > 60795d+3*t34*t42*t83*t9-9.115599744691192d+3*t31*t39*t83* 9751 ? t9-1.2761839642567668d+4*t28*t36*t83*t9+7.292479795752954 9752 @ d+3*t34*t42*t82*t9+1.0938719693629431d+4*t31*t39*t82*t9-1 9753 1 .5314207571081204d+4*t28*t36*t82*t9-2.0418943428108272d+4 9754 2 *t25*t33*t82*t9+1.2761839642567668d+4*t31*t39*t81*t9+1.78 9755 3 6657549959474d+4*t28*t36*t81*t9-2.3822100666126317d+4*t25 9756 4 *t33*t81*t9-3.062841514216241d+4*t22*t30*t81*t9+2.0418943 9757 5 428108272d+4*t28*t36*t80*t9+2.722525790414436d+4*t25*t33* 9758 6 t80*t9-3.5003903019614174d+4*t22*t30*t80*t9-4.37548787745 9759 7 1772d+4*t19*t27*t80*t9+3.062841514216241d+4*t25*t33*t79*t 9760 8 9+3.9379390897065947d+4*t22*t30*t79*t9-4.9224238621332433 9761 9 d+4*t19*t27*t79*t9+4.375487877451772d+4*t22*t30*t78*t9+5. 9762 : 469359846814714d+4*t19*t27*t78*t9-8.021727775328248d+4*t1 9763 ; 10*t21*t78*t9+6.016295831496187d+4*t19*t27*t77*t9-8.82390 9764 < 0552861074d+4*t110*t21*t77*t9-1.0428246107926724d+5*t146* 9765 = t17*t77*t9)+t3*t64*(-6.016295831496187d+4*t24*t67*t89*t9- 9766 > 6.684773146106873d+4*t24*t66*t89*t9+7.353250460717561d+4* 9767 ? t24*t65*t89*t9-1.2154132992921589d+2*t43*t75*t9-3.6462398 9768 @ 97876477d+2*t16*t40*t75*t9-1.4584959591505908d+3*t37*t45* 9769 1 t74*t9+2.4308265985843178d+2*t43*t74*t9-7.292479795752954 9770 2 d+2*t16*t40*t74*t9-2.1877439387258865d+3*t37*t45*t73*t9+3 9771 3 .646239897876477d+2*t43*t73*t9-3.646239897876477d+3*t34*t 9772 4 42*t73*t9+1.0938719693629433d+3*t16*t40*t73*t9+2.91699191 9773 5 83011817d+3*t37*t45*t72*t9-4.8616531971686355d+3*t34*t42* 9774 6 t72*t9+1.4584959591505908d+3*t16*t40*t72*t9-7.29247979575 9775 7 2954d+3*t31*t39*t72*t9+3.646239897876477d+3*t37*t45*t71*t 9776 8 9+6.077066496460795d+3*t34*t42*t71*t9-9.115599744691192d+ 9777 9 3*t31*t39*t71*t9-1.2761839642567668d+4*t28*t36*t71*t9+7.2 9778 : 92479795752954d+3*t34*t42*t70*t9+1.0938719693629431d+4*t3 9779 ; 1*t39*t70*t9-1.5314207571081204d+4*t28*t36*t70*t9-2.04189 9780 < 43428108272d+4*t25*t33*t70*t9+1.2761839642567668d+4*t31*t 9781 = 39*t69*t9+1.786657549959474d+4*t28*t36*t69*t9-2.382210066 9782 > 6126317d+4*t25*t33*t69*t9-3.062841514216241d+4*t22*t30*t6 9783 ? 9*t9+2.0418943428108272d+4*t28*t36*t68*t9+2.7225257904144 9784 @ 36d+4*t25*t33*t68*t9-3.5003903019614174d+4*t22*t30*t68*t9 9785 1 -4.375487877451772d+4*t19*t27*t68*t9+3.062841514216241d+4 9786 2 *t25*t33*t67*t9+3.9379390897065947d+4*t22*t30*t67*t9-4.92 9787 3 24238621332433d+4*t19*t27*t67*t9+4.375487877451772d+4*t22 9788 4 *t30*t66*t9+5.469359846814714d+4*t19*t27*t66*t9-8.0217277 9789 5 75328248d+4*t110*t21*t66*t9+6.016295831496187d+4*t19*t27* 9790 6 t65*t9-8.823900552861074d+4*t110*t21*t65*t9-1.04282461079 9791 7 26724d+5*t146*t17*t65*t9)-9.305257363491002d-1*t12*t4*t51 9792 8 *(-6.016295831496187d+4*t24*t54*t89*t9-6.684773146106873d 9793 9 +4*t24*t53*t89*t9+7.353250460717561d+4*t24*t52*t89*t9-1.2 9794 : 154132992921589d+2*t43*t62*t9-3.646239897876477d+2*t16*t4 9795 ; 0*t62*t9-1.4584959591505908d+3*t37*t45*t61*t9+2.430826598 9796 < 5843178d+2*t43*t61*t9-7.292479795752954d+2*t16*t40*t61*t9 9797 = -2.1877439387258865d+3*t37*t45*t60*t9+3.646239897876477d+ 9798 > 2*t43*t60*t9-3.646239897876477d+3*t34*t42*t60*t9+1.093871 9799 ? 9693629433d+3*t16*t40*t60*t9+2.9169919183011817d+3*t37*t4 9800 @ 5*t59*t9-4.8616531971686355d+3*t34*t42*t59*t9+1.458495959 9801 1 1505908d+3*t16*t40*t59*t9-7.292479795752954d+3*t31*t39*t5 9802 2 9*t9+3.646239897876477d+3*t37*t45*t58*t9+6.07706649646079 9803 3 5d+3*t34*t42*t58*t9-9.115599744691192d+3*t31*t39*t58*t9-1 9804 4 .2761839642567668d+4*t28*t36*t58*t9+7.292479795752954d+3* 9805 5 t34*t42*t57*t9+1.0938719693629431d+4*t31*t39*t57*t9-1.531 9806 6 4207571081204d+4*t28*t36*t57*t9-2.0418943428108272d+4*t25 9807 7 *t33*t57*t9+1.2761839642567668d+4*t31*t39*t56*t9+1.786657 9808 8 549959474d+4*t28*t36*t56*t9-2.3822100666126317d+4*t25*t33 9809 9 *t56*t9-3.062841514216241d+4*t22*t30*t56*t9+2.04189434281 9810 : 08272d+4*t28*t36*t55*t9+2.722525790414436d+4*t25*t33*t55* 9811 ; t9-3.5003903019614174d+4*t22*t30*t55*t9-4.375487877451772 9812 < d+4*t19*t27*t55*t9+3.062841514216241d+4*t25*t33*t54*t9+3. 9813 = 9379390897065947d+4*t22*t30*t54*t9-4.9224238621332433d+4* 9814 > t19*t27*t54*t9+4.375487877451772d+4*t22*t30*t53*t9+5.4693 9815 ? 59846814714d+4*t19*t27*t53*t9-8.021727775328248d+4*t110*t 9816 @ 21*t53*t9+6.016295831496187d+4*t19*t27*t52*t9-8.823900552 9817 1 861074d+4*t110*t21*t52*t9-1.0428246107926724d+5*t146*t17* 9818 2 t52*t9)-9.305257363491002d-1*t12*t3*t4*(-6.01629583149618 9819 3 7d+4*t23*t24*t89*t9-6.684773146106873d+4*t20*t24*t89*t9+7 9820 4 .353250460717561d+4*t13*t24*t89*t9-1.2154132992921589d+2* 9821 5 t43*t47*t9-3.646239897876477d+2*t16*t40*t47*t9-1.45849595 9822 6 91505908d+3*t37*t44*t45*t9-2.1877439387258865d+3*t37*t41* 9823 7 t45*t9+2.9169919183011817d+3*t37*t38*t45*t9+3.64623989787 9824 8 6477d+3*t35*t37*t45*t9+2.4308265985843178d+2*t43*t44*t9-7 9825 9 .292479795752954d+2*t16*t40*t44*t9+3.646239897876477d+2*t 9826 : 41*t43*t9-3.646239897876477d+3*t34*t41*t42*t9-4.861653197 9827 ; 1686355d+3*t34*t38*t42*t9+6.077066496460795d+3*t34*t35*t4 9828 < 2*t9+7.292479795752954d+3*t32*t34*t42*t9+1.09387196936294 9829 = 33d+3*t16*t40*t41*t9+1.4584959591505908d+3*t16*t38*t40*t9 9830 > -7.292479795752954d+3*t31*t38*t39*t9-9.115599744691192d+3 9831 ? *t31*t35*t39*t9+1.0938719693629431d+4*t31*t32*t39*t9+1.27 9832 @ 61839642567668d+4*t29*t31*t39*t9-1.2761839642567668d+4*t2 9833 1 8*t35*t36*t9-1.5314207571081204d+4*t28*t32*t36*t9+1.78665 9834 2 7549959474d+4*t28*t29*t36*t9+2.0418943428108272d+4*t26*t2 9835 3 8*t36*t9-2.0418943428108272d+4*t25*t32*t33*t9-2.382210066 9836 4 6126317d+4*t25*t29*t33*t9+2.722525790414436d+4*t25*t26*t3 9837 5 3*t9+3.062841514216241d+4*t23*t25*t33*t9-3.06284151421624 9838 6 1d+4*t22*t29*t30*t9-3.5003903019614174d+4*t22*t26*t30*t9+ 9839 7 3.9379390897065947d+4*t22*t23*t30*t9+4.375487877451772d+4 9840 8 *t20*t22*t30*t9-4.375487877451772d+4*t19*t26*t27*t9-4.922 9841 9 4238621332433d+4*t19*t23*t27*t9+5.469359846814714d+4*t19* 9842 : t20*t27*t9+6.016295831496187d+4*t13*t19*t27*t9-8.02172777 9843 ; 5328248d+4*t110*t20*t21*t9-8.823900552861074d+4*t110*t13* 9844 < t21*t9-1.0428246107926724d+5*t13*t146*t17*t9)-5.417385299 9845 = 101419d-3*gammaaa*t104*t145*t50*t64-1.2407009817988002d+0 9846 > *t12*t143*t5*t51-9.305257363491002d-1*t103*t143*t4*t51+t1 9847 ? 05*t145*t51-1.2407009817988002d+0*t12*t142*t3*t5-9.305257 9848 @ 363491002d-1*t103*t142*t3*t4+t105*t144*t3)*wght+Mmat3(iq, 9849 1 D3_RA_TA_TA) 9850 Mmat3(iq,D3_RA_TA_TB) = Mmat3(iq,D3_RA_TA_TB) 9851 Mmat3(iq,D3_RA_TB_TB) = Mmat3(iq,D3_RA_TB_TB) 9852 Mmat3(iq,D3_GAA_TA_TA) = 1.0d+0*(-3.361156316208638d-3*t12*t 9853 1 142*t94*t96-1.890381166699927d-3*t12*t143*t50*t96+3.61210 9854 2 4625279974d-3*t1*t144*t64*t94+2.0315194871630324d-3*t1*t1 9855 3 45*t50*t64)*wght+Mmat3(iq,D3_GAA_TA_TA) 9856 Mmat3(iq,D3_GAA_TA_TB) = Mmat3(iq,D3_GAA_TA_TB) 9857 Mmat3(iq,D3_GAA_TB_TB) = Mmat3(iq,D3_GAA_TB_TB) 9858 Mmat3(iq,D3_TA_TA_TA) = 1.0d+0*(t51*t64*(-7.92d+3*t24*t79*t8 9859 1 9-2.64d+4*t24*t78*t89-2.904d+4*t24*t77*t89-4.8d+1*t43*t87 9860 2 -4.8d+1*t16*t40*t87-1.92d+2*t37*t45*t86-9.6d+1*t43*t86-2. 9861 3 88d+2*t16*t40*t86-8.64d+2*t37*t45*t85-4.8d+1*t43*t85-4.8d 9862 4 +2*t34*t42*t85-4.32d+2*t16*t40*t85-1.152d+3*t37*t45*t84-1 9863 5 .92d+3*t34*t42*t84-1.92d+2*t16*t40*t84-9.6d+2*t31*t39*t84 9864 6 -4.8d+2*t37*t45*t83-2.4d+3*t34*t42*t83-3.6d+3*t31*t39*t83 9865 7 -1.68d+3*t28*t36*t83-9.6d+2*t34*t42*t82-4.32d+3*t31*t39*t 9866 8 82-6.048d+3*t28*t36*t82-2.688d+3*t25*t33*t82-1.68d+3*t31* 9867 9 t39*t81-7.056d+3*t28*t36*t81-9.408d+3*t25*t33*t81-4.032d+ 9868 : 3*t22*t30*t81-2.688d+3*t28*t36*t80-1.0752d+4*t25*t33*t80- 9869 ; 1.3824d+4*t22*t30*t80-5.76d+3*t19*t27*t80-4.032d+3*t25*t3 9870 < 3*t79-1.5552d+4*t22*t30*t79-1.944d+4*t19*t27*t79-5.76d+3* 9871 = t22*t30*t78-2.16d+4*t19*t27*t78-1.056d+4*t110*t21*t78-7.9 9872 > 2d+3*t19*t27*t77-3.4848d+4*t110*t21*t77-1.3728d+4*t146*t1 9873 ? 7*t77)+t3*t64*(-7.92d+3*t24*t67*t89-2.64d+4*t24*t66*t89-2 9874 @ .904d+4*t24*t65*t89-4.8d+1*t43*t75-4.8d+1*t16*t40*t75-1.9 9875 1 2d+2*t37*t45*t74-9.6d+1*t43*t74-2.88d+2*t16*t40*t74-8.64d 9876 2 +2*t37*t45*t73-4.8d+1*t43*t73-4.8d+2*t34*t42*t73-4.32d+2* 9877 3 t16*t40*t73-1.152d+3*t37*t45*t72-1.92d+3*t34*t42*t72-1.92 9878 4 d+2*t16*t40*t72-9.6d+2*t31*t39*t72-4.8d+2*t37*t45*t71-2.4 9879 5 d+3*t34*t42*t71-3.6d+3*t31*t39*t71-1.68d+3*t28*t36*t71-9. 9880 6 6d+2*t34*t42*t70-4.32d+3*t31*t39*t70-6.048d+3*t28*t36*t70 9881 7 -2.688d+3*t25*t33*t70-1.68d+3*t31*t39*t69-7.056d+3*t28*t3 9882 8 6*t69-9.408d+3*t25*t33*t69-4.032d+3*t22*t30*t69-2.688d+3* 9883 9 t28*t36*t68-1.0752d+4*t25*t33*t68-1.3824d+4*t22*t30*t68-5 9884 : .76d+3*t19*t27*t68-4.032d+3*t25*t33*t67-1.5552d+4*t22*t30 9885 ; *t67-1.944d+4*t19*t27*t67-5.76d+3*t22*t30*t66-2.16d+4*t19 9886 < *t27*t66-1.056d+4*t110*t21*t66-7.92d+3*t19*t27*t65-3.4848 9887 = d+4*t110*t21*t65-1.3728d+4*t146*t17*t65)-9.30525736349100 9888 > 2d-1*t12*t4*t51*(-7.92d+3*t24*t54*t89-2.64d+4*t24*t53*t89 9889 ? -2.904d+4*t24*t52*t89-4.8d+1*t43*t62-4.8d+1*t16*t40*t62-1 9890 @ .92d+2*t37*t45*t61-9.6d+1*t43*t61-2.88d+2*t16*t40*t61-8.6 9891 1 4d+2*t37*t45*t60-4.8d+1*t43*t60-4.8d+2*t34*t42*t60-4.32d+ 9892 2 2*t16*t40*t60-1.152d+3*t37*t45*t59-1.92d+3*t34*t42*t59-1. 9893 3 92d+2*t16*t40*t59-9.6d+2*t31*t39*t59-4.8d+2*t37*t45*t58-2 9894 4 .4d+3*t34*t42*t58-3.6d+3*t31*t39*t58-1.68d+3*t28*t36*t58- 9895 5 9.6d+2*t34*t42*t57-4.32d+3*t31*t39*t57-6.048d+3*t28*t36*t 9896 6 57-2.688d+3*t25*t33*t57-1.68d+3*t31*t39*t56-7.056d+3*t28* 9897 7 t36*t56-9.408d+3*t25*t33*t56-4.032d+3*t22*t30*t56-2.688d+ 9898 8 3*t28*t36*t55-1.0752d+4*t25*t33*t55-1.3824d+4*t22*t30*t55 9899 9 -5.76d+3*t19*t27*t55-4.032d+3*t25*t33*t54-1.5552d+4*t22*t 9900 : 30*t54-1.944d+4*t19*t27*t54-5.76d+3*t22*t30*t53-2.16d+4*t 9901 ; 19*t27*t53-1.056d+4*t110*t21*t53-7.92d+3*t19*t27*t52-3.48 9902 < 48d+4*t110*t21*t52-1.3728d+4*t146*t17*t52)-9.305257363491 9903 = 002d-1*t12*t3*t4*(-7.92d+3*t23*t24*t89-2.64d+4*t20*t24*t8 9904 > 9-2.904d+4*t13*t24*t89-4.8d+1*t43*t47-4.8d+1*t16*t40*t47- 9905 ? 1.92d+2*t37*t44*t45-8.64d+2*t37*t41*t45-1.152d+3*t37*t38* 9906 @ t45-4.8d+2*t35*t37*t45-9.6d+1*t43*t44-2.88d+2*t16*t40*t44 9907 1 -4.8d+1*t41*t43-4.8d+2*t34*t41*t42-1.92d+3*t34*t38*t42-2. 9908 2 4d+3*t34*t35*t42-9.6d+2*t32*t34*t42-4.32d+2*t16*t40*t41-1 9909 3 .92d+2*t16*t38*t40-9.6d+2*t31*t38*t39-3.6d+3*t31*t35*t39- 9910 4 4.32d+3*t31*t32*t39-1.68d+3*t29*t31*t39-1.68d+3*t28*t35*t 9911 5 36-6.048d+3*t28*t32*t36-7.056d+3*t28*t29*t36-2.688d+3*t26 9912 6 *t28*t36-2.688d+3*t25*t32*t33-9.408d+3*t25*t29*t33-1.0752 9913 7 d+4*t25*t26*t33-4.032d+3*t23*t25*t33-4.032d+3*t22*t29*t30 9914 8 -1.3824d+4*t22*t26*t30-1.5552d+4*t22*t23*t30-5.76d+3*t20* 9915 9 t22*t30-5.76d+3*t19*t26*t27-1.944d+4*t19*t23*t27-2.16d+4* 9916 : t19*t20*t27-7.92d+3*t13*t19*t27-1.056d+4*t110*t20*t21-3.4 9917 ; 848d+4*t110*t13*t21-1.3728d+4*t13*t146*t17))*wght+Mmat3(i 9918 < q,D3_TA_TA_TA) 9919 Mmat3(iq,D3_TA_TA_TB) = Mmat3(iq,D3_TA_TA_TB) 9920 Mmat3(iq,D3_TA_TB_TB) = Mmat3(iq,D3_TA_TB_TB) 9921 Mmat3(iq,D3_TB_TB_TB) = Mmat3(iq,D3_TB_TB_TB) 9922 elseif (rhoa.le.tol_rho.and.rhob.gt.tol_rho) then 9923 t1 = 1/rhob**2.6666666666666666d+0 9924 t2 = 4.492667444378077d-3*gammabb*t1+1.0d+0 9925 t3 = 8.04d-1*(1.0d+0-1.0d+0/t2)+1.0d+0 9926 t4 = rhob**1.3333333333333333d+0 9927 t5 = rhob**3.333333333333333d-1 9928 t6 = 1/t5 9929 t7 = 1/rhob 9930 t8 = 1.282782438530422d-1*t6-2.63857249068588d-4*t7 9931 t9 = rhob**6.666666666666666d-1 9932 t10 = exp(-2.4308265985843178d+2*t9) 9933 t11 = t10*t8+2.63857249068588d-4*t7-1.924173657795633d-1*t6+ 9934 1 3.544907701811032d+0*erf(1.5591108358883013d+1*t5) 9935 t12 = 1.0d+0-4.275941461768073d-2*t11*t6 9936 t13 = param(12) 9937 t14 = rhob**1.6666666666666669d+0 9938 t15 = 9.115599744691192d+0*t14 9939 t16 = t15-2.0d+0*taub 9940 t17 = t16**11 9941 t18 = 2.0d+0*taub+t15 9942 t19 = 1/t18**11 9943 t20 = param(11) 9944 t21 = t16**10 9945 t22 = 1/t18**10 9946 t23 = param(10) 9947 t24 = t16**9 9948 t25 = 1/t18**9 9949 t26 = param(9) 9950 t27 = t16**8 9951 t28 = 1/t18**8 9952 t29 = param(8) 9953 t30 = t16**7 9954 t31 = 1/t18**7 9955 t32 = param(7) 9956 t33 = t16**6 9957 t34 = 1/t18**6 9958 t35 = param(6) 9959 t36 = t16**5 9960 t37 = 1/t18**5 9961 t38 = param(5) 9962 t39 = t16**4 9963 t40 = 1/t18**4 9964 t41 = param(4) 9965 t42 = t16**3 9966 t43 = 1/t18**3 9967 t44 = param(3) 9968 t45 = t16**2 9969 t46 = 1/t18**2 9970 t47 = param(2) 9971 t48 = 1/t18 9972 t49 = t16*t47*t48+t44*t45*t46+t41*t42*t43+t38*t39*t40+t35*t3 9973 1 6*t37+t32*t33*t34+t29*t30*t31+t26*t27*t28+t23*t24*t25+t20 9974 2 *t21*t22+t13*t17*t19+param(1) 9975 t50 = exp(-3.6802889260199856d-3*gammabb*t1) 9976 t51 = 5.52d-1*(1.0d+0-t50)+1.0d+0 9977 t52 = param(24) 9978 t53 = param(23) 9979 t54 = param(22) 9980 t55 = param(21) 9981 t56 = param(20) 9982 t57 = param(19) 9983 t58 = param(18) 9984 t59 = param(17) 9985 t60 = param(16) 9986 t61 = param(15) 9987 t62 = param(14) 9988 t63 = t16*t48*t62+t45*t46*t61+t42*t43*t60+t39*t40*t59+t36*t3 9989 1 7*t58+t33*t34*t57+t30*t31*t56+t27*t28*t55+t24*t25*t54+t21 9990 2 *t22*t53+t17*t19*t52+param(13) 9991 t64 = 9.305257363491002d-1*t12*t4-9.305257363491002d-1*t4 9992 t65 = param(36) 9993 t66 = param(35) 9994 t67 = param(34) 9995 t68 = param(33) 9996 t69 = param(32) 9997 t70 = param(31) 9998 t71 = param(30) 9999 t72 = param(29) 10000 t73 = param(28) 10001 t74 = param(27) 10002 t75 = param(26) 10003 t76 = t16*t48*t75+t45*t46*t74+t42*t43*t73+t39*t40*t72+t36*t3 10004 1 7*t71+t33*t34*t70+t30*t31*t69+t27*t28*t68+t24*t25*t67+t21 10005 2 *t22*t66+t17*t19*t65+param(25) 10006 t77 = param(48) 10007 t78 = param(47) 10008 t79 = param(46) 10009 t80 = param(45) 10010 t81 = param(44) 10011 t82 = param(43) 10012 t83 = param(42) 10013 t84 = param(41) 10014 t85 = param(40) 10015 t86 = param(39) 10016 t87 = param(38) 10017 t88 = t16*t48*t87+t45*t46*t86+t42*t43*t85+t39*t40*t84+t36*t3 10018 1 7*t83+t33*t34*t82+t30*t31*t81+t27*t28*t80+t24*t25*t79+t21 10019 2 *t22*t78+t17*t19*t77+param(37) 10020 t89 = 1/t18**12 10021 t90 = -1.6711932865267184d+2*t13*t17*t89*t9+1.51926662411519 10022 1 86d+1*t47*t48*t9-1.5192666241151986d+1*t16*t46*t47*t9+3.0 10023 2 38533248230397d+1*t16*t44*t46*t9-3.038533248230397d+1*t43 10024 3 *t44*t45*t9+4.5577998723455965d+1*t41*t43*t45*t9-4.557799 10025 4 8723455965d+1*t40*t41*t42*t9+6.077066496460795d+1*t38*t40 10026 5 *t42*t9-6.077066496460795d+1*t37*t38*t39*t9+7.59633312057 10027 6 5993d+1*t35*t37*t39*t9-7.596333120575993d+1*t34*t35*t36*t 10028 7 9+9.115599744691193d+1*t32*t34*t36*t9-9.115599744691193d+ 10029 8 1*t31*t32*t33*t9+1.0634866368806391d+2*t29*t31*t33*t9-1.0 10030 9 634866368806391d+2*t28*t29*t30*t9+1.2154132992921589d+2*t 10031 : 26*t28*t30*t9-1.2154132992921589d+2*t25*t26*t27*t9+1.3673 10032 ; 399617036788d+2*t23*t25*t27*t9-1.3673399617036788d+2*t22* 10033 < t23*t24*t9+1.5192666241151986d+2*t20*t22*t24*t9-1.5192666 10034 = 241151986d+2*t19*t20*t21*t9+1.6711932865267184d+2*t13*t19 10035 > *t21*t9 10036 t91 = -1.6711932865267184d+2*t17*t52*t89*t9+1.51926662411519 10037 1 86d+1*t48*t62*t9-1.5192666241151986d+1*t16*t46*t62*t9+3.0 10038 2 38533248230397d+1*t16*t46*t61*t9-3.038533248230397d+1*t43 10039 3 *t45*t61*t9+4.5577998723455965d+1*t43*t45*t60*t9-4.557799 10040 4 8723455965d+1*t40*t42*t60*t9+6.077066496460795d+1*t40*t42 10041 5 *t59*t9-6.077066496460795d+1*t37*t39*t59*t9+7.59633312057 10042 6 5993d+1*t37*t39*t58*t9-7.596333120575993d+1*t34*t36*t58*t 10043 7 9+9.115599744691193d+1*t34*t36*t57*t9-9.115599744691193d+ 10044 8 1*t31*t33*t57*t9+1.0634866368806391d+2*t31*t33*t56*t9-1.0 10045 9 634866368806391d+2*t28*t30*t56*t9+1.2154132992921589d+2*t 10046 : 28*t30*t55*t9-1.2154132992921589d+2*t25*t27*t55*t9+1.3673 10047 ; 399617036788d+2*t25*t27*t54*t9-1.3673399617036788d+2*t22* 10048 < t24*t54*t9+1.5192666241151986d+2*t22*t24*t53*t9-1.5192666 10049 = 241151986d+2*t19*t21*t53*t9+1.6711932865267184d+2*t19*t21 10050 > *t52*t9 10051 t92 = -1.6711932865267184d+2*t17*t65*t89*t9+1.51926662411519 10052 1 86d+1*t48*t75*t9-1.5192666241151986d+1*t16*t46*t75*t9+3.0 10053 2 38533248230397d+1*t16*t46*t74*t9-3.038533248230397d+1*t43 10054 3 *t45*t74*t9+4.5577998723455965d+1*t43*t45*t73*t9-4.557799 10055 4 8723455965d+1*t40*t42*t73*t9+6.077066496460795d+1*t40*t42 10056 5 *t72*t9-6.077066496460795d+1*t37*t39*t72*t9+7.59633312057 10057 6 5993d+1*t37*t39*t71*t9-7.596333120575993d+1*t34*t36*t71*t 10058 7 9+9.115599744691193d+1*t34*t36*t70*t9-9.115599744691193d+ 10059 8 1*t31*t33*t70*t9+1.0634866368806391d+2*t31*t33*t69*t9-1.0 10060 9 634866368806391d+2*t28*t30*t69*t9+1.2154132992921589d+2*t 10061 : 28*t30*t68*t9-1.2154132992921589d+2*t25*t27*t68*t9+1.3673 10062 ; 399617036788d+2*t25*t27*t67*t9-1.3673399617036788d+2*t22* 10063 < t24*t67*t9+1.5192666241151986d+2*t22*t24*t66*t9-1.5192666 10064 = 241151986d+2*t19*t21*t66*t9+1.6711932865267184d+2*t19*t21 10065 > *t65*t9 10066 t93 = -1.6711932865267184d+2*t17*t77*t89*t9+1.51926662411519 10067 1 86d+1*t48*t87*t9-1.5192666241151986d+1*t16*t46*t87*t9+3.0 10068 2 38533248230397d+1*t16*t46*t86*t9-3.038533248230397d+1*t43 10069 3 *t45*t86*t9+4.5577998723455965d+1*t43*t45*t85*t9-4.557799 10070 4 8723455965d+1*t40*t42*t85*t9+6.077066496460795d+1*t40*t42 10071 5 *t84*t9-6.077066496460795d+1*t37*t39*t84*t9+7.59633312057 10072 6 5993d+1*t37*t39*t83*t9-7.596333120575993d+1*t34*t36*t83*t 10073 7 9+9.115599744691193d+1*t34*t36*t82*t9-9.115599744691193d+ 10074 8 1*t31*t33*t82*t9+1.0634866368806391d+2*t31*t33*t81*t9-1.0 10075 9 634866368806391d+2*t28*t30*t81*t9+1.2154132992921589d+2*t 10076 : 28*t30*t80*t9-1.2154132992921589d+2*t25*t27*t80*t9+1.3673 10077 ; 399617036788d+2*t25*t27*t79*t9-1.3673399617036788d+2*t22* 10078 < t24*t79*t9+1.5192666241151986d+2*t22*t24*t78*t9-1.5192666 10079 = 241151986d+2*t19*t21*t78*t9+1.6711932865267184d+2*t19*t21 10080 > *t77*t9 10081 t94 = 1/t2**2 10082 t95 = 1/rhob**2.3333333333333334d+0 10083 t96 = 1/t4 10084 t97 = rhob**2 10085 t98 = 1/t97 10086 t99 = 2.63857249068588d-4*t98-4.2759414617680735d-2*t96 10087 t100 = 5.641895835477563d-1 10088 t101 = 1/t9 10089 t102 = t10*t99-2.63857249068588d-4*t98+6.41391219265211d-2*t 10090 1 96-1.6205510657228786d+2*t10*t6*t8+3.6846026734116505d+1* 10091 2 t10*t100*t101 10092 t103 = 1.4253138205893576d-2*t11*t96-4.275941461768073d-2*t1 10093 1 02*t6 10094 t104 = 1/rhob**3.6666666666666664d+0 10095 t105 = 1.2407009817988002d+0*t12*t5-1.2407009817988002d+0*t5 10096 1 +9.305257363491002d-1*t103*t4 10097 t106 = -2.2d+1*t13*t17*t89-2.0d+0*t47*t48-2.0d+0*t16*t46*t47 10098 1 -4.0d+0*t16*t44*t46-4.0d+0*t43*t44*t45-6.0d+0*t41*t43*t45 10099 2 -6.0d+0*t40*t41*t42-8.0d+0*t38*t40*t42-8.0d+0*t37*t38*t39 10100 3 -1.0d+1*t35*t37*t39-1.0d+1*t34*t35*t36-1.2d+1*t32*t34*t36 10101 4 -1.2d+1*t31*t32*t33-1.4d+1*t29*t31*t33-1.4d+1*t28*t29*t30 10102 5 -1.6d+1*t26*t28*t30-1.6d+1*t25*t26*t27-1.8d+1*t23*t25*t27 10103 6 -1.8d+1*t22*t23*t24-2.0d+1*t20*t22*t24-2.0d+1*t19*t20*t21 10104 7 -2.2d+1*t13*t19*t21 10105 t107 = -2.2d+1*t17*t52*t89-2.0d+0*t48*t62-2.0d+0*t16*t46*t62 10106 1 -4.0d+0*t16*t46*t61-4.0d+0*t43*t45*t61-6.0d+0*t43*t45*t60 10107 2 -6.0d+0*t40*t42*t60-8.0d+0*t40*t42*t59-8.0d+0*t37*t39*t59 10108 3 -1.0d+1*t37*t39*t58-1.0d+1*t34*t36*t58-1.2d+1*t34*t36*t57 10109 4 -1.2d+1*t31*t33*t57-1.4d+1*t31*t33*t56-1.4d+1*t28*t30*t56 10110 5 -1.6d+1*t28*t30*t55-1.6d+1*t25*t27*t55-1.8d+1*t25*t27*t54 10111 6 -1.8d+1*t22*t24*t54-2.0d+1*t22*t24*t53-2.0d+1*t19*t21*t53 10112 7 -2.2d+1*t19*t21*t52 10113 t108 = -2.2d+1*t17*t65*t89-2.0d+0*t48*t75-2.0d+0*t16*t46*t75 10114 1 -4.0d+0*t16*t46*t74-4.0d+0*t43*t45*t74-6.0d+0*t43*t45*t73 10115 2 -6.0d+0*t40*t42*t73-8.0d+0*t40*t42*t72-8.0d+0*t37*t39*t72 10116 3 -1.0d+1*t37*t39*t71-1.0d+1*t34*t36*t71-1.2d+1*t34*t36*t70 10117 4 -1.2d+1*t31*t33*t70-1.4d+1*t31*t33*t69-1.4d+1*t28*t30*t69 10118 5 -1.6d+1*t28*t30*t68-1.6d+1*t25*t27*t68-1.8d+1*t25*t27*t67 10119 6 -1.8d+1*t22*t24*t67-2.0d+1*t22*t24*t66-2.0d+1*t19*t21*t66 10120 7 -2.2d+1*t19*t21*t65 10121 t109 = -2.2d+1*t17*t77*t89-2.0d+0*t48*t87-2.0d+0*t16*t46*t87 10122 1 -4.0d+0*t16*t46*t86-4.0d+0*t43*t45*t86-6.0d+0*t43*t45*t85 10123 2 -6.0d+0*t40*t42*t85-8.0d+0*t40*t42*t84-8.0d+0*t37*t39*t84 10124 3 -1.0d+1*t37*t39*t83-1.0d+1*t34*t36*t83-1.2d+1*t34*t36*t82 10125 4 -1.2d+1*t31*t33*t82-1.4d+1*t31*t33*t81-1.4d+1*t28*t30*t81 10126 5 -1.6d+1*t28*t30*t80-1.6d+1*t25*t27*t80-1.8d+1*t25*t27*t79 10127 6 -1.8d+1*t22*t24*t79-2.0d+1*t22*t24*t78-2.0d+1*t19*t21*t78 10128 7 -2.2d+1*t19*t21*t77 10129 t110 = 1/t18**13 10130 t111 = -1.1141288576844789d+2*t13*t17*t6*t89+2.5389881826654 10131 1 315d+4*t20*t21*t4*t89-5.585774001863949d+4*t13*t21*t4*t89 10132 2 +1.0128444160767991d+1*t47*t48*t6-1.0128444160767991d+1*t 10133 3 16*t46*t47*t6+2.0256888321535982d+1*t16*t44*t46*t6-2.0256 10134 4 888321535982d+1*t43*t44*t45*t6+3.038533248230397d+1*t41*t 10135 5 43*t45*t6-3.038533248230397d+1*t40*t41*t42*t6+4.051377664 10136 6 3071964d+1*t38*t40*t42*t6-4.0513776643071964d+1*t37*t38*t 10137 7 39*t6+5.064222080383994d+1*t35*t37*t39*t6-5.0642220803839 10138 8 94d+1*t34*t35*t36*t6+6.077066496460795d+1*t32*t34*t36*t6- 10139 9 6.077066496460795d+1*t31*t32*t33*t6+7.089910912537593d+1* 10140 : t29*t31*t33*t6-7.089910912537593d+1*t28*t29*t30*t6+8.1027 10141 ; 55328614393d+1*t26*t28*t30*t6-8.102755328614393d+1*t25*t2 10142 < 6*t27*t6+9.115599744691191d+1*t23*t25*t27*t6-9.1155997446 10143 = 91191d+1*t22*t23*t24*t6+1.012844416076799d+2*t20*t22*t24* 10144 > t6-1.012844416076799d+2*t19*t20*t21*t6+1.1141288576844789 10145 ? d+2*t13*t19*t21*t6-4.6163421503007845d+2*t4*t46*t47+4.616 10146 @ 3421503007845d+2*t16*t4*t43*t47+4.6163421503007845d+2*t4* 10147 1 t44*t46+1.3849026450902355d+3*t4*t40*t44*t45-4.1547079352 10148 2 707067d+3*t4*t40*t41*t45+2.769805290180471d+3*t38*t4*t40* 10149 3 t45-1.846536860120314d+3*t16*t4*t43*t44+1.384902645090235 10150 4 5d+3*t16*t4*t41*t43+2.769805290180471d+3*t37*t4*t41*t42-7 10151 5 .386147440481255d+3*t37*t38*t4*t42+4.616342150300784d+3*t 10152 6 35*t37*t4*t42+4.616342150300784d+3*t34*t38*t39*t4-1.15408 10153 7 5537575196d+4*t34*t35*t39*t4+6.924513225451178d+3*t32*t34 10154 8 *t39*t4+6.924513225451178d+3*t31*t35*t36*t4-1.66188317410 10155 9 8283d+4*t31*t32*t36*t4+9.694318515631648d+3*t29*t31*t36*t 10156 : 4+9.694318515631648d+3*t28*t32*t33*t4-2.2620076536473846d 10157 ; +4*t28*t29*t33*t4+1.2925758020842196d+4*t26*t28*t33*t4+1. 10158 < 2925758020842196d+4*t25*t29*t30*t4-2.954458976192502d+4*t 10159 = 25*t26*t30*t4+1.6618831741082823d+4*t23*t25*t30*t4+1.6618 10160 > 831741082823d+4*t22*t26*t27*t4-3.7392371417436354d+4*t22* 10161 ? t23*t27*t4+2.0773539676353528d+4*t20*t22*t27*t4+2.0773539 10162 @ 676353528d+4*t19*t23*t24*t4-4.616342150300784d+4*t19*t20* 10163 1 t24*t4+2.5389881826654315d+4*t13*t19*t24*t4+3.04678581919 10164 2 8518d+4*t110*t13*t17*t4 10165 t112 = -1.1141288576844789d+2*t17*t52*t6*t89+2.5389881826654 10166 1 315d+4*t21*t4*t53*t89-5.585774001863949d+4*t21*t4*t52*t89 10167 2 +1.0128444160767991d+1*t48*t6*t62-1.0128444160767991d+1*t 10168 3 16*t46*t6*t62-4.6163421503007845d+2*t4*t46*t62+4.61634215 10169 4 03007845d+2*t16*t4*t43*t62+2.0256888321535982d+1*t16*t46* 10170 5 t6*t61-2.0256888321535982d+1*t43*t45*t6*t61+4.61634215030 10171 6 07845d+2*t4*t46*t61+1.3849026450902355d+3*t4*t40*t45*t61- 10172 7 1.846536860120314d+3*t16*t4*t43*t61+3.038533248230397d+1* 10173 8 t43*t45*t6*t60-3.038533248230397d+1*t40*t42*t6*t60-4.1547 10174 9 079352707067d+3*t4*t40*t45*t60+1.3849026450902355d+3*t16* 10175 : t4*t43*t60+2.769805290180471d+3*t37*t4*t42*t60+4.05137766 10176 ; 43071964d+1*t40*t42*t59*t6-4.0513776643071964d+1*t37*t39* 10177 < t59*t6+5.064222080383994d+1*t37*t39*t58*t6-5.064222080383 10178 = 994d+1*t34*t36*t58*t6+6.077066496460795d+1*t34*t36*t57*t6 10179 > -6.077066496460795d+1*t31*t33*t57*t6+7.089910912537593d+1 10180 ? *t31*t33*t56*t6-7.089910912537593d+1*t28*t30*t56*t6+8.102 10181 @ 755328614393d+1*t28*t30*t55*t6-8.102755328614393d+1*t25*t 10182 1 27*t55*t6+9.115599744691191d+1*t25*t27*t54*t6-9.115599744 10183 2 691191d+1*t22*t24*t54*t6+1.012844416076799d+2*t22*t24*t53 10184 3 *t6-1.012844416076799d+2*t19*t21*t53*t6+1.114128857684478 10185 4 9d+2*t19*t21*t52*t6+2.769805290180471d+3*t4*t40*t45*t59-7 10186 5 .386147440481255d+3*t37*t4*t42*t59+4.616342150300784d+3*t 10187 6 34*t39*t4*t59+4.616342150300784d+3*t37*t4*t42*t58-1.15408 10188 7 5537575196d+4*t34*t39*t4*t58+6.924513225451178d+3*t31*t36 10189 8 *t4*t58+6.924513225451178d+3*t34*t39*t4*t57-1.66188317410 10190 9 8283d+4*t31*t36*t4*t57+9.694318515631648d+3*t28*t33*t4*t5 10191 : 7+9.694318515631648d+3*t31*t36*t4*t56-2.2620076536473846d 10192 ; +4*t28*t33*t4*t56+1.2925758020842196d+4*t25*t30*t4*t56+1. 10193 < 2925758020842196d+4*t28*t33*t4*t55-2.954458976192502d+4*t 10194 = 25*t30*t4*t55+1.6618831741082823d+4*t22*t27*t4*t55+1.6618 10195 > 831741082823d+4*t25*t30*t4*t54-3.7392371417436354d+4*t22* 10196 ? t27*t4*t54+2.0773539676353528d+4*t19*t24*t4*t54+2.0773539 10197 @ 676353528d+4*t22*t27*t4*t53-4.616342150300784d+4*t19*t24* 10198 1 t4*t53+2.5389881826654315d+4*t19*t24*t4*t52+3.04678581919 10199 2 8518d+4*t110*t17*t4*t52 10200 t113 = 2.5389881826654315d+4*t21*t4*t66*t89-1.11412885768447 10201 1 89d+2*t17*t6*t65*t89-5.585774001863949d+4*t21*t4*t65*t89+ 10202 2 1.0128444160767991d+1*t48*t6*t75-1.0128444160767991d+1*t1 10203 3 6*t46*t6*t75-4.6163421503007845d+2*t4*t46*t75+4.616342150 10204 4 3007845d+2*t16*t4*t43*t75+2.0256888321535982d+1*t16*t46*t 10205 5 6*t74-2.0256888321535982d+1*t43*t45*t6*t74+4.616342150300 10206 6 7845d+2*t4*t46*t74+1.3849026450902355d+3*t4*t40*t45*t74-1 10207 7 .846536860120314d+3*t16*t4*t43*t74+3.038533248230397d+1*t 10208 8 43*t45*t6*t73-3.038533248230397d+1*t40*t42*t6*t73-4.15470 10209 9 79352707067d+3*t4*t40*t45*t73+1.3849026450902355d+3*t16*t 10210 : 4*t43*t73+2.769805290180471d+3*t37*t4*t42*t73+4.051377664 10211 ; 3071964d+1*t40*t42*t6*t72-4.0513776643071964d+1*t37*t39*t 10212 < 6*t72+2.769805290180471d+3*t4*t40*t45*t72-7.3861474404812 10213 = 55d+3*t37*t4*t42*t72+4.616342150300784d+3*t34*t39*t4*t72+ 10214 > 5.064222080383994d+1*t37*t39*t6*t71-5.064222080383994d+1* 10215 ? t34*t36*t6*t71+4.616342150300784d+3*t37*t4*t42*t71-1.1540 10216 @ 85537575196d+4*t34*t39*t4*t71+6.924513225451178d+3*t31*t3 10217 1 6*t4*t71+6.077066496460795d+1*t34*t36*t6*t70-6.0770664964 10218 2 60795d+1*t31*t33*t6*t70+6.924513225451178d+3*t34*t39*t4*t 10219 3 70-1.661883174108283d+4*t31*t36*t4*t70+9.694318515631648d 10220 4 +3*t28*t33*t4*t70+7.089910912537593d+1*t31*t33*t6*t69-7.0 10221 5 89910912537593d+1*t28*t30*t6*t69+9.694318515631648d+3*t31 10222 6 *t36*t4*t69-2.2620076536473846d+4*t28*t33*t4*t69+1.292575 10223 7 8020842196d+4*t25*t30*t4*t69+8.102755328614393d+1*t28*t30 10224 8 *t6*t68-8.102755328614393d+1*t25*t27*t6*t68+1.29257580208 10225 9 42196d+4*t28*t33*t4*t68-2.954458976192502d+4*t25*t30*t4*t 10226 : 68+1.6618831741082823d+4*t22*t27*t4*t68+9.115599744691191 10227 ; d+1*t25*t27*t6*t67-9.115599744691191d+1*t22*t24*t6*t67+1. 10228 < 6618831741082823d+4*t25*t30*t4*t67-3.7392371417436354d+4* 10229 = t22*t27*t4*t67+2.0773539676353528d+4*t19*t24*t4*t67+1.012 10230 > 844416076799d+2*t22*t24*t6*t66-1.012844416076799d+2*t19*t 10231 ? 21*t6*t66+2.0773539676353528d+4*t22*t27*t4*t66-4.61634215 10232 @ 0300784d+4*t19*t24*t4*t66+1.1141288576844789d+2*t19*t21*t 10233 1 6*t65+2.5389881826654315d+4*t19*t24*t4*t65+3.046785819198 10234 2 518d+4*t110*t17*t4*t65 10235 t114 = 2.5389881826654315d+4*t21*t4*t78*t89-1.11412885768447 10236 1 89d+2*t17*t6*t77*t89-5.585774001863949d+4*t21*t4*t77*t89+ 10237 2 1.0128444160767991d+1*t48*t6*t87-1.0128444160767991d+1*t1 10238 3 6*t46*t6*t87-4.6163421503007845d+2*t4*t46*t87+4.616342150 10239 4 3007845d+2*t16*t4*t43*t87+2.0256888321535982d+1*t16*t46*t 10240 5 6*t86-2.0256888321535982d+1*t43*t45*t6*t86+4.616342150300 10241 6 7845d+2*t4*t46*t86+1.3849026450902355d+3*t4*t40*t45*t86-1 10242 7 .846536860120314d+3*t16*t4*t43*t86+3.038533248230397d+1*t 10243 8 43*t45*t6*t85-3.038533248230397d+1*t40*t42*t6*t85-4.15470 10244 9 79352707067d+3*t4*t40*t45*t85+1.3849026450902355d+3*t16*t 10245 : 4*t43*t85+2.769805290180471d+3*t37*t4*t42*t85+4.051377664 10246 ; 3071964d+1*t40*t42*t6*t84-4.0513776643071964d+1*t37*t39*t 10247 < 6*t84+2.769805290180471d+3*t4*t40*t45*t84-7.3861474404812 10248 = 55d+3*t37*t4*t42*t84+4.616342150300784d+3*t34*t39*t4*t84+ 10249 > 5.064222080383994d+1*t37*t39*t6*t83-5.064222080383994d+1* 10250 ? t34*t36*t6*t83+4.616342150300784d+3*t37*t4*t42*t83-1.1540 10251 @ 85537575196d+4*t34*t39*t4*t83+6.924513225451178d+3*t31*t3 10252 1 6*t4*t83+6.077066496460795d+1*t34*t36*t6*t82-6.0770664964 10253 2 60795d+1*t31*t33*t6*t82+6.924513225451178d+3*t34*t39*t4*t 10254 3 82-1.661883174108283d+4*t31*t36*t4*t82+9.694318515631648d 10255 4 +3*t28*t33*t4*t82+7.089910912537593d+1*t31*t33*t6*t81-7.0 10256 5 89910912537593d+1*t28*t30*t6*t81+9.694318515631648d+3*t31 10257 6 *t36*t4*t81-2.2620076536473846d+4*t28*t33*t4*t81+1.292575 10258 7 8020842196d+4*t25*t30*t4*t81+8.102755328614393d+1*t28*t30 10259 8 *t6*t80-8.102755328614393d+1*t25*t27*t6*t80+1.29257580208 10260 9 42196d+4*t28*t33*t4*t80-2.954458976192502d+4*t25*t30*t4*t 10261 : 80+1.6618831741082823d+4*t22*t27*t4*t80+9.115599744691191 10262 ; d+1*t25*t27*t6*t79-9.115599744691191d+1*t22*t24*t6*t79+1. 10263 < 6618831741082823d+4*t25*t30*t4*t79-3.7392371417436354d+4* 10264 = t22*t27*t4*t79+2.0773539676353528d+4*t19*t24*t4*t79+1.012 10265 > 844416076799d+2*t22*t24*t6*t78-1.012844416076799d+2*t19*t 10266 ? 21*t6*t78+2.0773539676353528d+4*t22*t27*t4*t78-4.61634215 10267 @ 0300784d+4*t19*t24*t4*t78+1.1141288576844789d+2*t19*t21*t 10268 1 6*t77+2.5389881826654315d+4*t19*t24*t4*t77+3.046785819198 10269 2 518d+4*t110*t17*t4*t77 10270 t115 = gammabb**2 10271 t116 = 1/t2**3 10272 t117 = 1/rhob**6 10273 t118 = 1/rhob**3.3333333333333337d+0 10274 t119 = 1/rhob**3 10275 t120 = 5.701255282357431d-2*t95-5.27714498137176d-4*t119 10276 t121 = 1/t14 10277 t122 = -3.241102131445757d+2*t10*t6*t99+5.401836885742928d+1 10278 1 *t10*t8*t96-8.551882923536147d-2*t95+2.626185756615557d+4 10279 2 *t10*t101*t8-5.971086789162617d+3*t10*t100*t7-2.456401782 10280 3 2744336d+1*t10*t100*t121+t10*t120+5.27714498137176d-4*t11 10281 4 9 10282 t123 = 2.850627641178715d-2*t102*t96-1.9004184274524766d-2*t 10283 1 11*t95-4.275941461768073d-2*t122*t6 10284 t124 = 1/rhob**7.333333333333333d+0 10285 t125 = 1/rhob**4.666666666666667d+0 10286 t126 = 2.4814019635976003d+0*t103*t5+9.305257363491002d-1*t1 10287 1 23*t4+4.135669939329334d-1*t101*t12-4.135669939329334d-1* 10288 2 t101 10289 t127 = 1.7926167019779404d-2*gammabb*t12*t90+1.7926167019779 10290 1 404d-2*gammabb*t103*t49 10291 t128 = -4.135669939329334d-1*t12*t51*t63-4.135669939329334d- 10292 1 1*t12*t3*t49 10293 t129 = 1.0082032889066277d-2*gammabb*t12*t50*t91+1.008203288 10294 1 9066277d-2*gammabb*t103*t50*t63 10295 t130 = -1.9264558001493193d-2*gammabb*t64*t92-1.926455800149 10296 1 3193d-2*gammabb*t105*t76 10297 t131 = -1.0834770598202839d-2*gammabb*t50*t64*t93-1.08347705 10298 1 98202839d-2*gammabb*t105*t50*t88 10299 t132 = 1/rhob**5 10300 t133 = 1/rhob**6.333333333333333d+0 10301 t134 = -3.361156316208638d-3*t12*t90-3.361156316208638d-3*t1 10302 1 03*t49 10303 t135 = 3.612104625279974d-3*t64*t92+3.612104625279974d-3*t10 10304 1 5*t76 10305 t136 = 1/rhob**4 10306 t137 = 1/rhob**5.333333333333333d+0 10307 t138 = 3.342386573053437d+3*t20*t21*t89*t9+6.077066496460795 10308 1 d+1*t16*t43*t47*t9-6.077066496460795d+1*t44*t46*t9+1.8231 10309 2 199489382385d+2*t40*t44*t45*t9-3.646239897876477d+2*t38*t 10310 3 40*t45*t9-1.8231199489382385d+2*t16*t41*t43*t9+3.64623989 10311 4 7876477d+2*t37*t41*t42*t9-6.077066496460795d+2*t35*t37*t4 10312 5 2*t9+6.077066496460795d+2*t34*t38*t39*t9-9.11559974469119 10313 6 2d+2*t32*t34*t39*t9+9.115599744691192d+2*t31*t35*t36*t9-1 10314 7 .276183964256767d+3*t29*t31*t36*t9+1.276183964256767d+3*t 10315 8 28*t32*t33*t9-1.7015786190090226d+3*t26*t28*t33*t9+1.7015 10316 9 786190090226d+3*t25*t29*t30*t9-2.187743938725886d+3*t23*t 10317 : 25*t30*t9+2.187743938725886d+3*t22*t26*t27*t9-2.734679923 10318 ; 407357d+3*t20*t22*t27*t9+2.734679923407357d+3*t19*t23*t24 10319 < *t9-3.342386573053437d+3*t13*t19*t24*t9+4.010863887664124 10320 = 5d+3*t110*t13*t17*t9 10321 t139 = 3.342386573053437d+3*t21*t53*t89*t9+6.077066496460795 10322 1 d+1*t16*t43*t62*t9-6.077066496460795d+1*t46*t61*t9+1.8231 10323 2 199489382385d+2*t40*t45*t61*t9-1.8231199489382385d+2*t16* 10324 3 t43*t60*t9+3.646239897876477d+2*t37*t42*t60*t9-3.64623989 10325 4 7876477d+2*t40*t45*t59*t9+6.077066496460795d+2*t34*t39*t5 10326 5 9*t9-6.077066496460795d+2*t37*t42*t58*t9+9.11559974469119 10327 6 2d+2*t31*t36*t58*t9-9.115599744691192d+2*t34*t39*t57*t9+1 10328 7 .276183964256767d+3*t28*t33*t57*t9-1.276183964256767d+3*t 10329 8 31*t36*t56*t9+1.7015786190090226d+3*t25*t30*t56*t9-1.7015 10330 9 786190090226d+3*t28*t33*t55*t9+2.187743938725886d+3*t22*t 10331 : 27*t55*t9-2.187743938725886d+3*t25*t30*t54*t9+2.734679923 10332 ; 407357d+3*t19*t24*t54*t9-2.734679923407357d+3*t22*t27*t53 10333 < *t9-3.342386573053437d+3*t19*t24*t52*t9+4.010863887664124 10334 = 5d+3*t110*t17*t52*t9 10335 t140 = 3.342386573053437d+3*t21*t66*t89*t9+6.077066496460795 10336 1 d+1*t16*t43*t75*t9-6.077066496460795d+1*t46*t74*t9+1.8231 10337 2 199489382385d+2*t40*t45*t74*t9-1.8231199489382385d+2*t16* 10338 3 t43*t73*t9+3.646239897876477d+2*t37*t42*t73*t9-3.64623989 10339 4 7876477d+2*t40*t45*t72*t9+6.077066496460795d+2*t34*t39*t7 10340 5 2*t9-6.077066496460795d+2*t37*t42*t71*t9+9.11559974469119 10341 6 2d+2*t31*t36*t71*t9-9.115599744691192d+2*t34*t39*t70*t9+1 10342 7 .276183964256767d+3*t28*t33*t70*t9-1.276183964256767d+3*t 10343 8 31*t36*t69*t9+1.7015786190090226d+3*t25*t30*t69*t9-1.7015 10344 9 786190090226d+3*t28*t33*t68*t9+2.187743938725886d+3*t22*t 10345 : 27*t68*t9-2.187743938725886d+3*t25*t30*t67*t9+2.734679923 10346 ; 407357d+3*t19*t24*t67*t9-2.734679923407357d+3*t22*t27*t66 10347 < *t9-3.342386573053437d+3*t19*t24*t65*t9+4.010863887664124 10348 = 5d+3*t110*t17*t65*t9 10349 t141 = 3.342386573053437d+3*t21*t78*t89*t9+6.077066496460795 10350 1 d+1*t16*t43*t87*t9-6.077066496460795d+1*t46*t86*t9+1.8231 10351 2 199489382385d+2*t40*t45*t86*t9-1.8231199489382385d+2*t16* 10352 3 t43*t85*t9+3.646239897876477d+2*t37*t42*t85*t9-3.64623989 10353 4 7876477d+2*t40*t45*t84*t9+6.077066496460795d+2*t34*t39*t8 10354 5 4*t9-6.077066496460795d+2*t37*t42*t83*t9+9.11559974469119 10355 6 2d+2*t31*t36*t83*t9-9.115599744691192d+2*t34*t39*t82*t9+1 10356 7 .276183964256767d+3*t28*t33*t82*t9-1.276183964256767d+3*t 10357 8 31*t36*t81*t9+1.7015786190090226d+3*t25*t30*t81*t9-1.7015 10358 9 786190090226d+3*t28*t33*t80*t9+2.187743938725886d+3*t22*t 10359 : 27*t80*t9-2.187743938725886d+3*t25*t30*t79*t9+2.734679923 10360 ; 407357d+3*t19*t24*t79*t9-2.734679923407357d+3*t22*t27*t78 10361 < *t9-3.342386573053437d+3*t19*t24*t77*t9+4.010863887664124 10362 = 5d+3*t110*t17*t77*t9 10363 t142 = 4.4d+2*t20*t21*t89+9.68d+2*t13*t21*t89+8.0d+0*t46*t47 10364 1 +8.0d+0*t16*t43*t47+8.0d+0*t44*t46+2.4d+1*t40*t44*t45+7.2 10365 2 d+1*t40*t41*t45+4.8d+1*t38*t40*t45+3.2d+1*t16*t43*t44+2.4 10366 3 d+1*t16*t41*t43+4.8d+1*t37*t41*t42+1.28d+2*t37*t38*t42+8. 10367 4 0d+1*t35*t37*t42+8.0d+1*t34*t38*t39+2.0d+2*t34*t35*t39+1. 10368 5 2d+2*t32*t34*t39+1.2d+2*t31*t35*t36+2.88d+2*t31*t32*t36+1 10369 6 .68d+2*t29*t31*t36+1.68d+2*t28*t32*t33+3.92d+2*t28*t29*t3 10370 7 3+2.24d+2*t26*t28*t33+2.24d+2*t25*t29*t30+5.12d+2*t25*t26 10371 8 *t30+2.88d+2*t23*t25*t30+2.88d+2*t22*t26*t27+6.48d+2*t22* 10372 9 t23*t27+3.6d+2*t20*t22*t27+3.6d+2*t19*t23*t24+8.0d+2*t19* 10373 : t20*t24+4.4d+2*t13*t19*t24+5.28d+2*t110*t13*t17 10374 t143 = 4.4d+2*t21*t53*t89+9.68d+2*t21*t52*t89+8.0d+0*t46*t62 10375 1 +8.0d+0*t16*t43*t62+8.0d+0*t46*t61+2.4d+1*t40*t45*t61+3.2 10376 2 d+1*t16*t43*t61+7.2d+1*t40*t45*t60+2.4d+1*t16*t43*t60+4.8 10377 3 d+1*t37*t42*t60+4.8d+1*t40*t45*t59+1.28d+2*t37*t42*t59+8. 10378 4 0d+1*t34*t39*t59+8.0d+1*t37*t42*t58+2.0d+2*t34*t39*t58+1. 10379 5 2d+2*t31*t36*t58+1.2d+2*t34*t39*t57+2.88d+2*t31*t36*t57+1 10380 6 .68d+2*t28*t33*t57+1.68d+2*t31*t36*t56+3.92d+2*t28*t33*t5 10381 7 6+2.24d+2*t25*t30*t56+2.24d+2*t28*t33*t55+5.12d+2*t25*t30 10382 8 *t55+2.88d+2*t22*t27*t55+2.88d+2*t25*t30*t54+6.48d+2*t22* 10383 9 t27*t54+3.6d+2*t19*t24*t54+3.6d+2*t22*t27*t53+8.0d+2*t19* 10384 : t24*t53+4.4d+2*t19*t24*t52+5.28d+2*t110*t17*t52 10385 t144 = 4.4d+2*t21*t66*t89+9.68d+2*t21*t65*t89+8.0d+0*t46*t75 10386 1 +8.0d+0*t16*t43*t75+8.0d+0*t46*t74+2.4d+1*t40*t45*t74+3.2 10387 2 d+1*t16*t43*t74+7.2d+1*t40*t45*t73+2.4d+1*t16*t43*t73+4.8 10388 3 d+1*t37*t42*t73+4.8d+1*t40*t45*t72+1.28d+2*t37*t42*t72+8. 10389 4 0d+1*t34*t39*t72+8.0d+1*t37*t42*t71+2.0d+2*t34*t39*t71+1. 10390 5 2d+2*t31*t36*t71+1.2d+2*t34*t39*t70+2.88d+2*t31*t36*t70+1 10391 6 .68d+2*t28*t33*t70+1.68d+2*t31*t36*t69+3.92d+2*t28*t33*t6 10392 7 9+2.24d+2*t25*t30*t69+2.24d+2*t28*t33*t68+5.12d+2*t25*t30 10393 8 *t68+2.88d+2*t22*t27*t68+2.88d+2*t25*t30*t67+6.48d+2*t22* 10394 9 t27*t67+3.6d+2*t19*t24*t67+3.6d+2*t22*t27*t66+8.0d+2*t19* 10395 : t24*t66+4.4d+2*t19*t24*t65+5.28d+2*t110*t17*t65 10396 t145 = 4.4d+2*t21*t78*t89+9.68d+2*t21*t77*t89+8.0d+0*t46*t87 10397 1 +8.0d+0*t16*t43*t87+8.0d+0*t46*t86+2.4d+1*t40*t45*t86+3.2 10398 2 d+1*t16*t43*t86+7.2d+1*t40*t45*t85+2.4d+1*t16*t43*t85+4.8 10399 3 d+1*t37*t42*t85+4.8d+1*t40*t45*t84+1.28d+2*t37*t42*t84+8. 10400 4 0d+1*t34*t39*t84+8.0d+1*t37*t42*t83+2.0d+2*t34*t39*t83+1. 10401 5 2d+2*t31*t36*t83+1.2d+2*t34*t39*t82+2.88d+2*t31*t36*t82+1 10402 6 .68d+2*t28*t33*t82+1.68d+2*t31*t36*t81+3.92d+2*t28*t33*t8 10403 7 1+2.24d+2*t25*t30*t81+2.24d+2*t28*t33*t80+5.12d+2*t25*t30 10404 8 *t80+2.88d+2*t22*t27*t80+2.88d+2*t25*t30*t79+6.48d+2*t22* 10405 9 t27*t79+3.6d+2*t19*t24*t79+3.6d+2*t22*t27*t78+8.0d+2*t19* 10406 : t24*t78+4.4d+2*t19*t24*t77+5.28d+2*t110*t17*t77 10407 t146 = 1/t18**14 10408 t147 = gammabb**3 10409 t148 = 1/t2**4 10410 t149 = 1/rhob**9.666666666666666d+0 10411 t150 = 1/rhob**7 10412 t151 = 1/rhob**4.333333333333333d+0 10413 t152 = -4.275941461768073d-2*t6*(1.6205510657228786d+2*t10*t 10414 1 96*t99+7.878557269846671d+4*t10*t101*t99+9.95181131527102 10415 2 9d+3*t10*t100*t98+9.676451059701281d+5*t10*t100*t96-7.202 10416 3 44918099057d+1*t10*t8*t95-4.255868126669586d+6*t10*t7*t8- 10417 4 2.626185756615557d+4*t10*t121*t8-4.8616531971686355d+2*t1 10418 5 0*t120*t6-1.5831434944115283d-3*t136+t10*(1.5831434944115 10419 6 283d-3*t136-1.330292899216734d-1*t118)+1.995439348825101d 10420 7 -1*t118+4.0940029704573894d+1*t1*t10*t100)+4.275941461768 10421 8 0724d-2*t122*t96-5.701255282357429d-2*t102*t95+4.43430966 10422 9 4055779d-2*t11*t118 10423 t153 = 1/rhob**11 10424 t154 = 1/rhob**8.333333333333334d+0 10425 t155 = 1/rhob**5.666666666666667d+0 10426 t156 = 3.7221029453964005d+0*t123*t5+9.305257363491002d-1*t1 10427 1 52*t4-2.7571132928862224d-1*t12*t121+2.7571132928862224d- 10428 2 1*t121+1.2407009817988002d+0*t101*t103 10429 t157 = 1/rhob**8.666666666666666d+0 10430 t158 = 1/rhob**10 10431 t159 = 1/rhob**7.666666666666667d+0 10432 t160 = 1/rhob**9 10433 t161 = 1/rhob**6.666666666666667d+0 10434 t162 = 1/rhob**8 10435 fnc(iq) = 1.0d+0*(t51*t64*t88+t3*t64*t76-9.305257363491002d- 10436 1 1*t12*t4*t51*t63-9.305257363491002d-1*t12*t3*t4*t49)*wght 10437 2 +fnc(iq) 10438 Amat(iq,D1_RB) = 1.0d+0*(8.963083509889702d-3*gammabb*t12*t4 10439 1 9*t94*t95+5.041016444533138d-3*gammabb*t12*t50*t63*t95-9. 10440 2 632279000746596d-3*gammabb*t104*t64*t76*t94+t51*t64*t93+t 10441 3 3*t64*t92-9.305257363491002d-1*t12*t4*t51*t91-9.305257363 10442 4 491002d-1*t12*t3*t4*t90-5.417385299101419d-3*gammabb*t104 10443 5 *t50*t64*t88+t105*t51*t88+t105*t3*t76-1.2407009817988002d 10444 6 +0*t12*t5*t51*t63-9.305257363491002d-1*t103*t4*t51*t63-1. 10445 7 2407009817988002d+0*t12*t3*t49*t5-9.305257363491002d-1*t1 10446 8 03*t3*t4*t49)*wght+Amat(iq,D1_RB) 10447 Cmat(iq,D1_GBB) = 1.0d+0*(-3.361156316208638d-3*t12*t49*t94* 10448 1 t96-1.890381166699927d-3*t12*t50*t63*t96+3.61210462527997 10449 2 4d-3*t1*t64*t76*t94+2.0315194871630324d-3*t1*t50*t64*t88) 10450 3 *wght+Cmat(iq,D1_GBB) 10451 Mmat(iq,D1_TB) = 1.0d+0*(t109*t51*t64+t108*t3*t64-9.30525736 10452 1 3491002d-1*t107*t12*t4*t51-9.305257363491002d-1*t106*t12* 10453 2 t3*t4)*wght+Mmat(iq,D1_TB) 10454 Mmat(iq,D1_TA) = Mmat(iq,D1_TA) 10455 Amat2(iq,D2_RB_RB) = 1.0d+0*(t127*t94*t95+t129*t95+3.5318356 10456 1 336070855d-2*gammabb*t125*t64*t76*t94-8.963083509889707d- 10457 2 3*gammabb*t118*t12*t49*t94+t104*t130*t94+2*t105*t51*t93+2 10458 3 *t105*t3*t92-2.4814019635976003d+0*t12*t5*t51*t91-1.86105 10459 4 14726982003d+0*t103*t4*t51*t91-2.4814019635976003d+0*t12* 10460 5 t3*t5*t90-1.8610514726982003d+0*t103*t3*t4*t90+1.98637460 10461 6 96705204d-2*gammabb*t125*t50*t64*t88-5.316678166471045d-5 10462 7 *t115*t124*t50*t64*t88+t126*t51*t88-2.3079800683637772d-4 10463 8 *t115*t116*t124*t64*t76+t126*t3*t76+t114*t51*t64+t113*t3* 10464 9 t64-2.4814019635976003d+0*t103*t5*t51*t63-9.3052573634910 10465 : 02d-1*t123*t4*t51*t63-5.041016444533138d-3*gammabb*t118*t 10466 ; 12*t50*t63+4.947305865786653d-5*t115*t117*t12*t50*t63-9.3 10467 < 05257363491002d-1*t112*t12*t4*t51-2.4814019635976003d+0*t 10468 = 103*t3*t49*t5-9.305257363491002d-1*t123*t3*t4*t49+2.14763 10469 > 48525932504d-4*t115*t116*t117*t12*t49-9.305257363491002d- 10470 ? 1*t111*t12*t3*t4+t104*t131+t101*t128)*wght+Amat2(iq,D2_RB 10471 @ _RB) 10472 Cmat2(iq,D2_RB_GBB) = 1.0d+0*(t134*t94*t96+(-1.8903811666999 10473 1 27d-3*t12*t50*t91-1.890381166699927d-3*t103*t50*t63)*t96+ 10474 2 4.481541754944851d-3*t12*t49*t94*t95+2.520508222266569d-3 10475 3 *t12*t50*t63*t95-9.632279000746596d-3*t104*t64*t76*t94+t1 10476 4 *t135*t94+t1*(2.0315194871630324d-3*t50*t64*t93+2.0315194 10477 5 871630324d-3*t105*t50*t88)+1.9937543124266421d-5*gammabb* 10478 6 t133*t50*t64*t88-5.417385299101419d-3*t104*t50*t64*t88+8. 10479 7 654925256364164d-5*gammabb*t116*t133*t64*t76-1.8552396996 10480 8 69995d-5*gammabb*t12*t132*t50*t63-8.05363069722469d-5*gam 10481 9 mabb*t116*t12*t132*t49)*wght+Cmat2(iq,D2_RB_GBB) 10482 Cmat2(iq,D2_GBB_GBB) = 1.0d+0*(-7.476578671599909d-6*t137*t5 10483 1 0*t64*t88-3.245596971136562d-5*t116*t137*t64*t76+6.957148 10484 2 873762482d-6*t12*t136*t50*t63+3.020111511459258d-5*t116*t 10485 3 12*t136*t49)*wght+Cmat2(iq,D2_GBB_GBB) 10486 Mmat2(iq,D2_RB_TA) = Mmat2(iq,D2_RB_TA) 10487 Mmat2(iq,D2_RB_TB) = 1.0d+0*(8.963083509889702d-3*gammabb*t1 10488 1 06*t12*t94*t95+5.041016444533138d-3*gammabb*t107*t12*t50* 10489 2 t95-9.632279000746596d-3*gammabb*t104*t108*t64*t94+t141*t 10490 3 51*t64-5.417385299101419d-3*gammabb*t104*t109*t50*t64+t14 10491 4 0*t3*t64-1.2407009817988002d+0*t107*t12*t5*t51-9.30525736 10492 5 3491002d-1*t12*t139*t4*t51-9.305257363491002d-1*t103*t107 10493 6 *t4*t51+t105*t109*t51-1.2407009817988002d+0*t106*t12*t3*t 10494 7 5-9.305257363491002d-1*t12*t138*t3*t4-9.305257363491002d- 10495 8 1*t103*t106*t3*t4+t105*t108*t3)*wght+Mmat2(iq,D2_RB_TB) 10496 Mmat2(iq,D2_GBB_TA) = Mmat2(iq,D2_GBB_TA) 10497 Mmat2(iq,D2_GBB_TB) = 1.0d+0*(-3.361156316208638d-3*t106*t12 10498 1 *t94*t96-1.890381166699927d-3*t107*t12*t50*t96+3.61210462 10499 2 5279974d-3*t1*t108*t64*t94+2.0315194871630324d-3*t1*t109* 10500 3 t50*t64)*wght+Mmat2(iq,D2_GBB_TB) 10501 Mmat2(iq,D2_TA_TA) = Mmat2(iq,D2_TA_TA) 10502 Mmat2(iq,D2_TA_TB) = Mmat2(iq,D2_TA_TB) 10503 Mmat2(iq,D2_TB_TB) = 1.0d+0*(t145*t51*t64+t144*t3*t64-9.3052 10504 1 57363491002d-1*t12*t143*t4*t51-9.305257363491002d-1*t12*t 10505 2 142*t3*t4)*wght+Mmat2(iq,D2_TB_TB) 10506 Amat3(iq,D3_RB_RB_RB) = 1.0d+0*(t51*t64*(-3.4716600044518436 10507 1 d+6*t24*t79*t89*t97+1.1572200014839477d+7*t24*t78*t89*t97 10508 2 -1.2729420016323426d+7*t24*t77*t89*t97+2.104036366334451d 10509 3 +4*t43*t87*t97-2.104036366334451d+4*t16*t40*t87*t97-8.416 10510 4 145465337804d+4*t37*t45*t86*t97-4.208072732668902d+4*t43* 10511 5 t86*t97+1.2624218198006704d+5*t16*t40*t86*t97+3.787265459 10512 6 402013d+5*t37*t45*t85*t97+2.104036366334451d+4*t43*t85*t9 10513 7 7-2.104036366334451d+5*t34*t42*t85*t97-1.8936327297010064 10514 8 d+5*t16*t40*t85*t97-5.049687279202681d+5*t37*t45*t84*t97+ 10515 9 8.416145465337803d+5*t34*t42*t84*t97+8.416145465337804d+4 10516 : *t16*t40*t84*t97-4.2080727326689016d+5*t31*t39*t84*t97+2. 10517 ; 1040363663344508d+5*t37*t45*t83*t97-1.0520181831672254d+6 10518 < *t34*t42*t83*t97+1.578027274750838d+6*t31*t39*t83*t97-7.3 10519 = 64127282170578d+5*t28*t36*t83*t97+4.208072732668902d+5*t3 10520 > 4*t42*t82*t97-1.893632729701006d+6*t31*t39*t82*t97+2.6510 10521 ? 858215814087d+6*t28*t36*t82*t97-1.1782603651472927d+6*t25 10522 @ *t33*t82*t97+7.364127282170578d+5*t31*t39*t81*t97-3.09293 10523 1 34585116436d+6*t28*t36*t81*t97+4.123911278015524d+6*t25*t 10524 2 33*t81*t97-1.7673905477209387d+6*t22*t30*t81*t97+1.178260 10525 3 3651472927d+6*t28*t36*t80*t97-4.713041460589171d+6*t25*t3 10526 4 3*t80*t97+6.059624735043219d+6*t22*t30*t80*t97-2.52484363 10527 5 9601341d+6*t19*t27*t80*t97+1.767390547720939d+6*t25*t33*t 10528 6 79*t97-6.817077826923622d+6*t22*t30*t79*t97+8.52134728365 10529 7 4526d+6*t19*t27*t79*t97+2.524843639601341d+6*t22*t30*t78* 10530 8 t97-9.468163648505028d+6*t19*t27*t78*t97-4.62888000593579 10531 9 2d+6*t110*t21*t78*t97+3.4716600044518436d+6*t19*t27*t77*t 10532 : 97+1.5275304019588112d+7*t110*t21*t77*t97-6.0175440077165 10533 ; 3d+6*t146*t17*t77*t97+3.713762858948263d+1*t17*t77*t89*t9 10534 < 6-3.37614805358933d+0*t48*t87*t96+3.37614805358933d+0*t16 10535 = *t46*t87*t96-6.75229610717866d+0*t16*t46*t86*t96+6.752296 10536 > 10717866d+0*t43*t45*t86*t96-1.0128444160767991d+1*t43*t45 10537 ? *t85*t96+1.0128444160767991d+1*t40*t42*t85*t96-1.35045922 10538 @ 1435732d+1*t40*t42*t84*t96+1.350459221435732d+1*t37*t39*t 10539 1 84*t96-1.6880740267946648d+1*t37*t39*t83*t96+1.6880740267 10540 2 946648d+1*t34*t36*t83*t96-2.0256888321535982d+1*t34*t36*t 10541 3 82*t96+2.0256888321535982d+1*t31*t33*t82*t96-2.3633036375 10542 4 125308d+1*t31*t33*t81*t96+2.3633036375125308d+1*t28*t30*t 10543 5 81*t96-2.700918442871464d+1*t28*t30*t80*t96+2.70091844287 10544 6 1464d+1*t25*t27*t80*t96-3.0385332482303967d+1*t25*t27*t79 10545 7 *t96+3.0385332482303967d+1*t22*t24*t79*t96-3.376148053589 10546 8 3296d+1*t22*t24*t78*t96+3.3761480535893296d+1*t19*t21*t78 10547 9 *t96-3.713762858948263d+1*t19*t21*t77*t96+5.0779763653308 10548 : 62d+4*t21*t5*t78*t89-1.1171548003727898d+5*t21*t5*t77*t89 10549 ; -9.232684300601568d+2*t46*t5*t87+9.232684300601568d+2*t16 10550 < *t43*t5*t87+9.232684300601568d+2*t46*t5*t86+2.76980529018 10551 = 0471d+3*t40*t45*t5*t86-3.693073720240627d+3*t16*t43*t5*t8 10552 > 6-8.309415870541413d+3*t40*t45*t5*t85+2.769805290180471d+ 10553 ? 3*t16*t43*t5*t85+5.539610580360942d+3*t37*t42*t5*t85+5.53 10554 @ 9610580360942d+3*t40*t45*t5*t84-1.4772294880962508d+4*t37 10555 1 *t42*t5*t84+9.232684300601568d+3*t34*t39*t5*t84+9.2326843 10556 2 00601568d+3*t37*t42*t5*t83-2.308171075150392d+4*t34*t39*t 10557 3 5*t83+1.3849026450902355d+4*t31*t36*t5*t83+1.384902645090 10558 4 2355d+4*t34*t39*t5*t82-3.323766348216566d+4*t31*t36*t5*t8 10559 5 2+1.9388637031263292d+4*t28*t33*t5*t82+1.9388637031263292 10560 6 d+4*t31*t36*t5*t81-4.5240153072947686d+4*t28*t33*t5*t81+2 10561 7 .585151604168439d+4*t25*t30*t5*t81+2.585151604168439d+4*t 10562 8 28*t33*t5*t80-5.908917952385003d+4*t25*t30*t5*t80+3.32376 10563 9 63482165647d+4*t22*t27*t5*t80+3.3237663482165647d+4*t25*t 10564 : 30*t5*t79-7.478474283487271d+4*t22*t27*t5*t79+4.154707935 10565 ; 2707056d+4*t19*t24*t5*t79+4.154707935270705d+4*t22*t27*t5 10566 < *t78-9.232684300601568d+4*t19*t24*t5*t78+5.07797636533086 10567 = 3d+4*t19*t24*t5*t77+6.093571638397036d+4*t110*t17*t5*t77) 10568 > +t3*t64*(-3.4716600044518436d+6*t24*t67*t89*t97+1.1572200 10569 ? 014839477d+7*t24*t66*t89*t97-1.2729420016323426d+7*t24*t6 10570 @ 5*t89*t97+2.104036366334451d+4*t43*t75*t97-2.104036366334 10571 1 451d+4*t16*t40*t75*t97-8.416145465337804d+4*t37*t45*t74*t 10572 2 97-4.208072732668902d+4*t43*t74*t97+1.2624218198006704d+5 10573 3 *t16*t40*t74*t97+3.787265459402013d+5*t37*t45*t73*t97+2.1 10574 4 04036366334451d+4*t43*t73*t97-2.104036366334451d+5*t34*t4 10575 5 2*t73*t97-1.8936327297010064d+5*t16*t40*t73*t97-5.0496872 10576 6 79202681d+5*t37*t45*t72*t97+8.416145465337803d+5*t34*t42* 10577 7 t72*t97+8.416145465337804d+4*t16*t40*t72*t97-4.2080727326 10578 8 689016d+5*t31*t39*t72*t97+2.1040363663344508d+5*t37*t45*t 10579 9 71*t97-1.0520181831672254d+6*t34*t42*t71*t97+1.5780272747 10580 : 50838d+6*t31*t39*t71*t97-7.364127282170578d+5*t28*t36*t71 10581 ; *t97+4.208072732668902d+5*t34*t42*t70*t97-1.8936327297010 10582 < 06d+6*t31*t39*t70*t97+2.6510858215814087d+6*t28*t36*t70*t 10583 = 97-1.1782603651472927d+6*t25*t33*t70*t97+7.36412728217057 10584 > 8d+5*t31*t39*t69*t97-3.0929334585116436d+6*t28*t36*t69*t9 10585 ? 7+4.123911278015524d+6*t25*t33*t69*t97-1.7673905477209387 10586 @ d+6*t22*t30*t69*t97+1.1782603651472927d+6*t28*t36*t68*t97 10587 1 -4.713041460589171d+6*t25*t33*t68*t97+6.059624735043219d+ 10588 2 6*t22*t30*t68*t97-2.524843639601341d+6*t19*t27*t68*t97+1. 10589 3 767390547720939d+6*t25*t33*t67*t97-6.817077826923622d+6*t 10590 4 22*t30*t67*t97+8.521347283654526d+6*t19*t27*t67*t97+2.524 10591 5 843639601341d+6*t22*t30*t66*t97-9.468163648505028d+6*t19* 10592 6 t27*t66*t97-4.628880005935792d+6*t110*t21*t66*t97+3.47166 10593 7 00044518436d+6*t19*t27*t65*t97+1.5275304019588112d+7*t110 10594 8 *t21*t65*t97-6.01754400771653d+6*t146*t17*t65*t97+3.71376 10595 9 2858948263d+1*t17*t65*t89*t96-3.37614805358933d+0*t48*t75 10596 : *t96+3.37614805358933d+0*t16*t46*t75*t96-6.75229610717866 10597 ; d+0*t16*t46*t74*t96+6.75229610717866d+0*t43*t45*t74*t96-1 10598 < .0128444160767991d+1*t43*t45*t73*t96+1.0128444160767991d+ 10599 = 1*t40*t42*t73*t96-1.350459221435732d+1*t40*t42*t72*t96+1. 10600 > 350459221435732d+1*t37*t39*t72*t96-1.6880740267946648d+1* 10601 ? t37*t39*t71*t96+1.6880740267946648d+1*t34*t36*t71*t96-2.0 10602 @ 256888321535982d+1*t34*t36*t70*t96+2.0256888321535982d+1* 10603 1 t31*t33*t70*t96-2.3633036375125308d+1*t31*t33*t69*t96+2.3 10604 2 633036375125308d+1*t28*t30*t69*t96-2.700918442871464d+1*t 10605 3 28*t30*t68*t96+2.700918442871464d+1*t25*t27*t68*t96-3.038 10606 4 5332482303967d+1*t25*t27*t67*t96+3.0385332482303967d+1*t2 10607 5 2*t24*t67*t96-3.3761480535893296d+1*t22*t24*t66*t96+3.376 10608 6 1480535893296d+1*t19*t21*t66*t96-3.713762858948263d+1*t19 10609 7 *t21*t65*t96+5.077976365330862d+4*t21*t5*t66*t89-1.117154 10610 8 8003727898d+5*t21*t5*t65*t89-9.232684300601568d+2*t46*t5* 10611 9 t75+9.232684300601568d+2*t16*t43*t5*t75+9.232684300601568 10612 : d+2*t46*t5*t74+2.769805290180471d+3*t40*t45*t5*t74-3.6930 10613 ; 73720240627d+3*t16*t43*t5*t74-8.309415870541413d+3*t40*t4 10614 < 5*t5*t73+2.769805290180471d+3*t16*t43*t5*t73+5.5396105803 10615 = 60942d+3*t37*t42*t5*t73+5.539610580360942d+3*t40*t45*t5*t 10616 > 72-1.4772294880962508d+4*t37*t42*t5*t72+9.232684300601568 10617 ? d+3*t34*t39*t5*t72+9.232684300601568d+3*t37*t42*t5*t71-2. 10618 @ 308171075150392d+4*t34*t39*t5*t71+1.3849026450902355d+4*t 10619 1 31*t36*t5*t71+1.3849026450902355d+4*t34*t39*t5*t70-3.3237 10620 2 66348216566d+4*t31*t36*t5*t70+1.9388637031263292d+4*t28*t 10621 3 33*t5*t70+1.9388637031263292d+4*t31*t36*t5*t69-4.52401530 10622 4 72947686d+4*t28*t33*t5*t69+2.585151604168439d+4*t25*t30*t 10623 5 5*t69+2.585151604168439d+4*t28*t33*t5*t68-5.9089179523850 10624 6 03d+4*t25*t30*t5*t68+3.3237663482165647d+4*t22*t27*t5*t68 10625 7 +3.3237663482165647d+4*t25*t30*t5*t67-7.478474283487271d+ 10626 8 4*t22*t27*t5*t67+4.1547079352707056d+4*t19*t24*t5*t67+4.1 10627 9 54707935270705d+4*t22*t27*t5*t66-9.232684300601568d+4*t19 10628 : *t24*t5*t66+5.077976365330863d+4*t19*t24*t5*t65+6.0935716 10629 ; 38397036d+4*t110*t17*t5*t65)-9.305257363491002d-1*t12*t4* 10630 < t51*(-3.4716600044518436d+6*t24*t54*t89*t97+1.15722000148 10631 = 39477d+7*t24*t53*t89*t97-1.2729420016323426d+7*t24*t52*t8 10632 > 9*t97+2.104036366334451d+4*t43*t62*t97-2.104036366334451d 10633 ? +4*t16*t40*t62*t97-8.416145465337804d+4*t37*t45*t61*t97-4 10634 @ .208072732668902d+4*t43*t61*t97+1.2624218198006704d+5*t16 10635 1 *t40*t61*t97+3.787265459402013d+5*t37*t45*t60*t97+2.10403 10636 2 6366334451d+4*t43*t60*t97-2.104036366334451d+5*t34*t42*t6 10637 3 0*t97-1.8936327297010064d+5*t16*t40*t60*t97-5.04968727920 10638 4 2681d+5*t37*t45*t59*t97+8.416145465337803d+5*t34*t42*t59* 10639 5 t97+8.416145465337804d+4*t16*t40*t59*t97-4.20807273266890 10640 6 16d+5*t31*t39*t59*t97+2.1040363663344508d+5*t37*t45*t58*t 10641 7 97-1.0520181831672254d+6*t34*t42*t58*t97+1.57802727475083 10642 8 8d+6*t31*t39*t58*t97-7.364127282170578d+5*t28*t36*t58*t97 10643 9 +4.208072732668902d+5*t34*t42*t57*t97-1.893632729701006d+ 10644 : 6*t31*t39*t57*t97+2.6510858215814087d+6*t28*t36*t57*t97-1 10645 ; .1782603651472927d+6*t25*t33*t57*t97+7.364127282170578d+5 10646 < *t31*t39*t56*t97-3.0929334585116436d+6*t28*t36*t56*t97+4. 10647 = 123911278015524d+6*t25*t33*t56*t97-1.7673905477209387d+6* 10648 > t22*t30*t56*t97+1.1782603651472927d+6*t28*t36*t55*t97-4.7 10649 ? 13041460589171d+6*t25*t33*t55*t97+6.059624735043219d+6*t2 10650 @ 2*t30*t55*t97-2.524843639601341d+6*t19*t27*t55*t97+1.7673 10651 1 90547720939d+6*t25*t33*t54*t97-6.817077826923622d+6*t22*t 10652 2 30*t54*t97+8.521347283654526d+6*t19*t27*t54*t97+2.5248436 10653 3 39601341d+6*t22*t30*t53*t97-9.468163648505028d+6*t19*t27* 10654 4 t53*t97-4.628880005935792d+6*t110*t21*t53*t97+3.471660004 10655 5 4518436d+6*t19*t27*t52*t97+1.5275304019588112d+7*t110*t21 10656 6 *t52*t97-6.01754400771653d+6*t146*t17*t52*t97+3.713762858 10657 7 948263d+1*t17*t52*t89*t96-3.37614805358933d+0*t48*t62*t96 10658 8 +3.37614805358933d+0*t16*t46*t62*t96-6.75229610717866d+0* 10659 9 t16*t46*t61*t96+6.75229610717866d+0*t43*t45*t61*t96-1.012 10660 : 8444160767991d+1*t43*t45*t60*t96+1.0128444160767991d+1*t4 10661 ; 0*t42*t60*t96-1.350459221435732d+1*t40*t42*t59*t96+1.3504 10662 < 59221435732d+1*t37*t39*t59*t96-1.6880740267946648d+1*t37* 10663 = t39*t58*t96+1.6880740267946648d+1*t34*t36*t58*t96-2.02568 10664 > 88321535982d+1*t34*t36*t57*t96+2.0256888321535982d+1*t31* 10665 ? t33*t57*t96-2.3633036375125308d+1*t31*t33*t56*t96+2.36330 10666 @ 36375125308d+1*t28*t30*t56*t96-2.700918442871464d+1*t28*t 10667 1 30*t55*t96+2.700918442871464d+1*t25*t27*t55*t96-3.0385332 10668 2 482303967d+1*t25*t27*t54*t96+3.0385332482303967d+1*t22*t2 10669 3 4*t54*t96-3.3761480535893296d+1*t22*t24*t53*t96+3.3761480 10670 4 535893296d+1*t19*t21*t53*t96-3.713762858948263d+1*t19*t21 10671 5 *t52*t96+5.077976365330862d+4*t21*t5*t53*t89-1.1171548003 10672 6 727898d+5*t21*t5*t52*t89-9.232684300601568d+2*t46*t5*t62+ 10673 7 9.232684300601568d+2*t16*t43*t5*t62+9.232684300601568d+2* 10674 8 t46*t5*t61+2.769805290180471d+3*t40*t45*t5*t61-3.69307372 10675 9 0240627d+3*t16*t43*t5*t61-8.309415870541413d+3*t40*t45*t5 10676 : *t60+2.769805290180471d+3*t16*t43*t5*t60+5.53961058036094 10677 ; 2d+3*t37*t42*t5*t60+5.539610580360942d+3*t40*t45*t5*t59-1 10678 < .4772294880962508d+4*t37*t42*t5*t59+9.232684300601568d+3* 10679 = t34*t39*t5*t59+9.232684300601568d+3*t37*t42*t5*t58-2.3081 10680 > 71075150392d+4*t34*t39*t5*t58+1.3849026450902355d+4*t31*t 10681 ? 36*t5*t58+1.3849026450902355d+4*t34*t39*t5*t57-3.32376634 10682 @ 8216566d+4*t31*t36*t5*t57+1.9388637031263292d+4*t28*t33*t 10683 1 5*t57+1.9388637031263292d+4*t31*t36*t5*t56-4.524015307294 10684 2 7686d+4*t28*t33*t5*t56+2.585151604168439d+4*t25*t30*t5*t5 10685 3 6+2.585151604168439d+4*t28*t33*t5*t55-5.908917952385003d+ 10686 4 4*t25*t30*t5*t55+3.3237663482165647d+4*t22*t27*t5*t55+3.3 10687 5 237663482165647d+4*t25*t30*t5*t54-7.478474283487271d+4*t2 10688 6 2*t27*t5*t54+4.1547079352707056d+4*t19*t24*t5*t54+4.15470 10689 7 7935270705d+4*t22*t27*t5*t53-9.232684300601568d+4*t19*t24 10690 8 *t5*t53+5.077976365330863d+4*t19*t24*t5*t52+6.09357163839 10691 9 7036d+4*t110*t17*t5*t52)-9.305257363491002d-1*t12*t3*t4*( 10692 : -3.4716600044518436d+6*t23*t24*t89*t97+1.1572200014839477 10693 ; d+7*t20*t24*t89*t97-1.2729420016323426d+7*t13*t24*t89*t97 10694 < +2.104036366334451d+4*t43*t47*t97-2.104036366334451d+4*t1 10695 = 6*t40*t47*t97-8.416145465337804d+4*t37*t44*t45*t97+3.7872 10696 > 65459402013d+5*t37*t41*t45*t97-5.049687279202681d+5*t37*t 10697 ? 38*t45*t97+2.1040363663344508d+5*t35*t37*t45*t97-4.208072 10698 @ 732668902d+4*t43*t44*t97+1.2624218198006704d+5*t16*t40*t4 10699 1 4*t97+2.104036366334451d+4*t41*t43*t97-2.104036366334451d 10700 2 +5*t34*t41*t42*t97+8.416145465337803d+5*t34*t38*t42*t97-1 10701 3 .0520181831672254d+6*t34*t35*t42*t97+4.208072732668902d+5 10702 4 *t32*t34*t42*t97-1.8936327297010064d+5*t16*t40*t41*t97+8. 10703 5 416145465337804d+4*t16*t38*t40*t97-4.2080727326689016d+5* 10704 6 t31*t38*t39*t97+1.578027274750838d+6*t31*t35*t39*t97-1.89 10705 7 3632729701006d+6*t31*t32*t39*t97+7.364127282170578d+5*t29 10706 8 *t31*t39*t97-7.364127282170578d+5*t28*t35*t36*t97+2.65108 10707 9 58215814087d+6*t28*t32*t36*t97-3.0929334585116436d+6*t28* 10708 : t29*t36*t97+1.1782603651472927d+6*t26*t28*t36*t97-1.17826 10709 ; 03651472927d+6*t25*t32*t33*t97+4.123911278015524d+6*t25*t 10710 < 29*t33*t97-4.713041460589171d+6*t25*t26*t33*t97+1.7673905 10711 = 47720939d+6*t23*t25*t33*t97-1.7673905477209387d+6*t22*t29 10712 > *t30*t97+6.059624735043219d+6*t22*t26*t30*t97-6.817077826 10713 ? 923622d+6*t22*t23*t30*t97+2.524843639601341d+6*t20*t22*t3 10714 @ 0*t97-2.524843639601341d+6*t19*t26*t27*t97+8.521347283654 10715 1 526d+6*t19*t23*t27*t97-9.468163648505028d+6*t19*t20*t27*t 10716 2 97+3.4716600044518436d+6*t13*t19*t27*t97-4.62888000593579 10717 3 2d+6*t110*t20*t21*t97+1.5275304019588112d+7*t110*t13*t21* 10718 4 t97-6.01754400771653d+6*t13*t146*t17*t97+3.71376285894826 10719 5 3d+1*t13*t17*t89*t96-3.37614805358933d+0*t47*t48*t96+3.37 10720 6 614805358933d+0*t16*t46*t47*t96-6.75229610717866d+0*t16*t 10721 7 44*t46*t96+6.75229610717866d+0*t43*t44*t45*t96-1.01284441 10722 8 60767991d+1*t41*t43*t45*t96+1.0128444160767991d+1*t40*t41 10723 9 *t42*t96-1.350459221435732d+1*t38*t40*t42*t96+1.350459221 10724 : 435732d+1*t37*t38*t39*t96-1.6880740267946648d+1*t35*t37*t 10725 ; 39*t96+1.6880740267946648d+1*t34*t35*t36*t96-2.0256888321 10726 < 535982d+1*t32*t34*t36*t96+2.0256888321535982d+1*t31*t32*t 10727 = 33*t96-2.3633036375125308d+1*t29*t31*t33*t96+2.3633036375 10728 > 125308d+1*t28*t29*t30*t96-2.700918442871464d+1*t26*t28*t3 10729 ? 0*t96+2.700918442871464d+1*t25*t26*t27*t96-3.038533248230 10730 @ 3967d+1*t23*t25*t27*t96+3.0385332482303967d+1*t22*t23*t24 10731 1 *t96-3.3761480535893296d+1*t20*t22*t24*t96+3.376148053589 10732 2 3296d+1*t19*t20*t21*t96-3.713762858948263d+1*t13*t19*t21* 10733 3 t96+5.077976365330862d+4*t20*t21*t5*t89-1.117154800372789 10734 4 8d+5*t13*t21*t5*t89-9.232684300601568d+2*t46*t47*t5+9.232 10735 5 684300601568d+2*t16*t43*t47*t5+9.232684300601568d+2*t44*t 10736 6 46*t5+2.769805290180471d+3*t40*t44*t45*t5-8.3094158705414 10737 7 13d+3*t40*t41*t45*t5+5.539610580360942d+3*t38*t40*t45*t5- 10738 8 3.693073720240627d+3*t16*t43*t44*t5+2.769805290180471d+3* 10739 9 t16*t41*t43*t5+5.539610580360942d+3*t37*t41*t42*t5-1.4772 10740 : 294880962508d+4*t37*t38*t42*t5+9.232684300601568d+3*t35*t 10741 ; 37*t42*t5+9.232684300601568d+3*t34*t38*t39*t5-2.308171075 10742 < 150392d+4*t34*t35*t39*t5+1.3849026450902355d+4*t32*t34*t3 10743 = 9*t5+1.3849026450902355d+4*t31*t35*t36*t5-3.3237663482165 10744 > 66d+4*t31*t32*t36*t5+1.9388637031263292d+4*t29*t31*t36*t5 10745 ? +1.9388637031263292d+4*t28*t32*t33*t5-4.5240153072947686d 10746 @ +4*t28*t29*t33*t5+2.585151604168439d+4*t26*t28*t33*t5+2.5 10747 1 85151604168439d+4*t25*t29*t30*t5-5.908917952385003d+4*t25 10748 2 *t26*t30*t5+3.3237663482165647d+4*t23*t25*t30*t5+3.323766 10749 3 3482165647d+4*t22*t26*t27*t5-7.478474283487271d+4*t22*t23 10750 4 *t27*t5+4.154707935270705d+4*t20*t22*t27*t5+4.15470793527 10751 5 07056d+4*t19*t23*t24*t5-9.232684300601568d+4*t19*t20*t24* 10752 6 t5+5.077976365330863d+4*t13*t19*t24*t5+6.093571638397036d 10753 7 +4*t110*t13*t17*t5)+(5.377850105933821d-2*gammabb*t103*t9 10754 8 0+2.6889250529669106d-2*gammabb*t123*t49+2.68892505296691 10755 9 06d-2*gammabb*t111*t12)*t94*t95+(9.894611731573306d-5*t10 10756 : 4*t115*t12*t50*t91+3.024609866719883d-2*gammabb*t103*t50* 10757 ; t91+1.5123049333599414d-2*gammabb*t123*t50*t63+9.89461173 10758 < 1573306d-5*t103*t104*t115*t50*t63+1.5123049333599414d-2*g 10759 = ammabb*t112*t12*t50)*t95+t101*(3.983592671062089d-3*gamma 10760 > bb*t104*t12*t49*t94-1.2407009817988002d+0*t12*t51*t91-1.2 10761 ? 407009817988002d+0*t12*t3*t90-1.2407009817988002d+0*t103* 10762 @ t51*t63+2.2404517531258392d-3*gammabb*t104*t12*t50*t63-1. 10763 1 2407009817988002d+0*t103*t3*t49)+t125*(3.5318356336070855 10764 2 d-2*gammabb*t64*t92+3.5318356336070855d-2*gammabb*t105*t7 10765 3 6)*t94+t104*(-5.779367400447957d-2*gammabb*t105*t92-2.889 10766 4 6837002239784d-2*gammabb*t126*t76-2.8896837002239784d-2*g 10767 5 ammabb*t113*t64)*t94+t118*(1.4938472516482826d-2*gammabb* 10768 6 t12*t90+1.4938472516482826d-2*gammabb*t103*t49)*t94-1.648 10769 7 1899623499732d-1*gammabb*t155*t64*t76*t94+2.9876945032965 10770 8 69d-2*gammabb*t12*t151*t49*t94-3.6666666666666664d+0*t125 10771 9 *t130*t94-2.3333333333333334d+0*t118*t127*t94+t104*(-1.06 10772 : 3335633294209d-4*t104*t115*t50*t64*t93-3.250431179460851d 10773 ; -2*gammabb*t105*t50*t93-1.6252155897304255d-2*gammabb*t12 10774 < 6*t50*t88-1.063335633294209d-4*t104*t105*t115*t50*t88-1.6 10775 = 252155897304255d-2*gammabb*t114*t50*t64)+t124*(-5.3166781 10776 > 66471045d-5*t115*t50*t64*t93-5.316678166471045d-5*t105*t1 10777 ? 15*t50*t88)+t125*(1.9863746096705204d-2*gammabb*t50*t64*t 10778 @ 93+1.9863746096705204d-2*gammabb*t105*t50*t88)+3*t126*t51 10779 1 *t93+t116*t124*(-2.3079800683637772d-4*t115*t64*t92-2.307 10780 2 9800683637772d-4*t105*t115*t76+2.3960893036683073d-2*gamm 10781 3 abb*t130)+3*t126*t3*t92+t117*(4.947305865786653d-5*t115*t 10782 4 12*t50*t91+4.947305865786653d-5*t103*t115*t50*t63)+t118*( 10783 5 8.401694074221897d-3*gammabb*t12*t50*t91+8.40169407422189 10784 6 7d-3*gammabb*t103*t50*t63)-7.444205890792801d+0*t103*t5*t 10785 7 51*t91-2.7915772090473007d+0*t123*t4*t51*t91+t116*t117*(2 10786 8 .1476348525932504d-4*t115*t12*t90+2.1476348525932504d-4*t 10787 9 103*t115*t49+2.3960893036683073d-2*gammabb*t127)-7.444205 10788 : 890792801d+0*t103*t3*t5*t90-2.7915772090473007d+0*t123*t3 10789 ; *t4*t90-9.269748178462429d-2*gammabb*t155*t50*t64*t88+5.8 10790 < 4834598311815d-4*t115*t154*t50*t64*t88-5.217843141140167d 10791 = -7*t147*t153*t50*t64*t88+t156*t51*t88+2.5387780752001543d 10792 > -3*t115*t116*t154*t64*t76-8.295189532329142d-6*t147*t148* 10793 ? t153*t64*t76+t156*t3*t76-3.7221029453964005d+0*t123*t5*t5 10794 @ 1*t63-9.305257363491002d-1*t152*t4*t51*t63+1.680338814844 10795 1 3793d-2*gammabb*t12*t151*t50*t63-3.4631141060506576d-4*t1 10796 2 15*t12*t150*t50*t63+4.855337331063556d-7*t12*t147*t149*t5 10797 3 0*t63-3.7221029453964005d+0*t112*t12*t5*t51-2.79157720904 10798 4 73007d+0*t103*t112*t4*t51+3*t105*t114*t51-3.7221029453964 10799 5 005d+0*t123*t3*t49*t5-3.7221029453964005d+0*t111*t12*t3*t 10800 6 5-9.305257363491002d-1*t152*t3*t4*t49-1.5033443968152754d 10801 7 -3*t115*t116*t12*t150*t49+7.718887347725925d-6*t12*t147*t 10802 8 148*t149*t49-2.7915772090473007d+0*t103*t111*t3*t4+3*t105 10803 9 *t113*t3-3.6666666666666664d+0*t125*t131-2.33333333333333 10804 : 34d+0*t118*t129-6.666666666666666d-1*t121*t128)*wght+Amat 10805 ; 3(iq,D3_RB_RB_RB) 10806 Cmat3(iq,D3_RB_RB_GBB) = 1.0d+0*((-6.722312632417276d-3*t103 10807 1 *t90-3.361156316208638d-3*t123*t49-3.361156316208638d-3*t 10808 2 111*t12)*t94*t96+(-3.780762333399854d-3*t103*t50*t91-1.89 10809 3 0381166699927d-3*t123*t50*t63-1.890381166699927d-3*t112*t 10810 4 12*t50)*t96+(8.963083509889702d-3*t12*t90+8.9630835098897 10811 5 02d-3*t103*t49)*t94*t95+(-3.71047939933999d-5*gammabb*t1* 10812 6 t12*t50*t91+5.041016444533138d-3*t12*t50*t91-3.7104793993 10813 7 3999d-5*gammabb*t1*t103*t50*t63+5.041016444533138d-3*t103 10814 8 *t50*t63)*t95+t101*(-1.4938472516482837d-3*t1*t12*t49*t94 10815 9 -8.401694074221898d-4*t1*t12*t50*t63)+t104*(-1.9264558001 10816 : 493193d-2*t64*t92-1.9264558001493193d-2*t105*t76)*t94+t1* 10817 ; (7.224209250559948d-3*t105*t92+3.612104625279974d-3*t126* 10818 < t76+3.612104625279974d-3*t113*t64)*t94+3.5318356336070855 10819 = d-2*t125*t64*t76*t94-8.963083509889707d-3*t118*t12*t49*t9 10820 > 4+t104*(3.9875086248532843d-5*gammabb*t1*t50*t64*t93-1.08 10821 ? 34770598202839d-2*t50*t64*t93+3.9875086248532843d-5*gamma 10822 @ bb*t1*t105*t50*t88-1.0834770598202839d-2*t105*t50*t88)+t1 10823 1 *(4.063038974326065d-3*t105*t50*t93+2.0315194871630324d-3 10824 2 *t126*t50*t88+2.0315194871630324d-3*t114*t50*t64)+1.95669 10825 3 1177927563d-7*t115*t158*t50*t64*t88+1.9863746096705204d-2 10826 4 *t125*t50*t64*t88-1.7943788811839778d-4*gammabb*t124*t50* 10827 5 t64*t88+3.1106960746234286d-6*t115*t148*t158*t64*t76-7.78 10828 6 9432730727747d-4*gammabb*t116*t124*t64*t76-1.820751499148 10829 7 8338d-7*t115*t12*t157*t50*t63-5.041016444533138d-3*t118*t 10830 8 12*t50*t63+1.1749851431243302d-4*gammabb*t117*t12*t50*t63 10831 9 -2.8945827553972214d-6*t115*t12*t148*t157*t49+5.100632774 10832 : 908971d-4*gammabb*t116*t117*t12*t49-8.985334888756153d-3* 10833 ; t116*t130*t133-8.985334888756153d-3*t116*t127*t132)*wght+ 10834 < Cmat3(iq,D3_RB_RB_GBB) 10835 Cmat3(iq,D3_RB_GBB_GBB) = 1.0d+0*((6.957148873762482d-6*t1*t 10836 1 12*t50*t91+6.957148873762482d-6*t1*t103*t50*t63)*t96+t1*( 10837 2 -7.476578671599909d-6*t1*t50*t64*t93-7.476578671599909d-6 10838 3 *t1*t105*t50*t88)-7.337591917228362d-8*gammabb*t160*t50*t 10839 4 64*t88+3.9875086248532843d-5*t133*t50*t64*t88-1.166511027 10840 5 9837858d-6*gammabb*t148*t160*t64*t76+1.7309850512728328d- 10841 6 4*t116*t133*t64*t76+6.827818121808127d-8*gammabb*t12*t159 10842 7 *t50*t63-2.7828595495049924d-5*t12*t132*t50*t63+1.0854685 10843 8 332739583d-6*gammabb*t12*t148*t159*t49-1.2080446045837034 10844 9 d-4*t116*t12*t132*t49-8.985334888756153d-3*t116*t135*t137 10845 : -8.985334888756153d-3*t116*t134*t136)*wght+Cmat3(iq,D3_RB 10846 ; _GBB_GBB) 10847 Cmat3(iq,D3_GBB_GBB_GBB) = 1.0d+0*(2.751596968960636d-8*t162 10848 1 *t50*t64*t88+4.374416354939197d-7*t148*t162*t64*t76-2.560 10849 2 431795678048d-8*t12*t161*t50*t63-4.070506999777343d-7*t12 10850 3 *t148*t161*t49)*wght+Cmat3(iq,D3_GBB_GBB_GBB) 10851 Mmat3(iq,D3_RB_RB_TA) = Mmat3(iq,D3_RB_RB_TA) 10852 Mmat3(iq,D3_RB_RB_TB) = 1.0d+0*((1.7926167019779404d-2*gamma 10853 1 bb*t12*t138+1.7926167019779404d-2*gammabb*t103*t106)*t94* 10854 2 t95+(1.0082032889066277d-2*gammabb*t12*t139*t50+1.0082032 10855 3 889066277d-2*gammabb*t103*t107*t50)*t95+t104*(-1.92645580 10856 4 01493193d-2*gammabb*t140*t64-1.9264558001493193d-2*gammab 10857 5 b*t105*t108)*t94+3.5318356336070855d-2*gammabb*t108*t125* 10858 6 t64*t94-8.963083509889707d-3*gammabb*t106*t118*t12*t94+t5 10859 7 1*t64*(-4.5701787287977763d+5*t24*t4*t79*t89+2.2282577153 10860 8 689576d+3*t21*t6*t78*t89+5.077976365330863d+5*t24*t4*t78* 10861 9 t89+5.585774001863949d+5*t24*t4*t77*t89+4.051377664307196 10862 : 4d+1*t16*t43*t6*t87+9.232684300601569d+2*t4*t43*t87-2.769 10863 ; 805290180471d+3*t16*t4*t40*t87-4.0513776643071964d+1*t46* 10864 < t6*t86+1.2154132992921589d+2*t40*t45*t6*t86-1.10792211607 10865 = 21883d+4*t37*t4*t45*t86+1.846536860120314d+3*t4*t43*t86+5 10866 > .539610580360942d+3*t16*t4*t40*t86-1.2154132992921589d+2* 10867 ? t16*t43*t6*t85+2.4308265985843178d+2*t37*t42*t6*t85+1.661 10868 @ 8831741082832d+4*t37*t4*t45*t85-2.769805290180471d+3*t4*t 10869 1 43*t85-2.769805290180471d+4*t34*t4*t42*t85+8.309415870541 10870 2 416d+3*t16*t4*t40*t85-2.4308265985843178d+2*t40*t45*t6*t8 10871 3 4+4.0513776643071964d+2*t34*t39*t6*t84+2.2158442321443766 10872 4 d+4*t37*t4*t45*t84+3.693073720240629d+4*t34*t4*t42*t84-1. 10873 5 1079221160721883d+4*t16*t4*t40*t84-5.539610580360941d+4*t 10874 6 31*t39*t4*t84-4.051377664307196d+2*t37*t42*t6*t83+6.07706 10875 7 6496460793d+2*t31*t36*t6*t83-2.7698052901804704d+4*t37*t4 10876 8 *t45*t83+4.616342150300784d+4*t34*t4*t42*t83+6.9245132254 10877 9 51174d+4*t31*t39*t4*t83-9.694318515631648d+4*t28*t36*t4*t 10878 : 83-6.077066496460795d+2*t34*t39*t6*t82+8.507893095045113d 10879 ; +2*t28*t33*t6*t82-5.539610580360942d+4*t34*t4*t42*t82+8.3 10880 < 09415870541416d+4*t31*t39*t4*t82+1.1633182218757979d+5*t2 10881 = 8*t36*t4*t82-1.5510909625010638d+5*t25*t33*t4*t82-8.50789 10882 > 3095045111d+2*t31*t36*t6*t81+1.1343857460060149d+3*t25*t3 10883 ? 0*t6*t81-9.694318515631648d+4*t31*t39*t4*t81+1.3572045921 10884 @ 884307d+5*t28*t36*t4*t81+1.809606122917908d+5*t25*t33*t4* 10885 1 t81-2.3266364437515955d+5*t22*t30*t4*t81-1.13438574600601 10886 2 49d+3*t28*t33*t6*t80+1.4584959591505908d+3*t22*t27*t6*t80 10887 3 -1.5510909625010635d+5*t28*t36*t4*t80+2.0681212833347515d 10888 4 +5*t25*t33*t4*t80+2.659013078573252d+5*t22*t30*t4*t80-3.3 10889 5 23766348216565d+5*t19*t27*t4*t80-1.4584959591505905d+3*t2 10890 6 5*t30*t6*t79+1.8231199489382383d+3*t19*t24*t6*t79-2.32663 10891 7 64437515952d+5*t25*t33*t4*t79+2.9913897133949086d+5*t22*t 10892 8 30*t4*t79+3.7392371417436354d+5*t19*t27*t4*t79-1.82311994 10893 9 89382383d+3*t22*t27*t6*t78-3.3237663482165647d+5*t22*t30* 10894 : t4*t78+4.1547079352707056d+5*t19*t27*t4*t78-6.09357163839 10895 ; 7035d+5*t110*t21*t4*t78-2.228257715368958d+3*t19*t24*t6*t 10896 < 77+2.6739092584427493d+3*t110*t17*t6*t77-4.57017872879777 10897 = 63d+5*t19*t27*t4*t77+6.702928802236738d+5*t110*t21*t4*t77 10898 > -7.921643129916147d+5*t146*t17*t4*t77)+t3*t64*(-4.5701787 10899 ? 287977763d+5*t24*t4*t67*t89+2.2282577153689576d+3*t21*t6* 10900 @ t66*t89+5.077976365330863d+5*t24*t4*t66*t89+5.58577400186 10901 1 3949d+5*t24*t4*t65*t89+4.0513776643071964d+1*t16*t43*t6*t 10902 2 75+9.232684300601569d+2*t4*t43*t75-2.769805290180471d+3*t 10903 3 16*t4*t40*t75-4.0513776643071964d+1*t46*t6*t74+1.21541329 10904 4 92921589d+2*t40*t45*t6*t74-1.1079221160721883d+4*t37*t4*t 10905 5 45*t74+1.846536860120314d+3*t4*t43*t74+5.539610580360942d 10906 6 +3*t16*t4*t40*t74-1.2154132992921589d+2*t16*t43*t6*t73+2. 10907 7 4308265985843178d+2*t37*t42*t6*t73+1.6618831741082832d+4* 10908 8 t37*t4*t45*t73-2.769805290180471d+3*t4*t43*t73-2.76980529 10909 9 0180471d+4*t34*t4*t42*t73+8.309415870541416d+3*t16*t4*t40 10910 : *t73-2.4308265985843178d+2*t40*t45*t6*t72+4.0513776643071 10911 ; 964d+2*t34*t39*t6*t72+2.2158442321443766d+4*t37*t4*t45*t7 10912 < 2+3.693073720240629d+4*t34*t4*t42*t72-1.1079221160721883d 10913 = +4*t16*t4*t40*t72-5.539610580360941d+4*t31*t39*t4*t72-4.0 10914 > 51377664307196d+2*t37*t42*t6*t71+6.077066496460793d+2*t31 10915 ? *t36*t6*t71-2.7698052901804704d+4*t37*t4*t45*t71+4.616342 10916 @ 150300784d+4*t34*t4*t42*t71+6.924513225451174d+4*t31*t39* 10917 1 t4*t71-9.694318515631648d+4*t28*t36*t4*t71-6.077066496460 10918 2 795d+2*t34*t39*t6*t70+8.507893095045113d+2*t28*t33*t6*t70 10919 3 -5.539610580360942d+4*t34*t4*t42*t70+8.309415870541416d+4 10920 4 *t31*t39*t4*t70+1.1633182218757979d+5*t28*t36*t4*t70-1.55 10921 5 10909625010638d+5*t25*t33*t4*t70-8.507893095045111d+2*t31 10922 6 *t36*t6*t69+1.1343857460060149d+3*t25*t30*t6*t69-9.694318 10923 7 515631648d+4*t31*t39*t4*t69+1.3572045921884307d+5*t28*t36 10924 8 *t4*t69+1.809606122917908d+5*t25*t33*t4*t69-2.32663644375 10925 9 15955d+5*t22*t30*t4*t69-1.1343857460060149d+3*t28*t33*t6* 10926 : t68+1.4584959591505908d+3*t22*t27*t6*t68-1.55109096250106 10927 ; 35d+5*t28*t36*t4*t68+2.0681212833347515d+5*t25*t33*t4*t68 10928 < +2.659013078573252d+5*t22*t30*t4*t68-3.323766348216565d+5 10929 = *t19*t27*t4*t68-1.4584959591505905d+3*t25*t30*t6*t67+1.82 10930 > 31199489382383d+3*t19*t24*t6*t67-2.3266364437515952d+5*t2 10931 ? 5*t33*t4*t67+2.9913897133949086d+5*t22*t30*t4*t67+3.73923 10932 @ 71417436354d+5*t19*t27*t4*t67-1.8231199489382383d+3*t22*t 10933 1 27*t6*t66-3.3237663482165647d+5*t22*t30*t4*t66+4.15470793 10934 2 52707056d+5*t19*t27*t4*t66-6.093571638397035d+5*t110*t21* 10935 3 t4*t66-2.228257715368958d+3*t19*t24*t6*t65+2.673909258442 10936 4 7493d+3*t110*t17*t6*t65-4.5701787287977763d+5*t19*t27*t4* 10937 5 t65+6.702928802236738d+5*t110*t21*t4*t65-7.92164312991614 10938 6 7d+5*t146*t17*t4*t65)-9.305257363491002d-1*t12*t4*t51*(2. 10939 7 2282577153689576d+3*t21*t53*t6*t89-4.5701787287977763d+5* 10940 8 t24*t4*t54*t89+5.077976365330863d+5*t24*t4*t53*t89+5.5857 10941 9 74001863949d+5*t24*t4*t52*t89+4.0513776643071964d+1*t16*t 10942 : 43*t6*t62+9.232684300601569d+2*t4*t43*t62-2.7698052901804 10943 ; 71d+3*t16*t4*t40*t62-4.0513776643071964d+1*t46*t6*t61+1.2 10944 < 154132992921589d+2*t40*t45*t6*t61-1.1079221160721883d+4*t 10945 = 37*t4*t45*t61+1.846536860120314d+3*t4*t43*t61+5.539610580 10946 > 360942d+3*t16*t4*t40*t61-1.2154132992921589d+2*t16*t43*t6 10947 ? *t60+2.4308265985843178d+2*t37*t42*t6*t60+1.6618831741082 10948 @ 832d+4*t37*t4*t45*t60-2.769805290180471d+3*t4*t43*t60-2.7 10949 1 69805290180471d+4*t34*t4*t42*t60+8.309415870541416d+3*t16 10950 2 *t4*t40*t60-2.4308265985843178d+2*t40*t45*t59*t6+4.051377 10951 3 6643071964d+2*t34*t39*t59*t6-4.051377664307196d+2*t37*t42 10952 4 *t58*t6+6.077066496460793d+2*t31*t36*t58*t6-6.07706649646 10953 5 0795d+2*t34*t39*t57*t6+8.507893095045113d+2*t28*t33*t57*t 10954 6 6-8.507893095045111d+2*t31*t36*t56*t6+1.1343857460060149d 10955 7 +3*t25*t30*t56*t6-1.1343857460060149d+3*t28*t33*t55*t6+1. 10956 8 4584959591505908d+3*t22*t27*t55*t6-1.4584959591505905d+3* 10957 9 t25*t30*t54*t6+1.8231199489382383d+3*t19*t24*t54*t6-1.823 10958 : 1199489382383d+3*t22*t27*t53*t6-2.228257715368958d+3*t19* 10959 ; t24*t52*t6+2.6739092584427493d+3*t110*t17*t52*t6+2.215844 10960 < 2321443766d+4*t37*t4*t45*t59+3.693073720240629d+4*t34*t4* 10961 = t42*t59-1.1079221160721883d+4*t16*t4*t40*t59-5.5396105803 10962 > 60941d+4*t31*t39*t4*t59-2.7698052901804704d+4*t37*t4*t45* 10963 ? t58+4.616342150300784d+4*t34*t4*t42*t58+6.924513225451174 10964 @ d+4*t31*t39*t4*t58-9.694318515631648d+4*t28*t36*t4*t58-5. 10965 1 539610580360942d+4*t34*t4*t42*t57+8.309415870541416d+4*t3 10966 2 1*t39*t4*t57+1.1633182218757979d+5*t28*t36*t4*t57-1.55109 10967 3 09625010638d+5*t25*t33*t4*t57-9.694318515631648d+4*t31*t3 10968 4 9*t4*t56+1.3572045921884307d+5*t28*t36*t4*t56+1.809606122 10969 5 917908d+5*t25*t33*t4*t56-2.3266364437515955d+5*t22*t30*t4 10970 6 *t56-1.5510909625010635d+5*t28*t36*t4*t55+2.0681212833347 10971 7 515d+5*t25*t33*t4*t55+2.659013078573252d+5*t22*t30*t4*t55 10972 8 -3.323766348216565d+5*t19*t27*t4*t55-2.3266364437515952d+ 10973 9 5*t25*t33*t4*t54+2.9913897133949086d+5*t22*t30*t4*t54+3.7 10974 : 392371417436354d+5*t19*t27*t4*t54-3.3237663482165647d+5*t 10975 ; 22*t30*t4*t53+4.1547079352707056d+5*t19*t27*t4*t53-6.0935 10976 < 71638397035d+5*t110*t21*t4*t53-4.5701787287977763d+5*t19* 10977 = t27*t4*t52+6.702928802236738d+5*t110*t21*t4*t52-7.9216431 10978 > 29916147d+5*t146*t17*t4*t52)-9.305257363491002d-1*t12*t3* 10979 ? t4*(2.2282577153689576d+3*t20*t21*t6*t89-4.57017872879777 10980 @ 63d+5*t23*t24*t4*t89+5.077976365330863d+5*t20*t24*t4*t89+ 10981 1 5.585774001863949d+5*t13*t24*t4*t89+4.0513776643071964d+1 10982 2 *t16*t43*t47*t6-4.0513776643071964d+1*t44*t46*t6+1.215413 10983 3 2992921589d+2*t40*t44*t45*t6-2.4308265985843178d+2*t38*t4 10984 4 0*t45*t6-1.2154132992921589d+2*t16*t41*t43*t6+2.430826598 10985 5 5843178d+2*t37*t41*t42*t6-4.051377664307196d+2*t35*t37*t4 10986 6 2*t6+4.0513776643071964d+2*t34*t38*t39*t6-6.0770664964607 10987 7 95d+2*t32*t34*t39*t6+6.077066496460793d+2*t31*t35*t36*t6- 10988 8 8.507893095045111d+2*t29*t31*t36*t6+8.507893095045113d+2* 10989 9 t28*t32*t33*t6-1.1343857460060149d+3*t26*t28*t33*t6+1.134 10990 : 3857460060149d+3*t25*t29*t30*t6-1.4584959591505905d+3*t23 10991 ; *t25*t30*t6+1.4584959591505908d+3*t22*t26*t27*t6-1.823119 10992 < 9489382383d+3*t20*t22*t27*t6+1.8231199489382383d+3*t19*t2 10993 = 3*t24*t6-2.228257715368958d+3*t13*t19*t24*t6+2.6739092584 10994 > 427493d+3*t110*t13*t17*t6+9.232684300601569d+2*t4*t43*t47 10995 ? -2.769805290180471d+3*t16*t4*t40*t47-1.1079221160721883d+ 10996 @ 4*t37*t4*t44*t45+1.6618831741082832d+4*t37*t4*t41*t45+2.2 10997 1 158442321443766d+4*t37*t38*t4*t45-2.7698052901804704d+4*t 10998 2 35*t37*t4*t45+1.846536860120314d+3*t4*t43*t44+5.539610580 10999 3 360942d+3*t16*t4*t40*t44-2.769805290180471d+3*t4*t41*t43- 11000 4 2.769805290180471d+4*t34*t4*t41*t42+3.693073720240629d+4* 11001 5 t34*t38*t4*t42+4.616342150300784d+4*t34*t35*t4*t42-5.5396 11002 6 10580360942d+4*t32*t34*t4*t42+8.309415870541416d+3*t16*t4 11003 7 *t40*t41-1.1079221160721883d+4*t16*t38*t4*t40-5.539610580 11004 8 360941d+4*t31*t38*t39*t4+6.924513225451174d+4*t31*t35*t39 11005 9 *t4+8.309415870541416d+4*t31*t32*t39*t4-9.694318515631648 11006 : d+4*t29*t31*t39*t4-9.694318515631648d+4*t28*t35*t36*t4+1. 11007 ; 1633182218757979d+5*t28*t32*t36*t4+1.3572045921884307d+5* 11008 < t28*t29*t36*t4-1.5510909625010635d+5*t26*t28*t36*t4-1.551 11009 = 0909625010638d+5*t25*t32*t33*t4+1.809606122917908d+5*t25* 11010 > t29*t33*t4+2.0681212833347515d+5*t25*t26*t33*t4-2.3266364 11011 ? 437515952d+5*t23*t25*t33*t4-2.3266364437515955d+5*t22*t29 11012 @ *t30*t4+2.659013078573252d+5*t22*t26*t30*t4+2.99138971339 11013 1 49086d+5*t22*t23*t30*t4-3.3237663482165647d+5*t20*t22*t30 11014 2 *t4-3.323766348216565d+5*t19*t26*t27*t4+3.739237141743635 11015 3 4d+5*t19*t23*t27*t4+4.1547079352707056d+5*t19*t20*t27*t4- 11016 4 4.5701787287977763d+5*t13*t19*t27*t4-6.093571638397035d+5 11017 5 *t110*t20*t21*t4+6.702928802236738d+5*t110*t13*t21*t4-7.9 11018 6 21643129916147d+5*t13*t146*t17*t4)+t104*(-1.0834770598202 11019 7 839d-2*gammabb*t141*t50*t64-1.0834770598202839d-2*gammabb 11020 8 *t105*t109*t50)+1.9863746096705204d-2*gammabb*t109*t125*t 11021 9 50*t64-5.316678166471045d-5*t109*t115*t124*t50*t64-2.3079 11022 : 800683637772d-4*t108*t115*t116*t124*t64+t101*(-4.13566993 11023 ; 9329334d-1*t107*t12*t51-4.135669939329334d-1*t106*t12*t3) 11024 < -2.4814019635976003d+0*t12*t139*t5*t51-2.4814019635976003 11025 = d+0*t103*t107*t5*t51-1.8610514726982003d+0*t103*t139*t4*t 11026 > 51-9.305257363491002d-1*t107*t123*t4*t51+2*t105*t141*t51+ 11027 ? t109*t126*t51-5.041016444533138d-3*gammabb*t107*t118*t12* 11028 @ t50+4.947305865786653d-5*t107*t115*t117*t12*t50-2.4814019 11029 1 635976003d+0*t12*t138*t3*t5-2.4814019635976003d+0*t103*t1 11030 2 06*t3*t5-1.8610514726982003d+0*t103*t138*t3*t4-9.30525736 11031 3 3491002d-1*t106*t123*t3*t4+2*t105*t140*t3+t108*t126*t3+2. 11032 4 1476348525932504d-4*t106*t115*t116*t117*t12)*wght+Mmat3(i 11033 5 q,D3_RB_RB_TB) 11034 Mmat3(iq,D3_RB_GBB_TA) = Mmat3(iq,D3_RB_GBB_TA) 11035 Mmat3(iq,D3_RB_GBB_TB) = 1.0d+0*((-3.361156316208638d-3*t12* 11036 1 t138-3.361156316208638d-3*t103*t106)*t94*t96+(-1.89038116 11037 2 6699927d-3*t12*t139*t50-1.890381166699927d-3*t103*t107*t5 11038 3 0)*t96+4.481541754944851d-3*t106*t12*t94*t95+2.5205082222 11039 4 66569d-3*t107*t12*t50*t95+t1*(3.612104625279974d-3*t140*t 11040 5 64+3.612104625279974d-3*t105*t108)*t94-9.632279000746596d 11041 6 -3*t104*t108*t64*t94+t1*(2.0315194871630324d-3*t141*t50*t 11042 7 64+2.0315194871630324d-3*t105*t109*t50)+1.993754312426642 11043 8 1d-5*gammabb*t109*t133*t50*t64-5.417385299101419d-3*t104* 11044 9 t109*t50*t64+8.654925256364164d-5*gammabb*t108*t116*t133* 11045 : t64-1.855239699669995d-5*gammabb*t107*t12*t132*t50-8.0536 11046 ; 3069722469d-5*gammabb*t106*t116*t12*t132)*wght+Mmat3(iq,D 11047 < 3_RB_GBB_TB) 11048 Mmat3(iq,D3_GBB_GBB_TA) = Mmat3(iq,D3_GBB_GBB_TA) 11049 Mmat3(iq,D3_GBB_GBB_TB) = 1.0d+0*(-7.476578671599909d-6*t109 11050 1 *t137*t50*t64-3.245596971136562d-5*t108*t116*t137*t64+6.9 11051 2 57148873762482d-6*t107*t12*t136*t50+3.020111511459258d-5* 11052 3 t106*t116*t12*t136)*wght+Mmat3(iq,D3_GBB_GBB_TB) 11053 Mmat3(iq,D3_RB_TA_TA) = Mmat3(iq,D3_RB_TA_TA) 11054 Mmat3(iq,D3_RB_TA_TB) = Mmat3(iq,D3_RB_TA_TB) 11055 Mmat3(iq,D3_RB_TB_TB) = 1.0d+0*(8.963083509889702d-3*gammabb 11056 1 *t12*t142*t94*t95+5.041016444533138d-3*gammabb*t12*t143*t 11057 2 50*t95-9.632279000746596d-3*gammabb*t104*t144*t64*t94+t51 11058 3 *t64*(-6.016295831496187d+4*t24*t79*t89*t9-6.684773146106 11059 4 873d+4*t24*t78*t89*t9+7.353250460717561d+4*t24*t77*t89*t9 11060 5 -1.2154132992921589d+2*t43*t87*t9-3.646239897876477d+2*t1 11061 6 6*t40*t87*t9-1.4584959591505908d+3*t37*t45*t86*t9+2.43082 11062 7 65985843178d+2*t43*t86*t9-7.292479795752954d+2*t16*t40*t8 11063 8 6*t9-2.1877439387258865d+3*t37*t45*t85*t9+3.6462398978764 11064 9 77d+2*t43*t85*t9-3.646239897876477d+3*t34*t42*t85*t9+1.09 11065 : 38719693629433d+3*t16*t40*t85*t9+2.9169919183011817d+3*t3 11066 ; 7*t45*t84*t9-4.8616531971686355d+3*t34*t42*t84*t9+1.45849 11067 < 59591505908d+3*t16*t40*t84*t9-7.292479795752954d+3*t31*t3 11068 = 9*t84*t9+3.646239897876477d+3*t37*t45*t83*t9+6.0770664964 11069 > 60795d+3*t34*t42*t83*t9-9.115599744691192d+3*t31*t39*t83* 11070 ? t9-1.2761839642567668d+4*t28*t36*t83*t9+7.292479795752954 11071 @ d+3*t34*t42*t82*t9+1.0938719693629431d+4*t31*t39*t82*t9-1 11072 1 .5314207571081204d+4*t28*t36*t82*t9-2.0418943428108272d+4 11073 2 *t25*t33*t82*t9+1.2761839642567668d+4*t31*t39*t81*t9+1.78 11074 3 6657549959474d+4*t28*t36*t81*t9-2.3822100666126317d+4*t25 11075 4 *t33*t81*t9-3.062841514216241d+4*t22*t30*t81*t9+2.0418943 11076 5 428108272d+4*t28*t36*t80*t9+2.722525790414436d+4*t25*t33* 11077 6 t80*t9-3.5003903019614174d+4*t22*t30*t80*t9-4.37548787745 11078 7 1772d+4*t19*t27*t80*t9+3.062841514216241d+4*t25*t33*t79*t 11079 8 9+3.9379390897065947d+4*t22*t30*t79*t9-4.9224238621332433 11080 9 d+4*t19*t27*t79*t9+4.375487877451772d+4*t22*t30*t78*t9+5. 11081 : 469359846814714d+4*t19*t27*t78*t9-8.021727775328248d+4*t1 11082 ; 10*t21*t78*t9+6.016295831496187d+4*t19*t27*t77*t9-8.82390 11083 < 0552861074d+4*t110*t21*t77*t9-1.0428246107926724d+5*t146* 11084 = t17*t77*t9)+t3*t64*(-6.016295831496187d+4*t24*t67*t89*t9- 11085 > 6.684773146106873d+4*t24*t66*t89*t9+7.353250460717561d+4* 11086 ? t24*t65*t89*t9-1.2154132992921589d+2*t43*t75*t9-3.6462398 11087 @ 97876477d+2*t16*t40*t75*t9-1.4584959591505908d+3*t37*t45* 11088 1 t74*t9+2.4308265985843178d+2*t43*t74*t9-7.292479795752954 11089 2 d+2*t16*t40*t74*t9-2.1877439387258865d+3*t37*t45*t73*t9+3 11090 3 .646239897876477d+2*t43*t73*t9-3.646239897876477d+3*t34*t 11091 4 42*t73*t9+1.0938719693629433d+3*t16*t40*t73*t9+2.91699191 11092 5 83011817d+3*t37*t45*t72*t9-4.8616531971686355d+3*t34*t42* 11093 6 t72*t9+1.4584959591505908d+3*t16*t40*t72*t9-7.29247979575 11094 7 2954d+3*t31*t39*t72*t9+3.646239897876477d+3*t37*t45*t71*t 11095 8 9+6.077066496460795d+3*t34*t42*t71*t9-9.115599744691192d+ 11096 9 3*t31*t39*t71*t9-1.2761839642567668d+4*t28*t36*t71*t9+7.2 11097 : 92479795752954d+3*t34*t42*t70*t9+1.0938719693629431d+4*t3 11098 ; 1*t39*t70*t9-1.5314207571081204d+4*t28*t36*t70*t9-2.04189 11099 < 43428108272d+4*t25*t33*t70*t9+1.2761839642567668d+4*t31*t 11100 = 39*t69*t9+1.786657549959474d+4*t28*t36*t69*t9-2.382210066 11101 > 6126317d+4*t25*t33*t69*t9-3.062841514216241d+4*t22*t30*t6 11102 ? 9*t9+2.0418943428108272d+4*t28*t36*t68*t9+2.7225257904144 11103 @ 36d+4*t25*t33*t68*t9-3.5003903019614174d+4*t22*t30*t68*t9 11104 1 -4.375487877451772d+4*t19*t27*t68*t9+3.062841514216241d+4 11105 2 *t25*t33*t67*t9+3.9379390897065947d+4*t22*t30*t67*t9-4.92 11106 3 24238621332433d+4*t19*t27*t67*t9+4.375487877451772d+4*t22 11107 4 *t30*t66*t9+5.469359846814714d+4*t19*t27*t66*t9-8.0217277 11108 5 75328248d+4*t110*t21*t66*t9+6.016295831496187d+4*t19*t27* 11109 6 t65*t9-8.823900552861074d+4*t110*t21*t65*t9-1.04282461079 11110 7 26724d+5*t146*t17*t65*t9)-9.305257363491002d-1*t12*t4*t51 11111 8 *(-6.016295831496187d+4*t24*t54*t89*t9-6.684773146106873d 11112 9 +4*t24*t53*t89*t9+7.353250460717561d+4*t24*t52*t89*t9-1.2 11113 : 154132992921589d+2*t43*t62*t9-3.646239897876477d+2*t16*t4 11114 ; 0*t62*t9-1.4584959591505908d+3*t37*t45*t61*t9+2.430826598 11115 < 5843178d+2*t43*t61*t9-7.292479795752954d+2*t16*t40*t61*t9 11116 = -2.1877439387258865d+3*t37*t45*t60*t9+3.646239897876477d+ 11117 > 2*t43*t60*t9-3.646239897876477d+3*t34*t42*t60*t9+1.093871 11118 ? 9693629433d+3*t16*t40*t60*t9+2.9169919183011817d+3*t37*t4 11119 @ 5*t59*t9-4.8616531971686355d+3*t34*t42*t59*t9+1.458495959 11120 1 1505908d+3*t16*t40*t59*t9-7.292479795752954d+3*t31*t39*t5 11121 2 9*t9+3.646239897876477d+3*t37*t45*t58*t9+6.07706649646079 11122 3 5d+3*t34*t42*t58*t9-9.115599744691192d+3*t31*t39*t58*t9-1 11123 4 .2761839642567668d+4*t28*t36*t58*t9+7.292479795752954d+3* 11124 5 t34*t42*t57*t9+1.0938719693629431d+4*t31*t39*t57*t9-1.531 11125 6 4207571081204d+4*t28*t36*t57*t9-2.0418943428108272d+4*t25 11126 7 *t33*t57*t9+1.2761839642567668d+4*t31*t39*t56*t9+1.786657 11127 8 549959474d+4*t28*t36*t56*t9-2.3822100666126317d+4*t25*t33 11128 9 *t56*t9-3.062841514216241d+4*t22*t30*t56*t9+2.04189434281 11129 : 08272d+4*t28*t36*t55*t9+2.722525790414436d+4*t25*t33*t55* 11130 ; t9-3.5003903019614174d+4*t22*t30*t55*t9-4.375487877451772 11131 < d+4*t19*t27*t55*t9+3.062841514216241d+4*t25*t33*t54*t9+3. 11132 = 9379390897065947d+4*t22*t30*t54*t9-4.9224238621332433d+4* 11133 > t19*t27*t54*t9+4.375487877451772d+4*t22*t30*t53*t9+5.4693 11134 ? 59846814714d+4*t19*t27*t53*t9-8.021727775328248d+4*t110*t 11135 @ 21*t53*t9+6.016295831496187d+4*t19*t27*t52*t9-8.823900552 11136 1 861074d+4*t110*t21*t52*t9-1.0428246107926724d+5*t146*t17* 11137 2 t52*t9)-9.305257363491002d-1*t12*t3*t4*(-6.01629583149618 11138 3 7d+4*t23*t24*t89*t9-6.684773146106873d+4*t20*t24*t89*t9+7 11139 4 .353250460717561d+4*t13*t24*t89*t9-1.2154132992921589d+2* 11140 5 t43*t47*t9-3.646239897876477d+2*t16*t40*t47*t9-1.45849595 11141 6 91505908d+3*t37*t44*t45*t9-2.1877439387258865d+3*t37*t41* 11142 7 t45*t9+2.9169919183011817d+3*t37*t38*t45*t9+3.64623989787 11143 8 6477d+3*t35*t37*t45*t9+2.4308265985843178d+2*t43*t44*t9-7 11144 9 .292479795752954d+2*t16*t40*t44*t9+3.646239897876477d+2*t 11145 : 41*t43*t9-3.646239897876477d+3*t34*t41*t42*t9-4.861653197 11146 ; 1686355d+3*t34*t38*t42*t9+6.077066496460795d+3*t34*t35*t4 11147 < 2*t9+7.292479795752954d+3*t32*t34*t42*t9+1.09387196936294 11148 = 33d+3*t16*t40*t41*t9+1.4584959591505908d+3*t16*t38*t40*t9 11149 > -7.292479795752954d+3*t31*t38*t39*t9-9.115599744691192d+3 11150 ? *t31*t35*t39*t9+1.0938719693629431d+4*t31*t32*t39*t9+1.27 11151 @ 61839642567668d+4*t29*t31*t39*t9-1.2761839642567668d+4*t2 11152 1 8*t35*t36*t9-1.5314207571081204d+4*t28*t32*t36*t9+1.78665 11153 2 7549959474d+4*t28*t29*t36*t9+2.0418943428108272d+4*t26*t2 11154 3 8*t36*t9-2.0418943428108272d+4*t25*t32*t33*t9-2.382210066 11155 4 6126317d+4*t25*t29*t33*t9+2.722525790414436d+4*t25*t26*t3 11156 5 3*t9+3.062841514216241d+4*t23*t25*t33*t9-3.06284151421624 11157 6 1d+4*t22*t29*t30*t9-3.5003903019614174d+4*t22*t26*t30*t9+ 11158 7 3.9379390897065947d+4*t22*t23*t30*t9+4.375487877451772d+4 11159 8 *t20*t22*t30*t9-4.375487877451772d+4*t19*t26*t27*t9-4.922 11160 9 4238621332433d+4*t19*t23*t27*t9+5.469359846814714d+4*t19* 11161 : t20*t27*t9+6.016295831496187d+4*t13*t19*t27*t9-8.02172777 11162 ; 5328248d+4*t110*t20*t21*t9-8.823900552861074d+4*t110*t13* 11163 < t21*t9-1.0428246107926724d+5*t13*t146*t17*t9)-5.417385299 11164 = 101419d-3*gammabb*t104*t145*t50*t64-1.2407009817988002d+0 11165 > *t12*t143*t5*t51-9.305257363491002d-1*t103*t143*t4*t51+t1 11166 ? 05*t145*t51-1.2407009817988002d+0*t12*t142*t3*t5-9.305257 11167 @ 363491002d-1*t103*t142*t3*t4+t105*t144*t3)*wght+Mmat3(iq, 11168 1 D3_RB_TB_TB) 11169 Mmat3(iq,D3_GBB_TA_TA) = Mmat3(iq,D3_GBB_TA_TA) 11170 Mmat3(iq,D3_GBB_TA_TB) = Mmat3(iq,D3_GBB_TA_TB) 11171 Mmat3(iq,D3_GBB_TB_TB) = 1.0d+0*(-3.361156316208638d-3*t12*t 11172 1 142*t94*t96-1.890381166699927d-3*t12*t143*t50*t96+3.61210 11173 2 4625279974d-3*t1*t144*t64*t94+2.0315194871630324d-3*t1*t1 11174 3 45*t50*t64)*wght+Mmat3(iq,D3_GBB_TB_TB) 11175 Mmat3(iq,D3_TA_TA_TA) = Mmat3(iq,D3_TA_TA_TA) 11176 Mmat3(iq,D3_TA_TA_TB) = Mmat3(iq,D3_TA_TA_TB) 11177 Mmat3(iq,D3_TA_TB_TB) = Mmat3(iq,D3_TA_TB_TB) 11178 Mmat3(iq,D3_TB_TB_TB) = 1.0d+0*(t51*t64*(-7.92d+3*t24*t79*t8 11179 1 9-2.64d+4*t24*t78*t89-2.904d+4*t24*t77*t89-4.8d+1*t43*t87 11180 2 -4.8d+1*t16*t40*t87-1.92d+2*t37*t45*t86-9.6d+1*t43*t86-2. 11181 3 88d+2*t16*t40*t86-8.64d+2*t37*t45*t85-4.8d+1*t43*t85-4.8d 11182 4 +2*t34*t42*t85-4.32d+2*t16*t40*t85-1.152d+3*t37*t45*t84-1 11183 5 .92d+3*t34*t42*t84-1.92d+2*t16*t40*t84-9.6d+2*t31*t39*t84 11184 6 -4.8d+2*t37*t45*t83-2.4d+3*t34*t42*t83-3.6d+3*t31*t39*t83 11185 7 -1.68d+3*t28*t36*t83-9.6d+2*t34*t42*t82-4.32d+3*t31*t39*t 11186 8 82-6.048d+3*t28*t36*t82-2.688d+3*t25*t33*t82-1.68d+3*t31* 11187 9 t39*t81-7.056d+3*t28*t36*t81-9.408d+3*t25*t33*t81-4.032d+ 11188 : 3*t22*t30*t81-2.688d+3*t28*t36*t80-1.0752d+4*t25*t33*t80- 11189 ; 1.3824d+4*t22*t30*t80-5.76d+3*t19*t27*t80-4.032d+3*t25*t3 11190 < 3*t79-1.5552d+4*t22*t30*t79-1.944d+4*t19*t27*t79-5.76d+3* 11191 = t22*t30*t78-2.16d+4*t19*t27*t78-1.056d+4*t110*t21*t78-7.9 11192 > 2d+3*t19*t27*t77-3.4848d+4*t110*t21*t77-1.3728d+4*t146*t1 11193 ? 7*t77)+t3*t64*(-7.92d+3*t24*t67*t89-2.64d+4*t24*t66*t89-2 11194 @ .904d+4*t24*t65*t89-4.8d+1*t43*t75-4.8d+1*t16*t40*t75-1.9 11195 1 2d+2*t37*t45*t74-9.6d+1*t43*t74-2.88d+2*t16*t40*t74-8.64d 11196 2 +2*t37*t45*t73-4.8d+1*t43*t73-4.8d+2*t34*t42*t73-4.32d+2* 11197 3 t16*t40*t73-1.152d+3*t37*t45*t72-1.92d+3*t34*t42*t72-1.92 11198 4 d+2*t16*t40*t72-9.6d+2*t31*t39*t72-4.8d+2*t37*t45*t71-2.4 11199 5 d+3*t34*t42*t71-3.6d+3*t31*t39*t71-1.68d+3*t28*t36*t71-9. 11200 6 6d+2*t34*t42*t70-4.32d+3*t31*t39*t70-6.048d+3*t28*t36*t70 11201 7 -2.688d+3*t25*t33*t70-1.68d+3*t31*t39*t69-7.056d+3*t28*t3 11202 8 6*t69-9.408d+3*t25*t33*t69-4.032d+3*t22*t30*t69-2.688d+3* 11203 9 t28*t36*t68-1.0752d+4*t25*t33*t68-1.3824d+4*t22*t30*t68-5 11204 : .76d+3*t19*t27*t68-4.032d+3*t25*t33*t67-1.5552d+4*t22*t30 11205 ; *t67-1.944d+4*t19*t27*t67-5.76d+3*t22*t30*t66-2.16d+4*t19 11206 < *t27*t66-1.056d+4*t110*t21*t66-7.92d+3*t19*t27*t65-3.4848 11207 = d+4*t110*t21*t65-1.3728d+4*t146*t17*t65)-9.30525736349100 11208 > 2d-1*t12*t4*t51*(-7.92d+3*t24*t54*t89-2.64d+4*t24*t53*t89 11209 ? -2.904d+4*t24*t52*t89-4.8d+1*t43*t62-4.8d+1*t16*t40*t62-1 11210 @ .92d+2*t37*t45*t61-9.6d+1*t43*t61-2.88d+2*t16*t40*t61-8.6 11211 1 4d+2*t37*t45*t60-4.8d+1*t43*t60-4.8d+2*t34*t42*t60-4.32d+ 11212 2 2*t16*t40*t60-1.152d+3*t37*t45*t59-1.92d+3*t34*t42*t59-1. 11213 3 92d+2*t16*t40*t59-9.6d+2*t31*t39*t59-4.8d+2*t37*t45*t58-2 11214 4 .4d+3*t34*t42*t58-3.6d+3*t31*t39*t58-1.68d+3*t28*t36*t58- 11215 5 9.6d+2*t34*t42*t57-4.32d+3*t31*t39*t57-6.048d+3*t28*t36*t 11216 6 57-2.688d+3*t25*t33*t57-1.68d+3*t31*t39*t56-7.056d+3*t28* 11217 7 t36*t56-9.408d+3*t25*t33*t56-4.032d+3*t22*t30*t56-2.688d+ 11218 8 3*t28*t36*t55-1.0752d+4*t25*t33*t55-1.3824d+4*t22*t30*t55 11219 9 -5.76d+3*t19*t27*t55-4.032d+3*t25*t33*t54-1.5552d+4*t22*t 11220 : 30*t54-1.944d+4*t19*t27*t54-5.76d+3*t22*t30*t53-2.16d+4*t 11221 ; 19*t27*t53-1.056d+4*t110*t21*t53-7.92d+3*t19*t27*t52-3.48 11222 < 48d+4*t110*t21*t52-1.3728d+4*t146*t17*t52)-9.305257363491 11223 = 002d-1*t12*t3*t4*(-7.92d+3*t23*t24*t89-2.64d+4*t20*t24*t8 11224 > 9-2.904d+4*t13*t24*t89-4.8d+1*t43*t47-4.8d+1*t16*t40*t47- 11225 ? 1.92d+2*t37*t44*t45-8.64d+2*t37*t41*t45-1.152d+3*t37*t38* 11226 @ t45-4.8d+2*t35*t37*t45-9.6d+1*t43*t44-2.88d+2*t16*t40*t44 11227 1 -4.8d+1*t41*t43-4.8d+2*t34*t41*t42-1.92d+3*t34*t38*t42-2. 11228 2 4d+3*t34*t35*t42-9.6d+2*t32*t34*t42-4.32d+2*t16*t40*t41-1 11229 3 .92d+2*t16*t38*t40-9.6d+2*t31*t38*t39-3.6d+3*t31*t35*t39- 11230 4 4.32d+3*t31*t32*t39-1.68d+3*t29*t31*t39-1.68d+3*t28*t35*t 11231 5 36-6.048d+3*t28*t32*t36-7.056d+3*t28*t29*t36-2.688d+3*t26 11232 6 *t28*t36-2.688d+3*t25*t32*t33-9.408d+3*t25*t29*t33-1.0752 11233 7 d+4*t25*t26*t33-4.032d+3*t23*t25*t33-4.032d+3*t22*t29*t30 11234 8 -1.3824d+4*t22*t26*t30-1.5552d+4*t22*t23*t30-5.76d+3*t20* 11235 9 t22*t30-5.76d+3*t19*t26*t27-1.944d+4*t19*t23*t27-2.16d+4* 11236 : t19*t20*t27-7.92d+3*t13*t19*t27-1.056d+4*t110*t20*t21-3.4 11237 ; 848d+4*t110*t13*t21-1.3728d+4*t13*t146*t17))*wght+Mmat3(i 11238 < q,D3_TB_TB_TB) 11239 endif ! rhoa.gt.tol_rho.and.rhob.gt.tol_rho 11240 endif ! ipol.eq.1 11241 enddo ! iq 11242 end 11243C> @} 11244