C C There are a total of 187 entries in the algebraic variable array. C There are a total of 60 entries in each of the rate and state variable arrays. C There are a total of 327 entries in the constant variable array. C C C VOI is time in component Environment (second). C CONSTS(1) is ExpType in component Environment (dimensionless). C CONSTS(2) is StateType in component Environment (dimensionless). C CONSTS(3) is X_pdh in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(4) is X_cits in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(5) is X_acon in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(6) is X_isod in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(7) is X_akgd in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(8) is K_ir_akgd in component adjustable_parameters (molar). C CONSTS(9) is X_scoas in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(10) is X_sdh in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(11) is X_fuma in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(12) is X_mdh in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(13) is X_ndk in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(14) is X_got in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(15) is X_PYRH in component adjustable_parameters (mole_per_second_per_l_mito_volume_per_molar_per_molar). C CONSTS(16) is X_GLUH in component adjustable_parameters (mole_per_second_per_l_mito_volume_per_molar_per_molar). C CONSTS(17) is X_CITMAL in component adjustable_parameters (mole_per_second_per_l_mito_volume_per_molar_per_molar). C CONSTS(18) is X_AKGMAL in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(19) is X_SUCMAL in component adjustable_parameters (mole_per_second_per_l_mito_volume_per_molar_per_molar). C CONSTS(20) is X_MALPI in component adjustable_parameters (mole_per_second_per_l_mito_volume_per_molar_per_molar). C CONSTS(21) is X_ASPGLU in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(22) is X_C1 in component adjustable_parameters (mole_per_second_per_l_mito_volume_per_molar_per_molar). C CONSTS(23) is X_C3 in component adjustable_parameters (mole_per_second_per_l_mito_volume_per_molar_per_half_molar). C CONSTS(24) is k_PI_1 in component adjustable_parameters (molar). C CONSTS(25) is k_PI_2 in component adjustable_parameters (molar). C CONSTS(26) is X_C4 in component adjustable_parameters (mole_per_second_per_l_mito_volume_per_molar). C CONSTS(27) is X_F1 in component adjustable_parameters (mole_per_second_per_l_mito_volume_per_molar). C CONSTS(28) is X_ANT in component adjustable_parameters (mole_per_second_per_l_mito_volume). C CONSTS(29) is X_PiHt in component adjustable_parameters (mole_per_second_per_l_mito_volume_per_molar). C CONSTS(30) is k_PiHt in component adjustable_parameters (molar). C CONSTS(31) is X_KH in component adjustable_parameters (mole_per_second_per_l_mito_volume_per_molar_per_molar). C CONSTS(32) is X_Hle in component adjustable_parameters (mole_per_second_per_l_mito_volume_per_molar_per_mv). C CONSTS(246) is X_HK in component adjustable_parameters (mole_per_second_per_l_cyto_volume). C CONSTS(33) is J_AtC in component adjustable_parameters (mole_per_second_per_l_cyto_volume). C CONSTS(250) is RT in component fixed_parameters (kilojoule_per_mole). C CONSTS(34) is F in component fixed_parameters (kilojoule_per_mole_per_millivolt). C CONSTS(296) is V_cyto in component fixed_parameters (cyto_per_cell). C CONSTS(292) is V_mito in component fixed_parameters (mito_per_cell). C CONSTS(35) is W_x in component fixed_parameters (l_water_per_l_mito). C CONSTS(36) is W_i in component fixed_parameters (l_water_per_l_mito). C CONSTS(247) is W_c in component fixed_parameters (l_water_per_l_cyto). C CONSTS(37) is gamma in component fixed_parameters (per_micrometer). C CONSTS(38) is rho_m in component fixed_parameters (mg_per_mitochondria). C CONSTS(39) is n_A in component fixed_parameters (dimensionless). C CONSTS(40) is p_PI in component fixed_parameters (micrometer_per_second). C CONSTS(41) is p_A in component fixed_parameters (micrometer_per_second). C CONSTS(42) is p_TI in component fixed_parameters (micrometer_per_second). C CONSTS(43) is k_mADP in component fixed_parameters (molar). C CONSTS(44) is theta in component fixed_parameters (dimensionless). C CONSTS(45) is k_O2 in component fixed_parameters (molar). C CONSTS(46) is NAD_tot in component fixed_parameters (molar). C CONSTS(47) is Q_tot in component fixed_parameters (molar). C CONSTS(48) is cytC_tot in component fixed_parameters (molar). C CONSTS(49) is A_tot in component fixed_parameters (molar). C CONSTS(50) is CR_tot in component fixed_parameters (molar). C CONSTS(51) is CO2_tot_x in component fixed_parameters (molar). C CONSTS(52) is FAD_tot in component fixed_parameters (molar). C CONSTS(53) is C_IM in component fixed_parameters (mole_per_l_mito_volume_per_mv). C ALGBRC(158) is J_C1 in component J_C1 (mole_per_second_per_l_mito_volume). C ALGBRC(4) is k_eqC1 in component k_eqC1 (dimensionless). C STATES(1) is H_x in component dH_x_dt (molar). C STATES(2) is H_i in component dH_i_dt (molar). C STATES(3) is deltaPsi in component ddeltaPsi_dt (millivolt). C ALGBRC(144) is NAD_x in component dNAD_x_dt (molar). C STATES(4) is NADH_x in component dNADH_x_dt (molar). C STATES(5) is QH2_x in component dQH2_x_dt (molar). C ALGBRC(157) is COQ_x in component dCOQ_x_dt (molar). C ALGBRC(1) is k_eqC1_nought in component k_eqC1 (dimensionless). C CONSTS(54) is deltaG_C1 in component k_eqC1 (kilojoule_per_mole). C ALGBRC(165) is J_C3 in component J_C3 (mole_per_second_per_l_mito_volume). C ALGBRC(6) is k_eqC3 in component k_eqC3 (dimensionless). C STATES(6) is PI_x in component dPI_x_dt (molar). C STATES(7) is Cred_i in component dCred_i_dt (molar). C ALGBRC(164) is Cox_i in component dCox_i_dt (molar). C ALGBRC(5) is k_eqC3_nought in component k_eqC3 (dimensionless). C CONSTS(55) is deltaG_C3 in component k_eqC3 (kilojoule_per_mole). C ALGBRC(166) is J_C4 in component J_C4 (mole_per_second_per_l_mito_volume). C ALGBRC(8) is k_eqC4 in component k_eqC4 (dimensionless). C STATES(8) is O2_x in component dO2_x_dt (molar). C ALGBRC(7) is k_eqC4_nought in component k_eqC4 (dimensionless). C CONSTS(56) is deltaG_C4 in component k_eqC4 (kilojoule_per_mole). C ALGBRC(79) is J_F1 in component J_F1 (mole_per_second_per_l_mito_volume). C ALGBRC(78) is k_eqF1 in component k_eqF1 (per_molar). C ALGBRC(37) is P_ATP_x in component P_ATP_x (dimensionless). C ALGBRC(42) is P_ADP_x in component P_ADP_x (dimensionless). C ALGBRC(77) is P_PI_x in component P_PI_x (dimensionless). C STATES(9) is ATP_x in component dATP_x_dt (molar). C STATES(10) is ADP_x in component dADP_x_dt (molar). C ALGBRC(9) is k_eqF1_nought in component k_eqF1 (dimensionless). C CONSTS(57) is deltaG_F1 in component k_eqF1 (kilojoule_per_mole). C ALGBRC(145) is J_pdh in component J_pdh (mole_per_second_per_l_mito_volume). C STATES(11) is PYR_x in component dPYR_x_dt (molar). C STATES(12) is COASH_x in component dCOASH_x_dt (molar). C STATES(13) is CO2_tot_x in component dCO2_tot_x_dt (molar). C STATES(14) is ACCOA_x in component dACCOA_x_dt (molar). C ALGBRC(118) is P_CO2_tot_x in component P_CO2_tot_x (dimensionless). C ALGBRC(121) is P_PYR_x in component P_PYR_x (dimensionless). C ALGBRC(84) is P_COASH_x in component P_COASH_x (dimensionless). C ALGBRC(122) is K_eq_pdh in component J_pdh (dimensionless). C CONSTS(58) is K0_eq_pdh in component J_pdh (molar). C CONSTS(59) is K_mA in component J_pdh (molar). C CONSTS(60) is K_mB in component J_pdh (molar). C CONSTS(61) is K_mC in component J_pdh (molar). C ALGBRC(10) is alpha_i1 in component J_pdh (dimensionless). C ALGBRC(11) is alpha_i2 in component J_pdh (dimensionless). C CONSTS(62) is K_iACCOA in component J_pdh (molar). C CONSTS(63) is K_iNADH in component J_pdh (molar). C CONSTS(64) is minCon in component J_pdh (molar). C ALGBRC(90) is J_cits in component J_cits (mole_per_second_per_l_mito_volume). C STATES(15) is OAA_x in component dOAA_x_dt (molar). C STATES(16) is CIT_x in component dCIT_x_dt (molar). C STATES(17) is AMP_x in component dAMP_x_dt (molar). C STATES(18) is SCOA_x in component dSCOA_x_dt (molar). C ALGBRC(39) is fATP_x in component P_ATP_x (molar). C ALGBRC(44) is fADP_x in component P_ADP_x (molar). C ALGBRC(53) is fAMP_x in component P_AMP_x (molar). C ALGBRC(88) is uCIT_x in component P_CIT_x (molar). C ALGBRC(86) is P_CIT_x in component P_CIT_x (dimensionless). C ALGBRC(85) is P_OAA_x in component P_OAA_x (dimensionless). C ALGBRC(87) is K_eq_cits in component J_cits (dimensionless). C CONSTS(65) is K0_eq_cits in component J_cits (molar_squared). C CONSTS(66) is K_mA in component J_cits (molar). C CONSTS(67) is K_mB in component J_cits (molar). C CONSTS(68) is K_ia in component J_cits (molar). C CONSTS(69) is K_iCIT in component J_cits (molar). C CONSTS(70) is K_iATP in component J_cits (molar). C CONSTS(71) is K_iADP in component J_cits (molar). C CONSTS(72) is K_iAMP in component J_cits (molar). C CONSTS(73) is K_iCOASH in component J_cits (molar). C CONSTS(74) is K_iSCOA in component J_cits (molar). C ALGBRC(89) is alpha_i1 in component J_cits (dimensionless). C ALGBRC(55) is alpha_i2 in component J_cits (dimensionless). C ALGBRC(98) is J_acon in component J_acon (mole_per_second_per_l_mito_volume). C STATES(19) is ICIT_x in component dICIT_x_dt (molar). C ALGBRC(95) is P_ICIT_x in component P_ICIT_x (dimensionless). C ALGBRC(97) is V_mr in component J_acon (mole_per_second_per_l_mito_volume). C ALGBRC(96) is K_eq_acon in component J_acon (dimensionless). C CONSTS(75) is K0_eq_acon in component J_acon (dimensionless). C CONSTS(76) is K_mA in component J_acon (molar). C CONSTS(77) is K_mP in component J_acon (molar). C ALGBRC(146) is J_isod in component J_isod (mole_per_second_per_l_mito_volume). C STATES(20) is AKG_x in component dAKG_x_dt (molar). C ALGBRC(119) is K_eq_isod in component J_isod (molar). C CONSTS(78) is K0_eq_isod in component J_isod (molar_cubed). C CONSTS(79) is K_mA in component J_isod (molar). C CONSTS(80) is K_mB in component J_isod (molar). C CONSTS(81) is K_ib in component J_isod (molar). C CONSTS(82) is K_iq in component J_isod (molar). C ALGBRC(47) is alpha_i in component J_isod (dimensionless). C CONSTS(83) is n_H in component J_isod (dimensionless). C CONSTS(84) is K_aATP in component J_isod (molar). C CONSTS(85) is K_aADP in component J_isod (molar). C CONSTS(86) is minCon in component J_isod (molar). C ALGBRC(147) is J_akgd in component J_akgd (mole_per_second_per_l_mito_volume). C ALGBRC(99) is P_SCOA_x in component P_SCOA_x (dimensionless). C ALGBRC(120) is K_eq_akgd in component J_akgd (dimensionless). C CONSTS(87) is K0_eq_akgd in component J_akgd (molar). C CONSTS(88) is K_mA in component J_akgd (molar). C CONSTS(89) is K_mB in component J_akgd (molar). C CONSTS(90) is K_mC in component J_akgd (molar). C CONSTS(91) is K_iq in component J_akgd (molar). C CONSTS(92) is K_ir in component J_akgd (molar). C CONSTS(93) is K_ir2 in component J_akgd (molar). C CONSTS(94) is K_iATP in component J_akgd (molar). C CONSTS(95) is K_aADP in component J_akgd (molar). C ALGBRC(49) is alpha_i in component J_akgd (dimensionless). C CONSTS(96) is minCon in component J_akgd (molar). C ALGBRC(103) is J_scoas in component J_scoas (mole_per_second_per_l_mito_volume). C STATES(21) is GDP_x in component dGDP_x_dt (molar). C STATES(22) is SUC_x in component dSUC_x_dt (molar). C STATES(23) is GTP_x in component dGTP_x_dt (molar). C ALGBRC(100) is P_SUC_x in component P_SUC_x (dimensionless). C ALGBRC(67) is P_GTP_x in component P_GTP_x (dimensionless). C ALGBRC(73) is P_GDP_x in component P_GDP_x (dimensionless). C ALGBRC(101) is K_eq_scoas in component J_scoas (dimensionless). C CONSTS(97) is K0_eq_scoas in component J_scoas (molar). C ALGBRC(102) is V_mr in component J_scoas (mole_per_second_per_l_mito_volume). C CONSTS(98) is K_iGDP in component J_scoas (molar). C CONSTS(99) is K_iSCOA in component J_scoas (molar). C CONSTS(100) is K_iPI in component J_scoas (molar). C CONSTS(101) is K_iCOASH in component J_scoas (molar). C CONSTS(102) is K_iSUC in component J_scoas (molar). C CONSTS(103) is K_iGTP in component J_scoas (molar). C CONSTS(104) is K_mGDP in component J_scoas (molar). C CONSTS(105) is K_mSCOA in component J_scoas (molar). C CONSTS(106) is K_mPI in component J_scoas (molar). C CONSTS(107) is K_mCOASH in component J_scoas (molar). C CONSTS(108) is K_mSUC in component J_scoas (molar). C CONSTS(109) is K_mGTP in component J_scoas (molar). C ALGBRC(159) is J_sdh in component J_sdh (mole_per_second_per_l_mito_volume). C STATES(24) is FUM_x in component dFUM_x_dt (molar). C ALGBRC(105) is P_FUM_x in component P_FUM_x (dimensionless). C ALGBRC(106) is K_eq_sdh in component J_sdh (dimensionless). C CONSTS(110) is K0_eq_sdh in component J_sdh (dimensionless). C ALGBRC(107) is V_mr in component J_sdh (mole_per_second_per_l_mito_volume). C CONSTS(111) is K_ia in component J_sdh (molar). C CONSTS(112) is K_iq in component J_sdh (molar). C CONSTS(113) is K_mSUC in component J_sdh (molar). C CONSTS(114) is K_mCOQ in component J_sdh (molar). C CONSTS(115) is K_mQH2 in component J_sdh (molar). C CONSTS(116) is K_mFUM in component J_sdh (molar). C ALGBRC(12) is alpha_i in component J_sdh (dimensionless). C CONSTS(117) is K_iOAA in component J_sdh (molar). C CONSTS(118) is K_aSUC in component J_sdh (molar). C CONSTS(119) is K_aFUM in component J_sdh (molar). C ALGBRC(111) is J_fum in component J_fum (mole_per_second_per_l_mito_volume). C STATES(25) is MAL_x in component dMAL_x_dt (molar). C ALGBRC(69) is fGTP_x in component P_GTP_x (molar). C ALGBRC(75) is fGDP_x in component P_GDP_x (molar). C ALGBRC(108) is P_MAL_x in component P_MAL_x (dimensionless). C ALGBRC(109) is K_eq_fum in component J_fum (dimensionless). C CONSTS(120) is K0_eq_fum in component J_fum (dimensionless). C ALGBRC(110) is V_mr in component J_fum (mole_per_second_per_l_mito_volume). C CONSTS(121) is K_mFUM in component J_fum (molar). C CONSTS(122) is K_mMAL in component J_fum (molar). C ALGBRC(76) is alpha_i in component J_fum (dimensionless). C CONSTS(123) is K_iCIT in component J_fum (molar). C CONSTS(124) is K_iATP in component J_fum (molar). C CONSTS(125) is K_iADP in component J_fum (molar). C CONSTS(126) is K_iGTP in component J_fum (molar). C CONSTS(127) is K_iGDP in component J_fum (molar). C ALGBRC(148) is J_mdh in component J_mdh (mole_per_second_per_l_mito_volume). C ALGBRC(112) is K_eq_mdh in component J_mdh (dimensionless). C CONSTS(128) is K0_eq_mdh in component J_mdh (molar). C ALGBRC(113) is V_mr in component J_mdh (mole_per_second_per_l_mito_volume). C CONSTS(129) is K_ia in component J_mdh (molar). C CONSTS(130) is K_ib in component J_mdh (molar). C CONSTS(131) is K_ip in component J_mdh (molar). C CONSTS(132) is K_iq in component J_mdh (molar). C CONSTS(133) is K_mNAD in component J_mdh (molar). C CONSTS(134) is K_mMAL in component J_mdh (molar). C CONSTS(135) is K_mOAA in component J_mdh (molar). C CONSTS(136) is K_mNADH in component J_mdh (molar). C ALGBRC(56) is alpha_i in component J_mdh (dimensionless). C CONSTS(137) is K_iATP in component J_mdh (molar). C CONSTS(138) is K_iADP in component J_mdh (molar). C CONSTS(139) is K_iAMP in component J_mdh (molar). C ALGBRC(58) is J_ndk_f in component J_ndk (mole_per_second_per_l_mito_volume). C ALGBRC(59) is J_ndk in component J_ndk (mole_per_second_per_l_mito_volume). C CONSTS(140) is K_eq_ndk in component J_ndk (dimensionless). C CONSTS(248) is V_mr in component J_ndk (mole_per_second_per_l_mito_volume). C CONSTS(141) is K_ia in component J_ndk (molar). C CONSTS(142) is K_ib in component J_ndk (molar). C CONSTS(143) is K_ip in component J_ndk (molar). C CONSTS(144) is K_iq in component J_ndk (molar). C CONSTS(145) is K_mA in component J_ndk (molar). C CONSTS(146) is K_mB in component J_ndk (molar). C CONSTS(147) is K_mP in component J_ndk (molar). C CONSTS(148) is K_mQ in component J_ndk (molar). C ALGBRC(57) is alpha_i in component J_ndk (dimensionless). C CONSTS(149) is K_iAMP in component J_ndk (molar). C CONSTS(150) is minCon in component J_ndk (molar). C ALGBRC(131) is J_got_f in component J_got (mole_per_second_per_l_mito_volume). C ALGBRC(132) is J_got in component J_got (mole_per_second_per_l_mito_volume). C STATES(26) is ASP_x in component dASP_x_dt (molar). C STATES(27) is GLU_x in component dGLU_x_dt (molar). C ALGBRC(128) is P_ASP_x in component P_ASP_x (dimensionless). C ALGBRC(125) is P_GLU_x in component P_GLU_x (dimensionless). C ALGBRC(129) is K_eq_got in component J_got (dimensionless). C CONSTS(151) is K0_eq_got in component J_got (dimensionless). C ALGBRC(130) is V_mr in component J_got (mole_per_second_per_l_mito_volume). C CONSTS(152) is K_ia in component J_got (molar). C CONSTS(153) is K_ib in component J_got (molar). C CONSTS(154) is K_ip in component J_got (molar). C CONSTS(155) is K_iq in component J_got (molar). C CONSTS(156) is K_mA in component J_got (molar). C CONSTS(157) is K_mB in component J_got (molar). C CONSTS(158) is K_mP in component J_got (molar). C CONSTS(159) is K_mQ in component J_got (molar). C ALGBRC(13) is alpha_i in component J_got (dimensionless). C CONSTS(160) is K_iAKG in component J_got (molar). C CONSTS(161) is minCon in component J_got (molar). C ALGBRC(124) is J_PYRH in component J_PYRH (mole_per_second_per_l_mito_volume). C STATES(28) is PYR_i in component dPYR_i_dt (molar). C ALGBRC(123) is P_PYR_i in component P_PYR_i (dimensionless). C ALGBRC(127) is J_GLUH in component J_GLUH (mole_per_second_per_l_mito_volume). C STATES(29) is GLU_i in component dGLU_i_dt (molar). C ALGBRC(126) is P_GLU_i in component P_GLU_i (dimensionless). C ALGBRC(115) is J_CITMAL in component J_CITMAL (mole_per_second_per_l_mito_volume). C ALGBRC(93) is hCIT_i in component P_CIT_i (molar). C STATES(30) is MAL_i in component dMAL_i_dt (molar). C ALGBRC(114) is P_MAL_i in component P_MAL_i (dimensionless). C ALGBRC(91) is hCIT_x in component P_CIT_x (molar). C ALGBRC(14) is J_AKGMAL in component J_AKGMAL (mole_per_second_per_l_mito_volume). C CONSTS(162) is K_mAKGi in component J_AKGMAL (molar). C CONSTS(163) is K_mAKGx in component J_AKGMAL (molar). C CONSTS(164) is K_mMALi in component J_AKGMAL (molar). C CONSTS(165) is K_mMALx in component J_AKGMAL (molar). C STATES(31) is AKG_i in component dAKG_i_dt (molar). C ALGBRC(116) is J_MALPI in component J_MALPI (mole_per_second_per_l_mito_volume). C STATES(32) is PI_i in component dPI_i_dt (molar). C ALGBRC(81) is P_PI_i in component P_PI_i (dimensionless). C ALGBRC(135) is J_ASPGLU in component J_ASPGLU (mole_per_second_per_l_mito_volume). C ALGBRC(134) is K_eqASPGLU in component J_ASPGLU (dimensionless). C CONSTS(249) is K_hASPGLU in component J_ASPGLU (molar). C CONSTS(166) is K_iASPi in component J_ASPGLU (molar). C CONSTS(167) is K_iASPx in component J_ASPGLU (molar). C CONSTS(168) is K_iGLUi in component J_ASPGLU (molar). C CONSTS(169) is K_iGLUx in component J_ASPGLU (molar). C STATES(33) is ASP_i in component dASP_i_dt (molar). C CONSTS(170) is m in component J_ASPGLU (dimensionless). C ALGBRC(133) is P_ASP_i in component P_ASP_i (dimensionless). C ALGBRC(117) is J_SUCMAL in component J_SUCMAL (mole_per_second_per_l_mito_volume). C STATES(34) is SUC_i in component dSUC_i_dt (molar). C ALGBRC(104) is P_SUC_i in component P_SUC_i (dimensionless). C ALGBRC(15) is J_ATPt in component J_ATPt (mole_per_second_per_l_mito_volume). C STATES(35) is ATP_c in component dATP_c_dt (molar). C STATES(36) is ATP_i in component dATP_i_dt (molar). C ALGBRC(17) is J_ADPt in component J_ADPt (mole_per_second_per_l_mito_volume). C STATES(37) is ADP_c in component dADP_c_dt (molar). C STATES(38) is ADP_i in component dADP_i_dt (molar). C ALGBRC(18) is J_AMPt in component J_AMPt (mole_per_second_per_l_mito_volume). C STATES(39) is AMP_c in component dAMP_c_dt (molar). C STATES(40) is AMP_i in component dAMP_i_dt (molar). C ALGBRC(19) is J_PIt in component J_PIt (mole_per_second_per_l_mito_volume). C STATES(41) is PI_c in component dPI_c_dt (molar). C ALGBRC(21) is J_PYRt in component J_PYRt (mole_per_second_per_l_mito_volume). C STATES(42) is PYR_c in component dPYR_c_dt (molar). C ALGBRC(23) is J_CITt in component J_CITt (mole_per_second_per_l_mito_volume). C STATES(43) is CIT_c in component dCIT_c_dt (molar). C STATES(44) is CIT_i in component dCIT_i_dt (molar). C ALGBRC(2) is J_ICITt in component J_ICITt (mole_per_second_per_l_mito_volume). C STATES(45) is ICIT_c in component dICIT_c_dt (molar). C STATES(46) is ICIT_i in component dICIT_i_dt (molar). C ALGBRC(25) is J_MALt in component J_MALt (mole_per_second_per_l_mito_volume). C STATES(47) is MAL_c in component dMAL_c_dt (molar). C ALGBRC(16) is J_AKGt in component J_AKGt (mole_per_second_per_l_mito_volume). C STATES(48) is AKG_c in component dAKG_c_dt (molar). C ALGBRC(27) is J_SUCt in component J_SUCt (mole_per_second_per_l_mito_volume). C STATES(49) is SUC_c in component dSUC_c_dt (molar). C ALGBRC(29) is J_GLUt in component J_GLUt (mole_per_second_per_l_mito_volume). C STATES(50) is GLU_c in component dGLU_c_dt (molar). C ALGBRC(31) is J_ASPt in component J_ASPt (mole_per_second_per_l_mito_volume). C STATES(51) is ASP_c in component dASP_c_dt (molar). C ALGBRC(3) is J_FUMt in component J_FUMt (mole_per_second_per_l_mito_volume). C CONSTS(171) is p_TI in component J_FUMt (micrometer_per_second). C STATES(52) is FUM_c in component dFUM_c_dt (molar). C STATES(53) is FUM_i in component dFUM_i_dt (molar). C ALGBRC(64) is J_ANT in component J_ANT (mole_per_second_per_l_mito_volume). C ALGBRC(61) is P_ADP_i in component P_ADP_i (dimensionless). C ALGBRC(60) is P_ATP_i in component P_ATP_i (dimensionless). C CONSTS(172) is minCond in component J_ANT (molar). C ALGBRC(83) is J_PIHt in component J_PIHt (mole_per_second_per_l_mito_volume). C ALGBRC(82) is hPI_i in component P_PI_i (molar). C ALGBRC(80) is hPI_x in component P_PI_x (molar). C ALGBRC(33) is J_Hle in component J_Hle (mole_per_second_per_l_mito_volume). C CONSTS(173) is minCond in component J_Hle (millivolt). C ALGBRC(35) is J_KH in component J_KH (mole_per_second_per_l_mito_volume). C STATES(54) is K_i in component dK_i_dt (molar). C STATES(55) is K_x in component dK_x_dt (molar). C ALGBRC(74) is J_AKi in component J_AKi (mole_per_second_per_l_mito_volume). C CONSTS(174) is X_AK in component J_AKi (mole_per_second_per_l_mito_volume_per_molar_per_molar). C ALGBRC(70) is K_AKi in component J_AKi (dimensionless). C CONSTS(175) is K0_AKi in component J_AKi (dimensionless). C ALGBRC(68) is P_AMP_i in component P_AMP_i (dimensionless). C ALGBRC(48) is J_AKc in component J_AKc (mole_per_second_per_l_cyto_volume). C CONSTS(176) is X_AK in component J_AKc (mole_per_second_per_l_cyto_volume_per_molar_per_molar). C ALGBRC(45) is K_AKc in component J_AKc (dimensionless). C CONSTS(177) is K0_AKc in component J_AKc (dimensionless). C ALGBRC(28) is P_ATP_c in component P_ATP_c (dimensionless). C ALGBRC(32) is P_ADP_c in component P_ADP_c (dimensionless). C ALGBRC(43) is P_AMP_c in component P_AMP_c (dimensionless). C ALGBRC(52) is J_CKc in component J_CKc (mole_per_second_per_l_cyto_volume). C CONSTS(178) is X_CK in component J_CKc (mole_per_second_per_l_cyto_volume_per_molar_per_molar). C CONSTS(294) is K_CK in component J_CKc (per_molar). C ALGBRC(20) is H_c in component dH_c_dt (molar). C STATES(56) is PCr_c in component dPCr_c_dt (molar). C ALGBRC(50) is Cr_c in component dCr_c_dt (molar). C ALGBRC(40) is J_HK in component J_HK (mole_per_second_per_l_cyto_volume). C ALGBRC(30) is mATP_c in component P_ATP_c (molar). C ALGBRC(38) is mADP_c in component P_ADP_c (molar). C STATES(57) is GLC_c in component dGLC_c_dt (molar). C STATES(58) is G6P_c in component dG6P_c_dt (molar). C CONSTS(179) is K_ia in component J_HK (molar). C CONSTS(180) is K_ib in component J_HK (molar). C CONSTS(181) is K_ip in component J_HK (molar). C CONSTS(182) is K_iq in component J_HK (molar). C CONSTS(183) is K_mA in component J_HK (molar). C CONSTS(184) is K_mB in component J_HK (molar). C CONSTS(185) is K_mP in component J_HK (molar). C CONSTS(186) is K_mQ in component J_HK (molar). C CONSTS(187) is Ki_G6P in component J_HK (molar). C ALGBRC(22) is P_G6P_c in component P_G6P_c (dimensionless). C CONSTS(301) is K_Mg in component P_ATP_x (molar). C CONSTS(307) is K_Mg in component P_ADP_x (molar). C CONSTS(293) is Keq_HK in component J_HK (molar). C ALGBRC(34) is Kapp_HK in component J_HK (dimensionless). C ALGBRC(36) is Kapp_HK_m in component J_HK (dimensionless). C ALGBRC(41) is ATP_xref in component P_ATP_x (molar). C STATES(59) is Mg_x in component dMg_x_dt (molar). C CONSTS(297) is K_H in component P_ATP_x (molar). C CONSTS(303) is K_K in component P_ATP_x (molar). C ALGBRC(46) is ADP_xref in component P_ADP_x (molar). C CONSTS(305) is K_H in component P_ADP_x (molar). C CONSTS(309) is K_K in component P_ADP_x (molar). C ALGBRC(51) is P_AMP_x in component P_AMP_x (dimensionless). C ALGBRC(54) is AMP_xref in component P_AMP_x (molar). C CONSTS(311) is K_H in component P_AMP_x (molar). C CONSTS(313) is K_Mg in component P_AMP_x (molar). C CONSTS(315) is K_K in component P_AMP_x (molar). C ALGBRC(62) is ATP_iref in component P_ATP_i (molar). C ALGBRC(63) is fATP_i in component P_ATP_i (molar). C STATES(60) is Mg_i in component dMg_i_dt (molar). C ALGBRC(65) is ADP_iref in component P_ADP_i (molar). C ALGBRC(66) is fADP_i in component P_ADP_i (molar). C ALGBRC(71) is AMP_iref in component P_AMP_i (molar). C ALGBRC(72) is fAMP_i in component P_AMP_i (molar). C ALGBRC(24) is Mg_c in component dMg_c_dt (molar). C ALGBRC(26) is K_c in component dK_c_dt (molar). C CONSTS(251) is K_H in component P_PI_x (molar). C CONSTS(252) is K_Mg in component P_PI_x (molar). C CONSTS(253) is K_K in component P_PI_x (molar). C CONSTS(254) is K_H in component P_COASH_x (molar). C CONSTS(188) is K_Mg in component P_COASH_x (molar). C CONSTS(189) is K_K in component P_COASH_x (molar). C CONSTS(255) is K_Mg in component P_OAA_x (molar). C CONSTS(190) is K_H in component P_OAA_x (molar). C CONSTS(191) is K_K in component P_OAA_x (molar). C CONSTS(256) is K_H in component P_CIT_x (molar). C CONSTS(257) is K_Mg in component P_CIT_x (molar). C CONSTS(258) is K_K in component P_CIT_x (molar). C ALGBRC(92) is P_CIT_i in component P_CIT_i (dimensionless). C ALGBRC(94) is uCIT_i in component P_CIT_i (molar). C CONSTS(259) is K_H in component P_ICIT_x (molar). C CONSTS(260) is K_Mg in component P_ICIT_x (molar). C CONSTS(192) is K_K in component P_ICIT_x (molar). C CONSTS(261) is K_H in component P_SCOA_x (molar). C CONSTS(193) is K_Mg in component P_SCOA_x (molar). C CONSTS(194) is K_K in component P_SCOA_x (molar). C CONSTS(262) is K_H in component P_SUC_x (molar). C CONSTS(263) is K_Mg in component P_SUC_x (molar). C CONSTS(264) is K_K in component P_SUC_x (molar). C CONSTS(265) is K_H in component P_FUM_x (molar). C CONSTS(195) is K_Mg in component P_FUM_x (molar). C CONSTS(196) is K_K in component P_FUM_x (molar). C CONSTS(266) is K_H in component P_MAL_x (molar). C CONSTS(267) is K_Mg in component P_MAL_x (molar). C CONSTS(268) is K_K in component P_MAL_x (molar). C CONSTS(269) is K_H in component P_CO2_tot_x (molar). C CONSTS(197) is K_Mg in component P_CO2_tot_x (molar). C CONSTS(198) is K_K in component P_CO2_tot_x (molar). C CONSTS(270) is K_Mg in component P_PYR_x (molar). C CONSTS(199) is K_H in component P_PYR_x (molar). C CONSTS(200) is K_K in component P_PYR_x (molar). C CONSTS(271) is K_H in component P_GLU_x (molar). C CONSTS(272) is K_Mg in component P_GLU_x (molar). C CONSTS(201) is K_K in component P_GLU_x (molar). C CONSTS(273) is K_H in component P_ASP_x (molar). C CONSTS(274) is K_Mg in component P_ASP_x (molar). C CONSTS(202) is K_K in component P_ASP_x (molar). C CONSTS(275) is P_NAD_x in component P_NAD_x (dimensionless). C CONSTS(203) is K_H in component P_NAD_x (molar). C CONSTS(204) is K_Mg in component P_NAD_x (molar). C CONSTS(205) is K_K in component P_NAD_x (molar). C CONSTS(276) is P_NADH_x in component P_NADH_x (dimensionless). C CONSTS(206) is K_H in component P_NADH_x (molar). C CONSTS(207) is K_Mg in component P_NADH_x (molar). C CONSTS(208) is K_K in component P_NADH_x (molar). C CONSTS(277) is P_QH2_x in component P_QH2_x (dimensionless). C CONSTS(209) is K_H in component P_QH2_x (molar). C CONSTS(210) is K_Mg in component P_QH2_x (molar). C CONSTS(211) is K_K in component P_QH2_x (molar). C CONSTS(278) is P_COQ_x in component P_COQ_x (dimensionless). C CONSTS(212) is K_H in component P_COQ_x (molar). C CONSTS(213) is K_Mg in component P_COQ_x (molar). C CONSTS(214) is K_K in component P_COQ_x (molar). C CONSTS(279) is P_ACCOA_x in component P_ACCOA_x (dimensionless). C CONSTS(215) is K_H in component P_ACCOA_x (molar). C CONSTS(216) is K_Mg in component P_ACCOA_x (molar). C CONSTS(217) is K_K in component P_ACCOA_x (molar). C CONSTS(280) is P_AKG_x in component P_AKG_x (dimensionless). C CONSTS(218) is K_H in component P_AKG_x (molar). C CONSTS(219) is K_Mg in component P_AKG_x (molar). C CONSTS(220) is K_K in component P_AKG_x (molar). C CONSTS(281) is P_O2_x in component P_O2_x (dimensionless). C CONSTS(221) is K_H in component P_O2_x (molar). C CONSTS(222) is K_Mg in component P_O2_x (molar). C CONSTS(223) is K_K in component P_O2_x (molar). C CONSTS(282) is P_FADH2_x in component P_FADH2_x (dimensionless). C CONSTS(224) is K_H in component P_FADH2_x (molar). C CONSTS(225) is K_Mg in component P_FADH2_x (molar). C CONSTS(226) is K_K in component P_FADH2_x (molar). C CONSTS(283) is P_FAD_x in component P_FAD_x (dimensionless). C CONSTS(227) is K_H in component P_FAD_x (molar). C CONSTS(228) is K_Mg in component P_FAD_x (molar). C CONSTS(229) is K_K in component P_FAD_x (molar). C CONSTS(284) is P_H_x in component P_H_x (dimensionless). C CONSTS(230) is K_H in component P_H_x (molar). C CONSTS(231) is K_Mg in component P_H_x (molar). C CONSTS(232) is K_K in component P_H_x (molar). C CONSTS(285) is P_Mg_x in component P_Mg_x (dimensionless). C CONSTS(233) is K_H in component P_Mg_x (molar). C CONSTS(234) is K_Mg in component P_Mg_x (molar). C CONSTS(235) is K_K in component P_Mg_x (molar). C CONSTS(286) is P_K_x in component P_K_x (dimensionless). C CONSTS(236) is K_H in component P_K_x (molar). C CONSTS(237) is K_Mg in component P_K_x (molar). C CONSTS(238) is K_K in component P_K_x (molar). C CONSTS(317) is K_H in component P_G6P_c (molar). C ALGBRC(136) is dATP_x_dt in component dATP_x_dt (molar_per_second). C ALGBRC(137) is dADP_x_dt in component dADP_x_dt (molar_per_second). C CONSTS(239) is dAMP_x_dt in component dAMP_x_dt (molar_per_second). C ALGBRC(138) is dGTP_x_dt in component dGTP_x_dt (molar_per_second). C ALGBRC(139) is dGDP_x_dt in component dGDP_x_dt (molar_per_second). C ALGBRC(140) is dPI_x_dt in component dPI_x_dt (molar_per_second). C ALGBRC(160) is dNADH_x_dt in component dNADH_x_dt (molar_per_second). C ALGBRC(167) is dQH2_x_dt in component dQH2_x_dt (molar_per_second). C ALGBRC(149) is dPYR_x_dt in component dPYR_x_dt (molar_per_second). C ALGBRC(150) is dACCOA_x_dt in component dACCOA_x_dt (molar_per_second). C ALGBRC(141) is dCIT_x_dt in component dCIT_x_dt (molar_per_second). C ALGBRC(151) is dICIT_x_dt in component dICIT_x_dt (molar_per_second). C ALGBRC(152) is dAKG_x_dt in component dAKG_x_dt (molar_per_second). C ALGBRC(153) is dSCOA_x_dt in component dSCOA_x_dt (molar_per_second). C ALGBRC(154) is dCOASH_x_dt in component dCOASH_x_dt (molar_per_second). C ALGBRC(161) is dSUC_x_dt in component dSUC_x_dt (molar_per_second). C ALGBRC(162) is dFUM_x_dt in component dFUM_x_dt (molar_per_second). C ALGBRC(155) is dMAL_x_dt in component dMAL_x_dt (molar_per_second). C ALGBRC(156) is dOAA_x_dt in component dOAA_x_dt (molar_per_second). C ALGBRC(142) is dGLU_x_dt in component dGLU_x_dt (molar_per_second). C ALGBRC(143) is dASP_x_dt in component dASP_x_dt (molar_per_second). C CONSTS(240) is dO2_x_dt in component dO2_x_dt (molar_per_second). C CONSTS(241) is dCO2_tot_x_dt in component dCO2_tot_x_dt (molar_per_second). C ALGBRC(163) is dNAD_x_dt in component dNAD_x_dt (molar_per_second). C ALGBRC(168) is dCOQ_x_dt in component dCOQ_x_dt (molar_per_second). C CONSTS(287) is FAD_x in component dFAD_x_dt (molar). C CONSTS(242) is dFAD_x_dt in component dFAD_x_dt (molar_per_second). C CONSTS(243) is dFADH2_x_dt in component dFAD_x_dt (molar_per_second). C CONSTS(295) is FADH2_x in component dFAD_x_dt (molar). C CONSTS(288) is dH_x_dt in component dH_x_dt (molar_per_second). C ALGBRC(187) is D in component BINDING_IONS (dimensionless). C ALGBRC(181) is phi_H in component BINDING_IONS (molar_per_second). C ALGBRC(182) is phi_Mg in component BINDING_IONS (molar_per_second). C ALGBRC(183) is phi_K in component BINDING_IONS (molar_per_second). C ALGBRC(169) is dHB_dMg in component BINDING_IONS (dimensionless). C ALGBRC(170) is dHB_dK in component BINDING_IONS (dimensionless). C ALGBRC(173) is dMgB_dK in component BINDING_IONS (dimensionless). C ALGBRC(176) is dKB_dMg in component BINDING_IONS (dimensionless). C ALGBRC(186) is alpha_K in component BINDING_IONS (dimensionless). C ALGBRC(185) is alpha_Mg in component BINDING_IONS (dimensionless). C CONSTS(289) is dMg_x_dt in component dMg_x_dt (molar_per_second). C ALGBRC(184) is alpha_H in component BINDING_IONS (dimensionless). C ALGBRC(175) is dKB_dH in component BINDING_IONS (dimensionless). C ALGBRC(172) is dMgB_dH in component BINDING_IONS (dimensionless). C CONSTS(290) is dK_x_dt in component dK_x_dt (molar_per_second). C CONSTS(298) is Rm_cyto in component dATP_c_dt (mito_per_cyto). C CONSTS(302) is Rm_cyto in component dADP_c_dt (mito_per_cyto). C CONSTS(304) is Rm_cyto in component dPI_c_dt (mito_per_cyto). C CONSTS(306) is Rm_cyto in component dPYR_c_dt (mito_per_cyto). C CONSTS(308) is Rm_cyto in component dCIT_c_dt (mito_per_cyto). C CONSTS(299) is Rm_cyto in component dICIT_c_dt (mito_per_cyto). C CONSTS(310) is Rm_cyto in component dAKG_c_dt (mito_per_cyto). C CONSTS(312) is Rm_cyto in component dSUC_c_dt (mito_per_cyto). C CONSTS(300) is Rm_cyto in component dFUM_c_dt (mito_per_cyto). C CONSTS(314) is Rm_cyto in component dMAL_c_dt (mito_per_cyto). C CONSTS(316) is Rm_cyto in component dGLU_c_dt (mito_per_cyto). C CONSTS(318) is Rm_cyto in component dASP_c_dt (mito_per_cyto). C CONSTS(319) is multiplier in component dPCr_c_dt (dimensionless). C CONSTS(320) is multiplier in component dGLC_c_dt (dimensionless). C CONSTS(321) is multiplier in component dG6P_c_dt (dimensionless). C ALGBRC(171) is dHB_dH in component BINDING_IONS (dimensionless). C ALGBRC(174) is dMgB_dMg in component BINDING_IONS (dimensionless). C ALGBRC(177) is dKB_dK in component BINDING_IONS (dimensionless). C ALGBRC(178) is nK_JK in component BINDING_IONS (molar_per_second). C ALGBRC(179) is J_H_t in component BINDING_IONS (molar_per_second). C CONSTS(291) is J_Mg_t in component BINDING_IONS (molar_per_second). C ALGBRC(180) is J_K_t in component BINDING_IONS (molar_per_second). C CONSTS(244) is B_x in component BINDING_IONS (molar). C CONSTS(245) is K_BX in component BINDING_IONS (molar). C RATES(3) is d/dt deltaPsi in component ddeltaPsi_dt (millivolt). C RATES(9) is d/dt ATP_x in component dATP_x_dt (molar). C RATES(10) is d/dt ADP_x in component dADP_x_dt (molar). C RATES(17) is d/dt AMP_x in component dAMP_x_dt (molar). C RATES(23) is d/dt GTP_x in component dGTP_x_dt (molar). C RATES(21) is d/dt GDP_x in component dGDP_x_dt (molar). C RATES(6) is d/dt PI_x in component dPI_x_dt (molar). C RATES(4) is d/dt NADH_x in component dNADH_x_dt (molar). C RATES(5) is d/dt QH2_x in component dQH2_x_dt (molar). C RATES(11) is d/dt PYR_x in component dPYR_x_dt (molar). C RATES(14) is d/dt ACCOA_x in component dACCOA_x_dt (molar). C RATES(16) is d/dt CIT_x in component dCIT_x_dt (molar). C RATES(19) is d/dt ICIT_x in component dICIT_x_dt (molar). C RATES(20) is d/dt AKG_x in component dAKG_x_dt (molar). C RATES(18) is d/dt SCOA_x in component dSCOA_x_dt (molar). C RATES(12) is d/dt COASH_x in component dCOASH_x_dt (molar). C RATES(22) is d/dt SUC_x in component dSUC_x_dt (molar). C RATES(24) is d/dt FUM_x in component dFUM_x_dt (molar). C RATES(25) is d/dt MAL_x in component dMAL_x_dt (molar). C RATES(15) is d/dt OAA_x in component dOAA_x_dt (molar). C RATES(27) is d/dt GLU_x in component dGLU_x_dt (molar). C RATES(26) is d/dt ASP_x in component dASP_x_dt (molar). C RATES(8) is d/dt O2_x in component dO2_x_dt (molar). C RATES(13) is d/dt CO2_tot_x in component dCO2_tot_x_dt (molar). C RATES(1) is d/dt H_x in component dH_x_dt (molar). C RATES(59) is d/dt Mg_x in component dMg_x_dt (molar). C RATES(55) is d/dt K_x in component dK_x_dt (molar). C RATES(2) is d/dt H_i in component dH_i_dt (molar). C RATES(60) is d/dt Mg_i in component dMg_i_dt (molar). C RATES(54) is d/dt K_i in component dK_i_dt (molar). C RATES(7) is d/dt Cred_i in component dCred_i_dt (molar). C RATES(36) is d/dt ATP_i in component dATP_i_dt (molar). C RATES(38) is d/dt ADP_i in component dADP_i_dt (molar). C RATES(40) is d/dt AMP_i in component dAMP_i_dt (molar). C RATES(32) is d/dt PI_i in component dPI_i_dt (molar). C RATES(28) is d/dt PYR_i in component dPYR_i_dt (molar). C RATES(44) is d/dt CIT_i in component dCIT_i_dt (molar). C RATES(46) is d/dt ICIT_i in component dICIT_i_dt (molar). C RATES(31) is d/dt AKG_i in component dAKG_i_dt (molar). C RATES(34) is d/dt SUC_i in component dSUC_i_dt (molar). C RATES(53) is d/dt FUM_i in component dFUM_i_dt (molar). C RATES(30) is d/dt MAL_i in component dMAL_i_dt (molar). C RATES(29) is d/dt GLU_i in component dGLU_i_dt (molar). C RATES(33) is d/dt ASP_i in component dASP_i_dt (molar). C RATES(35) is d/dt ATP_c in component dATP_c_dt (molar). C RATES(37) is d/dt ADP_c in component dADP_c_dt (molar). C RATES(39) is d/dt AMP_c in component dAMP_c_dt (molar). C RATES(41) is d/dt PI_c in component dPI_c_dt (molar). C RATES(42) is d/dt PYR_c in component dPYR_c_dt (molar). C RATES(43) is d/dt CIT_c in component dCIT_c_dt (molar). C RATES(45) is d/dt ICIT_c in component dICIT_c_dt (molar). C RATES(48) is d/dt AKG_c in component dAKG_c_dt (molar). C RATES(49) is d/dt SUC_c in component dSUC_c_dt (molar). C RATES(52) is d/dt FUM_c in component dFUM_c_dt (molar). C RATES(47) is d/dt MAL_c in component dMAL_c_dt (molar). C RATES(50) is d/dt GLU_c in component dGLU_c_dt (molar). C RATES(51) is d/dt ASP_c in component dASP_c_dt (molar). C RATES(56) is d/dt PCr_c in component dPCr_c_dt (molar). C RATES(57) is d/dt GLC_c in component dGLC_c_dt (molar). C RATES(58) is d/dt G6P_c in component dG6P_c_dt (molar). C SUBROUTINE initConsts(CONSTS, RATES, STATES) REAL CONSTS(*), RATES(*), STATES(*) CONSTS(1) = 2 CONSTS(2) = 2 CONSTS(3) = 1.22e-1 CONSTS(4) = 11.6 CONSTS(5) = 3.21e-2 CONSTS(6) = 4.25e-1 CONSTS(7) = 7.7e-2 CONSTS(8) = 6.04e-7 CONSTS(9) = 5.82e-1 CONSTS(10) = 6.23e-2 CONSTS(11) = 7.12e-3 CONSTS(12) = 6.94e-2 CONSTS(13) = 2.65e-2 CONSTS(14) = 7.96 CONSTS(15) = 4.12e8 CONSTS(16) = 3.26e8 CONSTS(17) = 7.31e1 CONSTS(18) = 3.46e-1 CONSTS(19) = 9.54e1 CONSTS(20) = 1.58e1 CONSTS(21) = 7.48e-5 CONSTS(22) = 2.47e4 CONSTS(23) = 6.65e-1 CONSTS(24) = 2.81e-5 CONSTS(25) = 3.14e-3 CONSTS(26) = 9.93e-5 CONSTS(27) = 5.95e3 CONSTS(28) = 7.27e-3 CONSTS(29) = 2.01e7 CONSTS(30) = 1.01e-3 CONSTS(31) = 5.65e6 CONSTS(32) = 3.05e2 CONSTS(33) = 0 CONSTS(34) = 0.096484 CONSTS(35) = 0.6514 CONSTS(36) = 0.0724 CONSTS(37) = 5.99 CONSTS(38) = 2.725e5 CONSTS(39) = 3 CONSTS(40) = 327 CONSTS(41) = 85 CONSTS(42) = 85 CONSTS(43) = 3.5e-6 CONSTS(44) = 0.6 CONSTS(45) = 1.2e-4 CONSTS(46) = 2.97e-3 CONSTS(47) = 1.35e-3 CONSTS(48) = 2.7e-3 CONSTS(49) = 10e-3 CONSTS(50) = 42.7e-3 CONSTS(51) = 21.4e-3 CONSTS(52) = 1e-4 CONSTS(53) = 6.75e-6 STATES(1) = 5.79e-8 STATES(2) = 1e-7 STATES(3) = -1.41e1 STATES(4) = 8.48e-21 STATES(5) = 1e-32 CONSTS(54) = -109.7 STATES(6) = 2.99e-4 STATES(7) = 9.7e-8 CONSTS(55) = 46.69 STATES(8) = 6.5e-5 CONSTS(56) = -202.2 STATES(9) = 1.03e-11 STATES(10) = 1e-2 CONSTS(57) = -4.51 STATES(11) = 1.21e-11 STATES(12) = 3.01e-3 STATES(13) = 2.14e-2 STATES(14) = 2.55e-12 CONSTS(58) = 5.02e-4 CONSTS(59) = 38.3e-6 CONSTS(60) = 9.9e-6 CONSTS(61) = 60.7e-6 CONSTS(62) = 40.2e-6 CONSTS(63) = 40e-6 CONSTS(64) = 1e-32 STATES(15) = 8.92e-4 STATES(16) = 6.82e-5 STATES(17) = 1e-6 STATES(18) = 6.96e-10 CONSTS(65) = 7.34e-8 CONSTS(66) = 4e-6 CONSTS(67) = 14e-6 CONSTS(68) = 3.33e-6 CONSTS(69) = 1600e-6 CONSTS(70) = 900e-6 CONSTS(71) = 1800e-6 CONSTS(72) = 6000e-6 CONSTS(73) = 67e-6 CONSTS(74) = 140e-6 STATES(19) = 9.36e-7 CONSTS(75) = 7.59e-2 CONSTS(76) = 1161e-6 CONSTS(77) = 434e-6 STATES(20) = 4.8e-11 CONSTS(78) = 3.5e-16 CONSTS(79) = 74e-6 CONSTS(80) = 183e-6 CONSTS(81) = 23.8e-6 CONSTS(82) = 29e-6 CONSTS(83) = 3 CONSTS(84) = 91e-6 CONSTS(85) = 50e-6 CONSTS(86) = 1e-32 CONSTS(87) = 6.93e-3 CONSTS(88) = 80e-6 CONSTS(89) = 55e-6 CONSTS(90) = 21e-6 CONSTS(91) = 6.9e-6 CONSTS(92) = 6.036773936330217e-7 CONSTS(93) = 1e3 CONSTS(94) = 50e-6 CONSTS(95) = 100e-6 CONSTS(96) = 1e-32 STATES(21) = 5e-3 STATES(22) = 2.17e-7 STATES(23) = 2.72e-10 CONSTS(97) = 9.54e-9 CONSTS(98) = 5.5e-6 CONSTS(99) = 100e-6 CONSTS(100) = 2000e-6 CONSTS(101) = 20e-6 CONSTS(102) = 3000e-6 CONSTS(103) = 11.1e-6 CONSTS(104) = 16e-6 CONSTS(105) = 55e-6 CONSTS(106) = 660e-6 CONSTS(107) = 20e-6 CONSTS(108) = 880e-6 CONSTS(109) = 11.1e-6 STATES(24) = 7.85e-9 CONSTS(110) = 1.69 CONSTS(111) = 120e-6 CONSTS(112) = 1275e-6 CONSTS(113) = 467e-6 CONSTS(114) = 480e-6 CONSTS(115) = 2.45e-6 CONSTS(116) = 1200e-6 CONSTS(117) = 1.5e-6 CONSTS(118) = 450e-6 CONSTS(119) = 375e-6 STATES(25) = 3.22e-8 CONSTS(120) = 4.4 CONSTS(121) = 44.7e-6 CONSTS(122) = 197.7e-6 CONSTS(123) = 3500e-6 CONSTS(124) = 40e-6 CONSTS(125) = 400e-6 CONSTS(126) = 80e-6 CONSTS(127) = 330e-6 CONSTS(128) = 2.27e-12 CONSTS(129) = 279e-6 CONSTS(130) = 360e-6 CONSTS(131) = 5.5e-6 CONSTS(132) = 3.18e-6 CONSTS(133) = 90.55e-6 CONSTS(134) = 250e-6 CONSTS(135) = 6.128e-6 CONSTS(136) = 2.58e-6 CONSTS(137) = 183.2e-6 CONSTS(138) = 394.4e-6 CONSTS(139) = 420e-6 CONSTS(140) = 1 CONSTS(141) = 170e-6 CONSTS(142) = 143.6e-6 CONSTS(143) = 146.6e-6 CONSTS(144) = 156.5e-6 CONSTS(145) = 111e-6 CONSTS(146) = 100e-6 CONSTS(147) = 260e-6 CONSTS(148) = 278e-6 CONSTS(149) = 650e-6 CONSTS(150) = 1e-32 STATES(26) = 1.02e-4 STATES(27) = 9.93e-12 CONSTS(151) = 1.77 CONSTS(152) = 3480e-6 CONSTS(153) = 710e-6 CONSTS(154) = 50e-6 CONSTS(155) = 8400e-6 CONSTS(156) = 3900e-6 CONSTS(157) = 430e-6 CONSTS(158) = 88e-6 CONSTS(159) = 8900e-6 CONSTS(160) = 16.6e-3 CONSTS(161) = 1e-32 STATES(28) = 9.18e-10 STATES(29) = 5.75e-12 STATES(30) = 1e-9 CONSTS(162) = 0.3e-3 CONSTS(163) = 0.17e-3 CONSTS(164) = 1.4e-3 CONSTS(165) = 0.7e-3 STATES(31) = 1e-9 STATES(32) = 1.16e-4 CONSTS(166) = 0.028e-3 CONSTS(167) = 2.8e-3 CONSTS(168) = 0.18e-3 CONSTS(169) = 1.6e-3 STATES(33) = 4.44e-9 CONSTS(170) = 1.8 STATES(34) = 1e-9 STATES(35) = 1e-9 STATES(36) = 1e-9 STATES(37) = 1e-9 STATES(38) = 1e-9 STATES(39) = 1e-9 STATES(40) = 1e-9 STATES(41) = 1.16e-4 STATES(42) = 1e-9 STATES(43) = 1e-9 STATES(44) = 1e-9 STATES(45) = 1e-9 STATES(46) = 1e-9 STATES(47) = 1e-9 STATES(48) = 1e-9 STATES(49) = 1e-9 STATES(50) = 5.75e-12 STATES(51) = 4.44e-9 CONSTS(171) = 0 STATES(52) = 1e-9 STATES(53) = 1e-9 CONSTS(172) = 1e-9 CONSTS(173) = 1e-9 STATES(54) = 150e-3 STATES(55) = 8.69e-2 CONSTS(174) = 1e7 CONSTS(175) = 0.13279 CONSTS(176) = 1e7 CONSTS(177) = 0.13279 CONSTS(178) = 1e7 STATES(56) = 1e-9 STATES(57) = 1e-9 STATES(58) = 1e-9 CONSTS(179) = 1e-3 CONSTS(180) = 47e-6 CONSTS(181) = 47e-6 CONSTS(182) = 1e-3 CONSTS(183) = 1e-3 CONSTS(184) = 47e-6 CONSTS(185) = 47e-6 CONSTS(186) = 1e-3 CONSTS(187) = 10e-6 STATES(59) = 4.64e-3 STATES(60) = 5e-3 CONSTS(188) = 1 CONSTS(189) = 1 CONSTS(190) = 1 CONSTS(191) = 1 CONSTS(192) = 1 CONSTS(193) = 1 CONSTS(194) = 1 CONSTS(195) = 1 CONSTS(196) = 1 CONSTS(197) = 1 CONSTS(198) = 1 CONSTS(199) = 1 CONSTS(200) = 1 CONSTS(201) = 1 CONSTS(202) = 1 CONSTS(203) = 1 CONSTS(204) = 1 CONSTS(205) = 1 CONSTS(206) = 1 CONSTS(207) = 1 CONSTS(208) = 1 CONSTS(209) = 1 CONSTS(210) = 1 CONSTS(211) = 1 CONSTS(212) = 1 CONSTS(213) = 1 CONSTS(214) = 1 CONSTS(215) = 1 CONSTS(216) = 1 CONSTS(217) = 1 CONSTS(218) = 1 CONSTS(219) = 1 CONSTS(220) = 1 CONSTS(221) = 1 CONSTS(222) = 1 CONSTS(223) = 1 CONSTS(224) = 1 CONSTS(225) = 1 CONSTS(226) = 1 CONSTS(227) = 1 CONSTS(228) = 1 CONSTS(229) = 1 CONSTS(230) = 1 CONSTS(231) = 1 CONSTS(232) = 1 CONSTS(233) = 1 CONSTS(234) = 1 CONSTS(235) = 1 CONSTS(236) = 1 CONSTS(237) = 1 CONSTS(238) = 1 CONSTS(239) = 0 CONSTS(240) = 0 CONSTS(241) = 0 CONSTS(242) = 0 CONSTS(243) = 0 CONSTS(244) = 0.02 CONSTS(245) = 1e-7 CONSTS(246) = TERNRY(CONSTS(1).EQ.1.00000.AND.CONSTS(2).EQ.3.00000, 0.191000, 0.00000) CONSTS(247) = TERNRY(CONSTS(1).EQ.1.00000, 80.0000, TERNRY(CONSTS(1).EQ.2.00000, 800.000, TERNRY(CONSTS(1).EQ.3.00000.OR.CONSTS(1).EQ.4.00000, 0.842508, 80.0000) CONSTS(248) = ( CONSTS(13)*CONSTS(148)*CONSTS(143))/( CONSTS(140)*CONSTS(141)*CONSTS(146)) CONSTS(249) = 1.00000*10.0000 ** - 6.50000 CONSTS(250) = TERNRY(CONSTS(1).EQ.1.00000, 2.50370, 2.57858) CONSTS(251) = 1.00000*10.0000 ** - 6.71000 CONSTS(252) = 1.00000*10.0000 ** - 1.69000 CONSTS(253) = 1.00000*10.0000 ** 0.00740000 CONSTS(254) = 1.00000*10.0000 ** - 8.13000 CONSTS(255) = 1.00000*10.0000 ** - 0.00510000 CONSTS(256) = 1.00000*10.0000 ** - 5.63000 CONSTS(257) = 1.00000*10.0000 ** - 3.37000 CONSTS(258) = 1.00000*10.0000 ** - 0.339000 CONSTS(259) = 1.00000*10.0000 ** - 5.64000 CONSTS(260) = 1.00000*10.0000 ** - 2.46000 CONSTS(261) = 1.00000*10.0000 ** - 3.96000 CONSTS(262) = 1.00000*10.0000 ** - 5.13000 CONSTS(263) = 1.00000*10.0000 ** - 1.17000 CONSTS(264) = 1.00000*10.0000 ** - 0.503000 CONSTS(265) = 1.00000*10.0000 ** - 4.10000 CONSTS(266) = 1.00000*10.0000 ** - 4.75000 CONSTS(267) = 1.00000*10.0000 ** - 1.55000 CONSTS(268) = 1.00000*10.0000 ** 0.170000 CONSTS(269) = 1.00000*10.0000 ** - 9.82000 CONSTS(270) = 1.00000*10.0000 ** - 1.02000 CONSTS(271) = 1.00000*10.0000 ** - 4.06000 CONSTS(272) = 1.00000*10.0000 ** - 1.82000 CONSTS(273) = 1.00000*10.0000 ** - 3.65000 CONSTS(274) = 1.00000*10.0000 ** - 2.32000 CONSTS(275) = 1.00000 CONSTS(276) = 1.00000 CONSTS(277) = 1.00000 CONSTS(278) = 1.00000 CONSTS(279) = 1.00000 CONSTS(280) = 1.00000 CONSTS(281) = 1.00000 CONSTS(282) = 1.00000 CONSTS(283) = 1.00000 CONSTS(284) = 1.00000 CONSTS(285) = 1.00000 CONSTS(286) = 1.00000 CONSTS(287) = CONSTS(52)/2.00000 CONSTS(288) = 0.00000 CONSTS(289) = 0.00000 CONSTS(290) = 0.00000 CONSTS(291) = 0.00000 CONSTS(321) = 0.00000 CONSTS(322) = 0.00000 CONSTS(323) = 0.00000 CONSTS(324) = 0.00000 CONSTS(325) = 0.00000 CONSTS(326) = 0.00000 CONSTS(292) = TERNRY(CONSTS(1).EQ.3.00000, 0.288200, TERNRY(CONSTS(1).EQ.4.00000, 0.0560000, 1.00000) CONSTS(293) = EXP(- 15.3800/CONSTS(250))*1.00000 CONSTS(294) = EXP(50.7000/CONSTS(250))/1.00000 CONSTS(295) = CONSTS(287) CONSTS(296) = TERNRY(CONSTS(1).EQ.3.00000, 0.680100, TERNRY(CONSTS(1).EQ.4.00000, 0.894000, 1.00000) CONSTS(297) = 1.00000*10.0000 ** - 6.59000 CONSTS(298) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000.OR.CONSTS(1).EQ.6.00000, 1.00000, CONSTS(292)/CONSTS(296)) CONSTS(299) = TERNRY(CONSTS(2).EQ.0.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, TERNRY(CONSTS(1).EQ.1.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.2.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.6.00000.AND.CONSTS(2) .NE. 0.00000, 1.00000, CONSTS(292)/CONSTS(296)) CONSTS(300) = TERNRY(CONSTS(2).EQ.0.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, TERNRY(CONSTS(1).EQ.1.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.2.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.6.00000.AND.CONSTS(2) .NE. 0.00000, 1.00000, CONSTS(292)/CONSTS(296)) CONSTS(301) = 1.00000*10.0000 ** - 3.82000 CONSTS(302) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000.OR.CONSTS(1).EQ.6.00000, 1.00000, CONSTS(292)/CONSTS(296)) CONSTS(303) = 1.00000*10.0000 ** - 1.87000 CONSTS(304) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000.OR.CONSTS(1).EQ.6.00000, 1.00000, CONSTS(292)/CONSTS(296)) CONSTS(305) = 1.00000*10.0000 ** - 6.42000 CONSTS(306) = TERNRY(CONSTS(2).EQ.0.00000.OR.CONSTS(1).EQ.3.00000.OR.CONSTS(1).EQ.4.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, TERNRY(CONSTS(1).EQ.1.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.2.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.6.00000.AND.CONSTS(2) .NE. 0.00000, 1.00000, CONSTS(292)/CONSTS(296)) CONSTS(307) = 1.00000*10.0000 ** - 2.79000 CONSTS(308) = TERNRY(CONSTS(2).EQ.0.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, TERNRY(CONSTS(1).EQ.1.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.2.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.6.00000.AND.CONSTS(2) .NE. 0.00000, 1.00000, CONSTS(292)/CONSTS(296)) CONSTS(309) = 1.00000*10.0000 ** - 1.53000 CONSTS(310) = TERNRY(CONSTS(2).EQ.0.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, TERNRY(CONSTS(1).EQ.1.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.2.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.6.00000.AND.CONSTS(2) .NE. 0.00000, 1.00000, CONSTS(292)/CONSTS(296)) CONSTS(311) = 1.00000*10.0000 ** - 6.22000 CONSTS(312) = TERNRY(CONSTS(2).EQ.0.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, TERNRY(CONSTS(1).EQ.1.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.2.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.6.00000.AND.CONSTS(2) .NE. 0.00000, 1.00000, CONSTS(292)/CONSTS(296)) CONSTS(313) = 1.00000*10.0000 ** - 1.86000 CONSTS(314) = TERNRY(CONSTS(2).EQ.0.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, TERNRY(CONSTS(1).EQ.1.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.2.00000.AND.CONSTS(2) .NE. 0.00000.OR.CONSTS(1).EQ.6.00000.AND.CONSTS(2) .NE. 0.00000, 1.00000, CONSTS(292)/CONSTS(296)) CONSTS(315) = 1.00000*10.0000 ** - 1.05000 CONSTS(316) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000.OR.CONSTS(1).EQ.6.00000, 1.00000, CONSTS(292)/CONSTS(296)) CONSTS(317) = 1.00000*10.0000 ** - 5.91000 CONSTS(318) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000.OR.CONSTS(1).EQ.6.00000, 1.00000, CONSTS(292)/CONSTS(296)) CONSTS(319) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000.OR.CONSTS(1).EQ.6.00000, 0.00000, 1.00000) CONSTS(320) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000.OR.CONSTS(1).EQ.6.00000, 1.00000+1.00000/CONSTS(247), 0.00000) CONSTS(321) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000.OR.CONSTS(1).EQ.6.00000, 1.00000+1.00000/CONSTS(247), 0.00000) RETURN END SUBROUTINE computeRates(VOI, CONSTS, RATES, STATES, ALGBRC) REAL VOI, CONSTS(*), RATES(*), STATES(*), ALGBRC(*) RATES(17) = CONSTS(321) RATES(8) = CONSTS(322) RATES(13) = CONSTS(323) RATES(2) = CONSTS(324) RATES(60) = CONSTS(325) RATES(54) = CONSTS(326) ALGBRC(2) = CONSTS(37)*CONSTS(42)*(STATES(45) - STATES(46)) RATES(46) = ALGBRC(2)/CONSTS(36) ALGBRC(3) = CONSTS(37)*CONSTS(171)*(STATES(52) - STATES(53)) RATES(53) = ALGBRC(3)/CONSTS(36) RATES(45) = ( - CONSTS(299)*ALGBRC(2))/CONSTS(247) RATES(52) = ( - CONSTS(300)*ALGBRC(3))/CONSTS(247) ALGBRC(14) = ( CONSTS(18)*( STATES(31)*STATES(25) - STATES(20)*STATES(30)))/( CONSTS(162)*CONSTS(165)*(2.00000+STATES(30)/CONSTS(164)+STATES(25)/CONSTS(165)+STATES(31)/CONSTS(162)+STATES(20)/CONSTS(163)+( STATES(30)*STATES(20))/( CONSTS(164)*CONSTS(163))+( STATES(25)*STATES(31))/( CONSTS(165)*CONSTS(162)))) ALGBRC(16) = CONSTS(37)*CONSTS(42)*(STATES(48) - STATES(31)) RATES(31) = (- ALGBRC(14)+ALGBRC(16))/CONSTS(36) RATES(48) = ( - CONSTS(310)*ALGBRC(16))/CONSTS(247) ALGBRC(19) = CONSTS(37)*CONSTS(40)*(STATES(41) - STATES(32)) RATES(41) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000.OR.CONSTS(1).EQ.6.00000, ( - CONSTS(304)*ALGBRC(19))/CONSTS(247), ( (- CONSTS(292)/CONSTS(296))*ALGBRC(19)+CONSTS(33))/CONSTS(247)) ALGBRC(21) = CONSTS(37)*CONSTS(42)*(STATES(42) - STATES(28)) RATES(42) = ( - CONSTS(306)*ALGBRC(21))/CONSTS(247) ALGBRC(23) = CONSTS(37)*CONSTS(42)*(STATES(43) - STATES(44)) RATES(43) = ( - CONSTS(308)*ALGBRC(23))/CONSTS(247) ALGBRC(25) = CONSTS(37)*CONSTS(42)*(STATES(47) - STATES(30)) RATES(47) = ( - CONSTS(314)*ALGBRC(25))/CONSTS(247) ALGBRC(27) = CONSTS(37)*CONSTS(42)*(STATES(49) - STATES(34)) RATES(49) = ( - CONSTS(312)*ALGBRC(27))/CONSTS(247) ALGBRC(29) = CONSTS(37)*CONSTS(42)*(STATES(50) - STATES(29)) RATES(50) = ( - CONSTS(316)*ALGBRC(29))/CONSTS(247) ALGBRC(31) = CONSTS(37)*CONSTS(42)*(STATES(51) - STATES(33)) RATES(51) = ( - CONSTS(318)*ALGBRC(31))/CONSTS(247) ALGBRC(20) = STATES(2) ALGBRC(24) = STATES(60) ALGBRC(26) = STATES(54) ALGBRC(28) = 1.00000+ALGBRC(20)/CONSTS(297)+ALGBRC(24)/CONSTS(301)+ALGBRC(26)/CONSTS(303) ALGBRC(30) = (( STATES(35)*ALGBRC(24))/CONSTS(301))/ALGBRC(28) ALGBRC(32) = 1.00000+ALGBRC(20)/CONSTS(305)+ALGBRC(24)/CONSTS(307)+ALGBRC(26)/CONSTS(309) ALGBRC(38) = (( STATES(37)*ALGBRC(24))/CONSTS(307))/ALGBRC(32) ALGBRC(22) = 1.00000+ALGBRC(20)/CONSTS(317) ALGBRC(34) = ( CONSTS(293)*ALGBRC(22)*ALGBRC(32))/( ALGBRC(20)*ALGBRC(28)) ALGBRC(36) = ( ALGBRC(34)*CONSTS(301)*ALGBRC(28))/( CONSTS(307)*ALGBRC(32)) ALGBRC(40) = ( (CONSTS(246)/( CONSTS(180)*CONSTS(183)))*( ALGBRC(30)*STATES(57) - ( STATES(58)*ALGBRC(38))/ALGBRC(36)))/(1.00000+ALGBRC(30)/CONSTS(179)+STATES(57)/CONSTS(180)+( ALGBRC(30)*STATES(57))/( CONSTS(180)*CONSTS(183))+STATES(58)/CONSTS(181)+ALGBRC(38)/CONSTS(182)+( STATES(58)*ALGBRC(38))/( CONSTS(182)*CONSTS(185))+( STATES(58)*STATES(57))/( CONSTS(187)*CONSTS(180))) RATES(57) = ( - CONSTS(320)*ALGBRC(40))/CONSTS(247) RATES(58) = ( CONSTS(321)*ALGBRC(40))/CONSTS(247) ALGBRC(18) = CONSTS(37)*CONSTS(41)*(STATES(39) - STATES(40)) ALGBRC(43) = 1.00000+ALGBRC(20)/CONSTS(311)+ALGBRC(24)/CONSTS(313)+ALGBRC(26)/CONSTS(315) ALGBRC(45) = ( CONSTS(177)*ALGBRC(28)*ALGBRC(43))/( ALGBRC(32)*ALGBRC(32)) ALGBRC(48) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, CONSTS(176)*( ALGBRC(45)*STATES(37)*STATES(37) - STATES(39)*STATES(35))) RATES(39) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000.OR.CONSTS(1).EQ.6.00000, 0.00000, ( (- CONSTS(292)/CONSTS(296))*ALGBRC(18)+ALGBRC(48))/CONSTS(247)) ALGBRC(15) = CONSTS(37)*CONSTS(41)*(STATES(35) - STATES(36)) ALGBRC(50) = CONSTS(50) - STATES(56) ALGBRC(52) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, CONSTS(178)*( (( CONSTS(294)*STATES(37))/ALGBRC(32))*STATES(56)*ALGBRC(20) - (STATES(35)/ALGBRC(28))*ALGBRC(50))) RATES(35) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000.OR.CONSTS(1).EQ.6.00000, ( - (1.00000+1.00000/CONSTS(247))*ALGBRC(40) - CONSTS(298)*ALGBRC(15))/CONSTS(247), (( - CONSTS(298)*ALGBRC(15)+ALGBRC(52)+ALGBRC(48)) - CONSTS(33))/CONSTS(247)) ALGBRC(17) = CONSTS(37)*CONSTS(41)*(STATES(37) - STATES(38)) RATES(37) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000.OR.CONSTS(1).EQ.6.00000, ( (1.00000+1.00000/CONSTS(247))*ALGBRC(40) - CONSTS(302)*ALGBRC(17))/CONSTS(247), ((( - CONSTS(302)*ALGBRC(17) - ALGBRC(52)) - ALGBRC(48))+CONSTS(33))/CONSTS(247)) RATES(56) = ( - CONSTS(319)*ALGBRC(52))/CONSTS(247) ALGBRC(37) = 1.00000+STATES(1)/CONSTS(297)+STATES(59)/CONSTS(301)+STATES(55)/CONSTS(303) ALGBRC(42) = 1.00000+STATES(1)/CONSTS(305)+STATES(59)/CONSTS(307)+STATES(55)/CONSTS(309) ALGBRC(61) = 1.00000+STATES(2)/CONSTS(305)+STATES(60)/CONSTS(307)+STATES(54)/CONSTS(309) ALGBRC(60) = 1.00000+STATES(2)/CONSTS(297)+STATES(60)/CONSTS(301)+STATES(54)/CONSTS(303) ALGBRC(64) = TERNRY(STATES(38).GT.CONSTS(172).AND.STATES(9).GT.CONSTS(172), (CONSTS(28)/(1.00000+(CONSTS(43)/STATES(38))/ALGBRC(61)))*((STATES(38)/ALGBRC(61))/(STATES(38)/ALGBRC(61)+ (STATES(36)/ALGBRC(60))*EXP(( (CONSTS(44) - 1.00000)*CONSTS(34)*STATES(3))/CONSTS(250)))+(STATES(10)/ALGBRC(42))/(STATES(10)/ALGBRC(42)+ (STATES(9)/ALGBRC(37))*EXP(( CONSTS(44)*CONSTS(34)*STATES(3))/CONSTS(250)))), 0.00000) ALGBRC(68) = 1.00000+STATES(2)/CONSTS(311)+STATES(60)/CONSTS(313)+STATES(54)/CONSTS(315) ALGBRC(70) = ( CONSTS(175)*ALGBRC(60)*ALGBRC(68))/( ALGBRC(61)*ALGBRC(61)) ALGBRC(74) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, CONSTS(174)*( ALGBRC(70)*STATES(38)*STATES(38) - STATES(40)*STATES(36))) RATES(36) = (ALGBRC(15)+ALGBRC(64)+ALGBRC(74))/CONSTS(36) RATES(38) = ((ALGBRC(17) - ALGBRC(64)) - 2.00000*ALGBRC(74))/CONSTS(36) RATES(40) = (ALGBRC(18)+ALGBRC(74))/CONSTS(36) ALGBRC(77) = 1.00000+STATES(1)/CONSTS(251)+STATES(59)/CONSTS(252)+STATES(55)/CONSTS(253) ALGBRC(9) = EXP(- (CONSTS(57) - CONSTS(39)*CONSTS(34)*STATES(3))/CONSTS(250)) ALGBRC(78) = ( ALGBRC(9)*STATES(2) ** CONSTS(39)*ALGBRC(37))/( STATES(1) ** CONSTS(39) - 1.00000*ALGBRC(42)*ALGBRC(77)*1.00000) ALGBRC(79) = CONSTS(27)*( ALGBRC(78)*STATES(10)*STATES(6) - STATES(9)) ALGBRC(51) = 1.00000+STATES(1)/CONSTS(311)+STATES(59)/CONSTS(313)+STATES(55)/CONSTS(315) ALGBRC(53) = ( STATES(17)*(1.00000+STATES(1)/CONSTS(311)))/ALGBRC(51) ALGBRC(57) = 1.00000+ALGBRC(53)/CONSTS(149) ALGBRC(58) = TERNRY(STATES(23).GT.CONSTS(150).AND.STATES(10).GT.CONSTS(150), ( (( CONSTS(13)*CONSTS(248))/ALGBRC(57))*STATES(23)*STATES(10))/( CONSTS(248)*CONSTS(146)*STATES(23)+ CONSTS(248)*CONSTS(145)*STATES(10)+( CONSTS(13)*CONSTS(148)*STATES(21))/CONSTS(140)+( CONSTS(13)*CONSTS(147)*STATES(9))/CONSTS(140)+ CONSTS(248)*STATES(23)*STATES(10)+( CONSTS(13)*CONSTS(148)*STATES(23)*STATES(21))/( CONSTS(140)*CONSTS(141))+( CONSTS(13)*STATES(21)*STATES(9))/CONSTS(140)+( CONSTS(248)*CONSTS(145)*STATES(10)*STATES(9))/CONSTS(144)), 0.00000) ALGBRC(59) = TERNRY(STATES(21).GT.CONSTS(150).AND.STATES(9).GT.CONSTS(150), ALGBRC(58) - (( (( CONSTS(13)*CONSTS(248))/ALGBRC(57))*STATES(21)*STATES(9))/CONSTS(140))/( CONSTS(248)*CONSTS(146)*STATES(23)+ CONSTS(248)*CONSTS(145)*STATES(10)+( CONSTS(13)*CONSTS(148)*STATES(21))/CONSTS(140)+( CONSTS(13)*CONSTS(147)*STATES(9))/CONSTS(140)+ CONSTS(248)*STATES(23)*STATES(10)+( CONSTS(13)*CONSTS(148)*STATES(23)*STATES(21))/( CONSTS(140)*CONSTS(141))+( CONSTS(13)*STATES(21)*STATES(9))/CONSTS(140)+( CONSTS(248)*CONSTS(145)*STATES(10)*STATES(9))/CONSTS(144)), ALGBRC(58)) RATES(9) = ((ALGBRC(59)+ALGBRC(79)) - ALGBRC(64))/CONSTS(35) RATES(10) = ((- ALGBRC(59) - ALGBRC(79))+ALGBRC(64))/CONSTS(35) ALGBRC(84) = 1.00000+STATES(1)/CONSTS(254) ALGBRC(99) = 1.00000+STATES(1)/CONSTS(261) ALGBRC(100) = 1.00000+STATES(1)/CONSTS(262)+STATES(59)/CONSTS(263)+STATES(55)/CONSTS(264) ALGBRC(67) = ALGBRC(37) ALGBRC(73) = ALGBRC(42) ALGBRC(101) = ( CONSTS(97)*ALGBRC(84)*ALGBRC(100)*ALGBRC(67))/( STATES(1)*ALGBRC(73)*ALGBRC(99)*ALGBRC(77)) ALGBRC(102) = ( CONSTS(9)*CONSTS(107)*CONSTS(102)*CONSTS(103))/( ALGBRC(101)*CONSTS(98)*CONSTS(99)*CONSTS(106)) ALGBRC(103) = ( CONSTS(9)*ALGBRC(102)*( STATES(21)*STATES(18)*STATES(6) - ( STATES(12)*STATES(22)*STATES(23))/ALGBRC(101)))/( ALGBRC(102)*CONSTS(98)*CONSTS(99)*CONSTS(107)+ ALGBRC(102)*CONSTS(99)*CONSTS(107)*STATES(21)+ ALGBRC(102)*CONSTS(98)*CONSTS(105)*STATES(6)+ ALGBRC(102)*CONSTS(107)*STATES(21)*STATES(18)+ ALGBRC(102)*CONSTS(105)*STATES(21)*STATES(6)+ ALGBRC(102)*CONSTS(104)*STATES(18)*STATES(6)+ ALGBRC(102)*STATES(21)*STATES(18)*STATES(6)+( CONSTS(9)*CONSTS(103)*CONSTS(108)*STATES(12))/ALGBRC(101)+( CONSTS(9)*CONSTS(102)*CONSTS(107)*STATES(23))/ALGBRC(101)+( CONSTS(9)*CONSTS(109)*STATES(12)*STATES(22))/ALGBRC(101)+( CONSTS(9)*CONSTS(108)*STATES(12)*STATES(23))/ALGBRC(101)+( CONSTS(9)*CONSTS(107)*STATES(22)*STATES(23))/ALGBRC(101)+( CONSTS(9)*STATES(12)*STATES(22)*STATES(23))/ALGBRC(101)+( CONSTS(9)*CONSTS(108)*CONSTS(103)*STATES(21)*STATES(12))/( CONSTS(98)*ALGBRC(101))+( ALGBRC(102)*CONSTS(98)*CONSTS(105)*STATES(6)*STATES(23))/CONSTS(103)+( CONSTS(9)*CONSTS(108)*CONSTS(103)*STATES(21)*STATES(18)*STATES(22))/( CONSTS(98)*CONSTS(99)*ALGBRC(101))+( ALGBRC(102)*CONSTS(104)*STATES(18)*STATES(6)*STATES(23))/CONSTS(103)+( CONSTS(9)*CONSTS(109)*STATES(21)*STATES(12)*STATES(22))/( CONSTS(98)*ALGBRC(101))+( ALGBRC(102)*CONSTS(98)*CONSTS(105)*STATES(6)*STATES(22)*STATES(23))/( CONSTS(102)*CONSTS(103))+( CONSTS(9)*CONSTS(103)*CONSTS(108)*STATES(21)*STATES(18)*STATES(6)*STATES(12))/( CONSTS(98)*CONSTS(99)*CONSTS(100)*ALGBRC(101))+( CONSTS(9)*CONSTS(101)*CONSTS(109)*STATES(21)*STATES(18)*STATES(6)*STATES(22))/( CONSTS(98)*CONSTS(99)*CONSTS(101)*ALGBRC(101))+( CONSTS(9)*CONSTS(109)*STATES(21)*STATES(18)*STATES(12)*STATES(22))/( CONSTS(98)*CONSTS(99)*ALGBRC(101))+( CONSTS(9)*CONSTS(104)*STATES(18)*STATES(6)*STATES(22)*STATES(23))/( CONSTS(102)*CONSTS(103))+( ALGBRC(102)*CONSTS(104)*CONSTS(101)*STATES(18)*STATES(12)*STATES(22)*STATES(23))/( CONSTS(101)*CONSTS(102)*CONSTS(103))+( ALGBRC(102)*CONSTS(98)*CONSTS(105)*STATES(6)*STATES(12)*STATES(22)*STATES(23))/( CONSTS(101)*CONSTS(102)*CONSTS(103))+( CONSTS(9)*CONSTS(109)*STATES(21)*STATES(18)*STATES(6)*STATES(12)*STATES(22))/( CONSTS(98)*CONSTS(99)*CONSTS(101)*ALGBRC(101))+( CONSTS(9)*CONSTS(104)*STATES(18)*STATES(6)*STATES(12)*STATES(22)*STATES(23))/( CONSTS(101)*CONSTS(102)*CONSTS(103))) RATES(23) = (ALGBRC(103) - ALGBRC(59))/CONSTS(35) RATES(21) = (- ALGBRC(103)+ALGBRC(59))/CONSTS(35) ALGBRC(86) = 1.00000+STATES(1)/CONSTS(256)+STATES(59)/CONSTS(257)+STATES(55)/CONSTS(258) ALGBRC(85) = 1.00000+STATES(59)/CONSTS(255) ALGBRC(87) = ( CONSTS(65)*ALGBRC(86))/( STATES(1)*STATES(1)*ALGBRC(85)) ALGBRC(88) = ( STATES(16)*(1.00000+STATES(1)/CONSTS(256)))/ALGBRC(86) ALGBRC(89) = 1.00000+ALGBRC(88)/CONSTS(69) ALGBRC(39) = ( STATES(9)*(1.00000+STATES(1)/CONSTS(297)))/ALGBRC(37) ALGBRC(44) = ( STATES(10)*(1.00000+STATES(1)/CONSTS(305)))/ALGBRC(42) ALGBRC(55) = 1.00000+ALGBRC(39)/CONSTS(70)+ALGBRC(44)/CONSTS(71)+ALGBRC(53)/CONSTS(72)+STATES(12)/CONSTS(73)+STATES(18)/CONSTS(74) ALGBRC(90) = ( CONSTS(4)*( STATES(14)*STATES(15) - ( STATES(12)*STATES(16))/ALGBRC(87)))/( CONSTS(68)*CONSTS(67)*ALGBRC(89)+ CONSTS(66)*ALGBRC(89)*STATES(14)+ CONSTS(67)*ALGBRC(55)*STATES(15)+ STATES(15)*STATES(14)) ALGBRC(95) = 1.00000+STATES(1)/CONSTS(259)+STATES(59)/CONSTS(260) ALGBRC(96) = ( CONSTS(75)*ALGBRC(95))/ALGBRC(86) ALGBRC(97) = ( CONSTS(5)*CONSTS(77))/( CONSTS(76)*ALGBRC(96)) ALGBRC(98) = ( CONSTS(5)*ALGBRC(97)*(STATES(16) - STATES(19)/ALGBRC(96)))/( CONSTS(76)*ALGBRC(97)+ ALGBRC(97)*STATES(16)+( CONSTS(5)*STATES(19))/ALGBRC(96)) ALGBRC(108) = 1.00000+STATES(1)/CONSTS(266)+STATES(59)/CONSTS(267)+STATES(55)/CONSTS(268) ALGBRC(92) = 1.00000+STATES(2)/CONSTS(256)+STATES(60)/CONSTS(257)+STATES(54)/CONSTS(258) ALGBRC(93) = (( STATES(44)*STATES(2))/CONSTS(256))/ALGBRC(92) ALGBRC(114) = 1.00000+STATES(2)/CONSTS(266)+STATES(60)/CONSTS(267)+STATES(54)/CONSTS(268) ALGBRC(91) = (( STATES(16)*STATES(1))/CONSTS(256))/ALGBRC(86) ALGBRC(115) = CONSTS(17)*(( ALGBRC(93)*STATES(25))/ALGBRC(108) - ( ALGBRC(91)*STATES(30))/ALGBRC(114)) RATES(16) = (- ALGBRC(98)+ALGBRC(115)+ALGBRC(90))/CONSTS(35) RATES(44) = (- ALGBRC(115)+ALGBRC(23))/CONSTS(36) ALGBRC(81) = 1.00000+STATES(2)/CONSTS(251)+STATES(60)/CONSTS(252)+STATES(54)/CONSTS(253) ALGBRC(116) = CONSTS(20)*(( (STATES(30)/ALGBRC(114))*STATES(6))/ALGBRC(77) - ( (STATES(25)/ALGBRC(108))*STATES(32))/ALGBRC(81)) ALGBRC(82) = (( STATES(32)*STATES(2))/CONSTS(251))/ALGBRC(81) ALGBRC(80) = (( STATES(6)*STATES(1))/CONSTS(251))/ALGBRC(77) ALGBRC(83) = ( CONSTS(29)*( ALGBRC(82)*STATES(2) - ALGBRC(80)*STATES(1)))/( CONSTS(30)*(1.00000+ALGBRC(82)/CONSTS(30))*(1.00000+ALGBRC(80)/CONSTS(30))) RATES(6) = (((- ALGBRC(103) - ALGBRC(79))+ALGBRC(83)) - ALGBRC(116))/CONSTS(35) RATES(32) = (- ALGBRC(83)+ALGBRC(19)+ALGBRC(116))/CONSTS(36) ALGBRC(104) = 1.00000+STATES(2)/CONSTS(262)+STATES(60)/CONSTS(263)+STATES(54)/CONSTS(264) ALGBRC(117) = CONSTS(19)*(( (STATES(34)/ALGBRC(104))*STATES(25))/ALGBRC(108) - ( (STATES(22)/ALGBRC(100))*STATES(30))/ALGBRC(114)) RATES(34) = (ALGBRC(27) - ALGBRC(117))/CONSTS(36) RATES(30) = (- ALGBRC(116)+ALGBRC(25)+ALGBRC(14)+ALGBRC(115)+ALGBRC(117))/CONSTS(36) ALGBRC(121) = 1.00000+STATES(59)/CONSTS(270) ALGBRC(123) = 1.00000+STATES(60)/CONSTS(270) ALGBRC(124) = CONSTS(15)*( (STATES(28)/ALGBRC(123))*STATES(2) - (STATES(11)/ALGBRC(121))*STATES(1)) RATES(28) = (- ALGBRC(124)+ALGBRC(21))/CONSTS(36) ALGBRC(128) = 1.00000+STATES(1)/CONSTS(273)+STATES(59)/CONSTS(274) ALGBRC(125) = 1.00000+STATES(1)/CONSTS(271)+STATES(59)/CONSTS(272) ALGBRC(129) = ( CONSTS(151)*ALGBRC(125)*ALGBRC(85))/ALGBRC(128) ALGBRC(130) = ( CONSTS(14)*CONSTS(159)*CONSTS(154))/( ALGBRC(129)*CONSTS(152)*CONSTS(157)) ALGBRC(13) = 1.00000+STATES(20)/CONSTS(160) ALGBRC(131) = TERNRY(STATES(26).GT.CONSTS(161).AND.STATES(20).GT.CONSTS(161), ( CONSTS(14)*ALGBRC(130)*STATES(26)*STATES(20))/( ALGBRC(130)*CONSTS(157)*STATES(26)+ ALGBRC(130)*CONSTS(156)*ALGBRC(13)*STATES(20)+( CONSTS(14)*CONSTS(159)*ALGBRC(13)*STATES(15))/ALGBRC(129)+( CONSTS(14)*CONSTS(158)*STATES(27))/ALGBRC(129)+ ALGBRC(130)*STATES(26)*STATES(20)+( CONSTS(14)*CONSTS(159)*STATES(26)*STATES(15))/( ALGBRC(129)*CONSTS(152))+( CONSTS(14)*STATES(15)*STATES(27))/ALGBRC(129)+( ALGBRC(130)*CONSTS(156)*STATES(20)*STATES(27))/CONSTS(155)), 0.00000) ALGBRC(132) = TERNRY(STATES(15).GT.CONSTS(161).AND.STATES(27).GT.CONSTS(161), ALGBRC(131) - (( CONSTS(14)*ALGBRC(130)*STATES(15)*STATES(27))/ALGBRC(129))/( ALGBRC(130)*CONSTS(157)*STATES(26)+ ALGBRC(130)*CONSTS(156)*ALGBRC(13)*STATES(20)+( CONSTS(14)*CONSTS(159)*ALGBRC(13)*STATES(15))/ALGBRC(129)+( CONSTS(14)*CONSTS(158)*STATES(27))/ALGBRC(129)+ ALGBRC(130)*STATES(26)*STATES(20)+( CONSTS(14)*CONSTS(159)*STATES(26)*STATES(15))/( ALGBRC(129)*CONSTS(152))+( CONSTS(14)*STATES(15)*STATES(27))/ALGBRC(129)+( ALGBRC(130)*CONSTS(156)*STATES(20)*STATES(27))/CONSTS(155)), ALGBRC(131)) ALGBRC(126) = 1.00000+STATES(2)/CONSTS(271)+STATES(60)/CONSTS(272) ALGBRC(127) = CONSTS(16)*( (STATES(29)/ALGBRC(126))*STATES(2) - (STATES(27)/ALGBRC(125))*STATES(1)) ALGBRC(133) = 1.00000+STATES(2)/CONSTS(273)+STATES(60)/CONSTS(274) ALGBRC(134) = ( EXP(( - CONSTS(34)*STATES(3))/CONSTS(250))*ALGBRC(128)*ALGBRC(126))/( ALGBRC(133)*ALGBRC(125)) ALGBRC(135) = ( CONSTS(21)*( ALGBRC(134)*STATES(33)*STATES(27)*STATES(1) - STATES(26)*STATES(29)*STATES(2)))/( ALGBRC(134)*CONSTS(166)*CONSTS(169)*CONSTS(249)*( 2.00000*CONSTS(170)+( CONSTS(170)*STATES(33))/CONSTS(166)+( STATES(33)*STATES(27)*STATES(1))/( CONSTS(166)*CONSTS(169)*CONSTS(249))+( CONSTS(170)*STATES(26)*STATES(2))/( CONSTS(167)*CONSTS(249))+( STATES(26)*STATES(29)*STATES(2))/( CONSTS(167)*CONSTS(168)*CONSTS(249))+( CONSTS(170)*STATES(26))/CONSTS(167)+( CONSTS(170)*STATES(33)*STATES(1))/( CONSTS(166)*CONSTS(249))+( CONSTS(170)*STATES(1))/CONSTS(249)+( CONSTS(170)*STATES(29)*STATES(2))/( CONSTS(168)*CONSTS(249))+( CONSTS(170)*STATES(2))/CONSTS(249)+( CONSTS(170)*STATES(27)*STATES(1))/( CONSTS(169)*CONSTS(249)))) RATES(27) = ((ALGBRC(132)+ALGBRC(127)) - ALGBRC(135))/CONSTS(35) RATES(26) = (- ALGBRC(132)+ALGBRC(135))/CONSTS(35) RATES(29) = (- ALGBRC(127)+ALGBRC(135)+ALGBRC(29))/CONSTS(36) RATES(33) = (- ALGBRC(135)+ALGBRC(31))/CONSTS(36) ALGBRC(144) = TERNRY(STATES(4).GT.CONSTS(46), 0.00000, CONSTS(46) - STATES(4)) ALGBRC(118) = 1.00000+STATES(1)/CONSTS(269) ALGBRC(122) = ( CONSTS(58)*ALGBRC(118))/( STATES(1)*ALGBRC(121)*ALGBRC(84)) ALGBRC(10) = 1.00000+STATES(14)/CONSTS(62) ALGBRC(11) = 1.00000+STATES(4)/CONSTS(63) ALGBRC(145) = TERNRY(STATES(11).GT.CONSTS(64).AND.STATES(12).GT.CONSTS(64).AND.ALGBRC(144).GT.CONSTS(64), ( CONSTS(3)*( STATES(11)*STATES(12)*ALGBRC(144) - ( STATES(13)*STATES(14)*STATES(4))/ALGBRC(122)))/( CONSTS(61)*ALGBRC(11)*STATES(11)*STATES(12)+ CONSTS(60)*ALGBRC(10)*STATES(11)*ALGBRC(144)+ CONSTS(59)*STATES(12)*ALGBRC(144)+ STATES(11)*STATES(12)*ALGBRC(144)), 0.00000) RATES(11) = (- ALGBRC(145)+ALGBRC(124))/CONSTS(35) RATES(14) = (ALGBRC(145) - ALGBRC(90))/CONSTS(35) ALGBRC(119) = ( CONSTS(78)*ALGBRC(118))/( STATES(1)*STATES(1)*ALGBRC(95)) ALGBRC(47) = 1.00000+ (CONSTS(85)/ALGBRC(44))*(1.00000+ALGBRC(39)/CONSTS(84)) ALGBRC(146) = TERNRY(ALGBRC(144).GT.CONSTS(86).AND.STATES(19).GT.CONSTS(86), ( CONSTS(6)*(1.00000 - ( STATES(13)*STATES(20)*STATES(4))/( ALGBRC(119)*ALGBRC(144)*STATES(19))))/(1.00000+ CONSTS(80)/STATES(19) ** CONSTS(83)*ALGBRC(47)+ (CONSTS(79)/ALGBRC(144))*(1.00000+ CONSTS(81)/STATES(19) ** CONSTS(83)*ALGBRC(47)+( STATES(4)*ALGBRC(47))/CONSTS(82))), 0.00000) RATES(19) = (ALGBRC(98) - ALGBRC(146))/CONSTS(35) ALGBRC(120) = ( CONSTS(87)*ALGBRC(118)*ALGBRC(99))/( STATES(1)*ALGBRC(84)) ALGBRC(49) = 1.00000+ (CONSTS(95)/ALGBRC(44))*(1.00000+ALGBRC(39)/CONSTS(94)) ALGBRC(147) = TERNRY(STATES(20).GT.CONSTS(96).AND.STATES(12).GT.CONSTS(96).AND.ALGBRC(144).GT.CONSTS(96), (( CONSTS(7)*(1.00000 - ( STATES(13)*STATES(18)*STATES(4))/( ALGBRC(120)*STATES(20)*STATES(12)*ALGBRC(144))))/(1.00000+ (CONSTS(88)/STATES(20))*ALGBRC(49)+ (CONSTS(89)/STATES(12))*(1.00000+STATES(18)/CONSTS(91))+ (CONSTS(90)/ALGBRC(144))*(1.00000+STATES(4)/CONSTS(92))))/(1.00000+STATES(4)/CONSTS(93)), 0.00000) RATES(20) = (((ALGBRC(146) - ALGBRC(147)) - ALGBRC(132))+ALGBRC(14))/CONSTS(35) RATES(18) = (ALGBRC(147) - ALGBRC(103))/CONSTS(35) RATES(12) = ((- ALGBRC(145) - ALGBRC(147))+ALGBRC(103)+ALGBRC(90))/CONSTS(35) ALGBRC(105) = 1.00000+STATES(1)/CONSTS(265) ALGBRC(109) = ( CONSTS(120)*ALGBRC(108))/ALGBRC(105) ALGBRC(110) = ( CONSTS(11)*CONSTS(122))/( ALGBRC(109)*CONSTS(121)) ALGBRC(69) = ALGBRC(39) ALGBRC(75) = ALGBRC(44) ALGBRC(76) = 1.00000+STATES(16)/CONSTS(123)+ALGBRC(39)/CONSTS(124)+ALGBRC(44)/CONSTS(125)+ALGBRC(69)/CONSTS(126)+ALGBRC(75)/CONSTS(127) ALGBRC(111) = ( ALGBRC(110)*CONSTS(11)*(STATES(24) - STATES(25)/ALGBRC(109)))/( CONSTS(121)*ALGBRC(110)*ALGBRC(76)+ ALGBRC(110)*STATES(24)+( CONSTS(11)*STATES(25))/ALGBRC(109)) ALGBRC(112) = ( CONSTS(128)*ALGBRC(85))/( STATES(1)*ALGBRC(108)) ALGBRC(113) = ( CONSTS(12)*CONSTS(132)*CONSTS(135))/( ALGBRC(112)*CONSTS(129)*CONSTS(134)) ALGBRC(56) = 1.00000+ALGBRC(39)/CONSTS(137)+ALGBRC(44)/CONSTS(138)+ALGBRC(53)/CONSTS(139) ALGBRC(148) = ( CONSTS(12)*ALGBRC(113)*( ALGBRC(144)*STATES(25) - ( STATES(15)*STATES(4))/ALGBRC(112)))/( ALGBRC(113)*CONSTS(129)*CONSTS(134)*ALGBRC(56)+ ALGBRC(113)*CONSTS(134)*ALGBRC(144)+ ALGBRC(113)*CONSTS(133)*ALGBRC(56)*STATES(25)+( CONSTS(12)*CONSTS(136)*ALGBRC(56)*STATES(15))/ALGBRC(112)+( CONSTS(12)*CONSTS(135)*STATES(4))/ALGBRC(112)+ ALGBRC(113)*ALGBRC(144)*STATES(25)+( CONSTS(12)*CONSTS(136)*ALGBRC(144)*STATES(15))/( ALGBRC(112)*CONSTS(129))+( CONSTS(12)*STATES(15)*STATES(4))/ALGBRC(112)+( ALGBRC(113)*CONSTS(133)*STATES(25)*STATES(4))/CONSTS(132)+( ALGBRC(113)*ALGBRC(144)*STATES(25)*STATES(15))/CONSTS(131)+( CONSTS(12)*STATES(25)*STATES(15)*STATES(4))/( CONSTS(130)*ALGBRC(112))) RATES(25) = (((((ALGBRC(111) - ALGBRC(148))+ALGBRC(116)) - ALGBRC(14)) - ALGBRC(115)) - ALGBRC(117))/CONSTS(35) RATES(15) = (- ALGBRC(90)+ALGBRC(148)+ALGBRC(132))/CONSTS(35) ALGBRC(1) = EXP(- (CONSTS(54)+ 4.00000*CONSTS(34)*STATES(3))/CONSTS(250)) ALGBRC(4) = (( ALGBRC(1)*STATES(1) ** 5.00000)/STATES(2) ** 4.00000)/1.00000 ALGBRC(157) = CONSTS(47) - STATES(5) ALGBRC(158) = CONSTS(22)*( ALGBRC(4)*STATES(4)*ALGBRC(157) - ALGBRC(144)*STATES(5)) RATES(4) = ((ALGBRC(145)+ALGBRC(146)+ALGBRC(147)+ALGBRC(148)) - ALGBRC(158))/CONSTS(35) ALGBRC(106) = ( CONSTS(110)*ALGBRC(105))/ALGBRC(100) ALGBRC(107) = ( CONSTS(10)*CONSTS(115)*CONSTS(112))/( ALGBRC(106)*CONSTS(111)*CONSTS(114)) ALGBRC(12) = (1.00000+STATES(15)/CONSTS(117)+STATES(22)/CONSTS(118)+STATES(24)/CONSTS(119))/(1.00000+STATES(22)/CONSTS(118)+STATES(24)/CONSTS(119)) ALGBRC(159) = ( CONSTS(10)*ALGBRC(107)*( STATES(22)*ALGBRC(157) - ( STATES(5)*STATES(24))/ALGBRC(106)))/( ALGBRC(107)*CONSTS(111)*CONSTS(114)*ALGBRC(12)+ ALGBRC(107)*CONSTS(114)*STATES(22)+ ALGBRC(107)*CONSTS(113)*ALGBRC(12)*ALGBRC(157)+( CONSTS(10)*CONSTS(116)*ALGBRC(12)*STATES(5))/ALGBRC(106)+( CONSTS(10)*CONSTS(115)*STATES(24))/ALGBRC(106)+ ALGBRC(107)*STATES(22)*ALGBRC(157)+( CONSTS(10)*CONSTS(116)*STATES(22)*STATES(5))/( ALGBRC(106)*CONSTS(111))+( ALGBRC(107)*CONSTS(113)*ALGBRC(157)*STATES(24))/CONSTS(112)+( CONSTS(10)*STATES(5)*STATES(24))/ALGBRC(106)) RATES(22) = ((ALGBRC(103) - ALGBRC(159))+ALGBRC(117))/CONSTS(35) RATES(24) = (ALGBRC(159) - ALGBRC(111))/CONSTS(35) ALGBRC(5) = EXP(- (CONSTS(55)+ 2.00000*CONSTS(34)*STATES(3))/CONSTS(250)) ALGBRC(6) = ( 1.00000*1.00000*ALGBRC(5)*STATES(1) ** 2.00000)/STATES(2) ** 4.00000 ALGBRC(164) = CONSTS(48) - STATES(7) ALGBRC(165) = (( CONSTS(23)*(1.00000+STATES(6)/CONSTS(24)))/(1.00000+STATES(6)/CONSTS(25)))*( ALGBRC(6) ** 0.500000*ALGBRC(164)*STATES(5) ** 0.500000 - STATES(7)*ALGBRC(157) ** 0.500000) RATES(5) = ((ALGBRC(159)+ALGBRC(158)) - ALGBRC(165))/CONSTS(35) ALGBRC(7) = EXP(- (CONSTS(56)+ 4.00000*CONSTS(34)*STATES(3))/CONSTS(250)) ALGBRC(8) = (( ALGBRC(7)*STATES(1) ** 4.00000)/STATES(2) ** 2.00000)/( 1.00000*1.00000) ALGBRC(166) = (( (( CONSTS(26)*STATES(8))/(STATES(8)+CONSTS(45)))*EXP(( CONSTS(34)*STATES(3))/CONSTS(250))*STATES(7))/CONSTS(48))*( ALGBRC(8) ** 1.00000/2.00000*STATES(7)*STATES(8) ** 1.00000/4.00000 - ALGBRC(164)) ALGBRC(33) = TERNRY(ABS(STATES(3)).GT.CONSTS(173), ( CONSTS(32)*STATES(3)*( STATES(2)*EXP(( CONSTS(34)*STATES(3))/CONSTS(250)) - STATES(1)))/(EXP(( CONSTS(34)*STATES(3))/CONSTS(250)) - 1.00000), ( CONSTS(32)*CONSTS(250)*(STATES(2) - STATES(1)))/CONSTS(34)) RATES(3) = ((((( 4.00000*ALGBRC(158)+ 2.00000*ALGBRC(165)+ 4.00000*ALGBRC(166)) - CONSTS(39)*ALGBRC(79)) - ALGBRC(64)) - ALGBRC(33))+ALGBRC(135))/CONSTS(53) RATES(7) = ( 2.00000*ALGBRC(165) - 2.00000*ALGBRC(166))/CONSTS(36) ALGBRC(169) = - (( STATES(1)*STATES(1))/( CONSTS(230)*CONSTS(231)*CONSTS(284) ** 2.00000)+( STATES(1)*STATES(9))/( CONSTS(297)*CONSTS(301)*ALGBRC(37) ** 2.00000)+( STATES(1)*STATES(10))/( CONSTS(305)*CONSTS(307)*ALGBRC(42) ** 2.00000)+( STATES(1)*STATES(17))/( CONSTS(311)*CONSTS(313)*ALGBRC(51) ** 2.00000)+( STATES(1)*STATES(23))/( CONSTS(297)*CONSTS(301)*ALGBRC(67) ** 2.00000)+( STATES(1)*STATES(21))/( CONSTS(305)*CONSTS(307)*ALGBRC(73) ** 2.00000)+( STATES(1)*STATES(6))/( CONSTS(251)*CONSTS(252)*ALGBRC(77) ** 2.00000)+( STATES(1)*STATES(4))/( CONSTS(206)*CONSTS(207)*CONSTS(276) ** 2.00000)+( STATES(1)*ALGBRC(144))/( CONSTS(203)*CONSTS(204)*CONSTS(275) ** 2.00000)+( STATES(1)*STATES(5))/( CONSTS(209)*CONSTS(210)*CONSTS(277) ** 2.00000)+( STATES(1)*ALGBRC(157))/( CONSTS(212)*CONSTS(213)*CONSTS(278) ** 2.00000)+( STATES(1)*STATES(11))/( CONSTS(199)*CONSTS(270)*ALGBRC(121) ** 2.00000)+( STATES(1)*STATES(15))/( CONSTS(190)*CONSTS(255)*ALGBRC(85) ** 2.00000)+( STATES(1)*STATES(14))/( CONSTS(215)*CONSTS(216)*CONSTS(279) ** 2.00000)+( STATES(1)*STATES(16))/( CONSTS(256)*CONSTS(257)*ALGBRC(86) ** 2.00000)+( STATES(1)*STATES(19))/( CONSTS(259)*CONSTS(260)*ALGBRC(95) ** 2.00000)+( STATES(1)*STATES(20))/( CONSTS(218)*CONSTS(219)*CONSTS(280) ** 2.00000)+( STATES(1)*STATES(18))/( CONSTS(261)*CONSTS(193)*ALGBRC(99) ** 2.00000)+( STATES(1)*STATES(12))/( CONSTS(254)*CONSTS(188)*ALGBRC(84) ** 2.00000)+( STATES(1)*STATES(22))/( CONSTS(262)*CONSTS(263)*ALGBRC(100) ** 2.00000)+( STATES(1)*STATES(24))/( CONSTS(265)*CONSTS(195)*ALGBRC(105) ** 2.00000)+( STATES(1)*STATES(25))/( CONSTS(266)*CONSTS(267)*ALGBRC(108) ** 2.00000)+( STATES(1)*STATES(27))/( CONSTS(271)*CONSTS(272)*ALGBRC(125) ** 2.00000)+( STATES(1)*STATES(26))/( CONSTS(273)*CONSTS(274)*ALGBRC(128) ** 2.00000)+( STATES(1)*STATES(55))/( CONSTS(236)*CONSTS(237)*CONSTS(286) ** 2.00000)+( STATES(1)*STATES(59))/( CONSTS(233)*CONSTS(234)*CONSTS(285) ** 2.00000)+( STATES(1)*STATES(8))/( CONSTS(221)*CONSTS(222)*CONSTS(281) ** 2.00000)+( STATES(1)*CONSTS(295))/( CONSTS(224)*CONSTS(225)*CONSTS(282) ** 2.00000)+( STATES(1)*CONSTS(287))/( CONSTS(227)*CONSTS(228)*CONSTS(283) ** 2.00000)+( STATES(1)*STATES(13))/( CONSTS(269)*CONSTS(197)*ALGBRC(118) ** 2.00000)) ALGBRC(170) = - (( STATES(1)*STATES(1))/( CONSTS(230)*CONSTS(232)*CONSTS(284) ** 2.00000)+( STATES(1)*STATES(9))/( CONSTS(297)*CONSTS(303)*ALGBRC(37) ** 2.00000)+( STATES(1)*STATES(10))/( CONSTS(305)*CONSTS(309)*ALGBRC(42) ** 2.00000)+( STATES(1)*STATES(17))/( CONSTS(311)*CONSTS(315)*ALGBRC(51) ** 2.00000)+( STATES(1)*STATES(23))/( CONSTS(297)*CONSTS(303)*ALGBRC(67) ** 2.00000)+( STATES(1)*STATES(21))/( CONSTS(305)*CONSTS(309)*ALGBRC(73) ** 2.00000)+( STATES(1)*STATES(6))/( CONSTS(251)*CONSTS(253)*ALGBRC(77) ** 2.00000)+( STATES(1)*STATES(4))/( CONSTS(206)*CONSTS(208)*CONSTS(276) ** 2.00000)+( STATES(1)*ALGBRC(144))/( CONSTS(203)*CONSTS(205)*CONSTS(275) ** 2.00000)+( STATES(1)*STATES(5))/( CONSTS(209)*CONSTS(211)*CONSTS(277) ** 2.00000)+( STATES(1)*ALGBRC(157))/( CONSTS(212)*CONSTS(214)*CONSTS(278) ** 2.00000)+( STATES(1)*STATES(11))/( CONSTS(199)*CONSTS(200)*ALGBRC(121) ** 2.00000)+( STATES(1)*STATES(15))/( CONSTS(190)*CONSTS(191)*ALGBRC(85) ** 2.00000)+( STATES(1)*STATES(14))/( CONSTS(215)*CONSTS(217)*CONSTS(279) ** 2.00000)+( STATES(1)*STATES(16))/( CONSTS(256)*CONSTS(258)*ALGBRC(86) ** 2.00000)+( STATES(1)*STATES(19))/( CONSTS(259)*CONSTS(192)*ALGBRC(95) ** 2.00000)+( STATES(1)*STATES(20))/( CONSTS(218)*CONSTS(220)*CONSTS(280) ** 2.00000)+( STATES(1)*STATES(18))/( CONSTS(261)*CONSTS(194)*ALGBRC(99) ** 2.00000)+( STATES(1)*STATES(12))/( CONSTS(254)*CONSTS(189)*ALGBRC(84) ** 2.00000)+( STATES(1)*STATES(22))/( CONSTS(262)*CONSTS(264)*ALGBRC(100) ** 2.00000)+( STATES(1)*STATES(24))/( CONSTS(265)*CONSTS(196)*ALGBRC(105) ** 2.00000)+( STATES(1)*STATES(25))/( CONSTS(266)*CONSTS(268)*ALGBRC(108) ** 2.00000)+( STATES(1)*STATES(27))/( CONSTS(271)*CONSTS(201)*ALGBRC(125) ** 2.00000)+( STATES(1)*STATES(26))/( CONSTS(273)*CONSTS(202)*ALGBRC(128) ** 2.00000)+( STATES(1)*STATES(55))/( CONSTS(236)*CONSTS(238)*CONSTS(286) ** 2.00000)+( STATES(1)*STATES(59))/( CONSTS(233)*CONSTS(235)*CONSTS(285) ** 2.00000)+( STATES(1)*STATES(8))/( CONSTS(221)*CONSTS(223)*CONSTS(281) ** 2.00000)+( STATES(1)*CONSTS(295))/( CONSTS(224)*CONSTS(226)*CONSTS(282) ** 2.00000)+( STATES(1)*CONSTS(287))/( CONSTS(227)*CONSTS(229)*CONSTS(283) ** 2.00000)+( STATES(1)*STATES(13))/( CONSTS(269)*CONSTS(198)*ALGBRC(118) ** 2.00000)) ALGBRC(173) = - (( STATES(59)*STATES(1))/( CONSTS(231)*CONSTS(232)*CONSTS(284) ** 2.00000)+( STATES(59)*STATES(9))/( CONSTS(301)*CONSTS(303)*ALGBRC(37) ** 2.00000)+( STATES(59)*STATES(10))/( CONSTS(307)*CONSTS(309)*ALGBRC(42) ** 2.00000)+( STATES(59)*STATES(17))/( CONSTS(313)*CONSTS(315)*ALGBRC(51) ** 2.00000)+( STATES(59)*STATES(23))/( CONSTS(301)*CONSTS(303)*ALGBRC(67) ** 2.00000)+( STATES(59)*STATES(21))/( CONSTS(307)*CONSTS(309)*ALGBRC(73) ** 2.00000)+( STATES(59)*STATES(6))/( CONSTS(252)*CONSTS(253)*ALGBRC(77) ** 2.00000)+( STATES(59)*STATES(4))/( CONSTS(207)*CONSTS(208)*CONSTS(276) ** 2.00000)+( STATES(59)*ALGBRC(144))/( CONSTS(204)*CONSTS(205)*CONSTS(275) ** 2.00000)+( STATES(59)*STATES(5))/( CONSTS(210)*CONSTS(211)*CONSTS(277) ** 2.00000)+( STATES(59)*ALGBRC(157))/( CONSTS(213)*CONSTS(214)*CONSTS(278) ** 2.00000)+( STATES(59)*STATES(11))/( CONSTS(270)*CONSTS(200)*ALGBRC(121) ** 2.00000)+( STATES(59)*STATES(15))/( CONSTS(255)*CONSTS(191)*ALGBRC(85) ** 2.00000)+( STATES(59)*STATES(14))/( CONSTS(216)*CONSTS(217)*CONSTS(279) ** 2.00000)+( STATES(59)*STATES(16))/( CONSTS(257)*CONSTS(258)*ALGBRC(86) ** 2.00000)+( STATES(59)*STATES(19))/( CONSTS(260)*CONSTS(192)*ALGBRC(95) ** 2.00000)+( STATES(59)*STATES(20))/( CONSTS(219)*CONSTS(220)*CONSTS(280) ** 2.00000)+( STATES(59)*STATES(18))/( CONSTS(193)*CONSTS(194)*ALGBRC(99) ** 2.00000)+( STATES(59)*STATES(12))/( CONSTS(188)*CONSTS(189)*ALGBRC(84) ** 2.00000)+( STATES(59)*STATES(22))/( CONSTS(263)*CONSTS(264)*ALGBRC(100) ** 2.00000)+( STATES(59)*STATES(24))/( CONSTS(195)*CONSTS(196)*ALGBRC(105) ** 2.00000)+( STATES(59)*STATES(25))/( CONSTS(267)*CONSTS(268)*ALGBRC(108) ** 2.00000)+( STATES(59)*STATES(27))/( CONSTS(272)*CONSTS(201)*ALGBRC(125) ** 2.00000)+( STATES(59)*STATES(26))/( CONSTS(274)*CONSTS(202)*ALGBRC(128) ** 2.00000)+( STATES(59)*STATES(55))/( CONSTS(237)*CONSTS(238)*CONSTS(286) ** 2.00000)+( STATES(59)*STATES(59))/( CONSTS(234)*CONSTS(235)*CONSTS(285) ** 2.00000)+( STATES(59)*STATES(8))/( CONSTS(222)*CONSTS(223)*CONSTS(281) ** 2.00000)+( STATES(59)*CONSTS(295))/( CONSTS(225)*CONSTS(226)*CONSTS(282) ** 2.00000)+( STATES(59)*CONSTS(287))/( CONSTS(228)*CONSTS(229)*CONSTS(283) ** 2.00000)+( STATES(59)*STATES(13))/( CONSTS(197)*CONSTS(198)*ALGBRC(118) ** 2.00000)) ALGBRC(176) = - (( STATES(55)*STATES(1))/( CONSTS(232)*CONSTS(231)*CONSTS(284) ** 2.00000)+( STATES(55)*STATES(9))/( CONSTS(303)*CONSTS(301)*ALGBRC(37) ** 2.00000)+( STATES(55)*STATES(10))/( CONSTS(309)*CONSTS(307)*ALGBRC(42) ** 2.00000)+( STATES(55)*STATES(17))/( CONSTS(315)*CONSTS(313)*ALGBRC(51) ** 2.00000)+( STATES(55)*STATES(23))/( CONSTS(303)*CONSTS(301)*ALGBRC(67) ** 2.00000)+( STATES(55)*STATES(21))/( CONSTS(309)*CONSTS(307)*ALGBRC(73) ** 2.00000)+( STATES(55)*STATES(6))/( CONSTS(253)*CONSTS(252)*ALGBRC(77) ** 2.00000)+( STATES(55)*STATES(4))/( CONSTS(208)*CONSTS(207)*CONSTS(276) ** 2.00000)+( STATES(55)*ALGBRC(144))/( CONSTS(205)*CONSTS(204)*CONSTS(275) ** 2.00000)+( STATES(55)*STATES(5))/( CONSTS(211)*CONSTS(210)*CONSTS(277) ** 2.00000)+( STATES(55)*ALGBRC(157))/( CONSTS(214)*CONSTS(213)*CONSTS(278) ** 2.00000)+( STATES(55)*STATES(11))/( CONSTS(200)*CONSTS(270)*ALGBRC(121) ** 2.00000)+( STATES(55)*STATES(15))/( CONSTS(191)*CONSTS(255)*ALGBRC(85) ** 2.00000)+( STATES(55)*STATES(14))/( CONSTS(217)*CONSTS(216)*CONSTS(279) ** 2.00000)+( STATES(55)*STATES(16))/( CONSTS(258)*CONSTS(257)*ALGBRC(86) ** 2.00000)+( STATES(55)*STATES(19))/( CONSTS(192)*CONSTS(260)*ALGBRC(95) ** 2.00000)+( STATES(55)*STATES(20))/( CONSTS(220)*CONSTS(219)*CONSTS(280) ** 2.00000)+( STATES(55)*STATES(18))/( CONSTS(194)*CONSTS(193)*ALGBRC(99) ** 2.00000)+( STATES(55)*STATES(12))/( CONSTS(189)*CONSTS(188)*ALGBRC(84) ** 2.00000)+( STATES(55)*STATES(22))/( CONSTS(264)*CONSTS(263)*ALGBRC(100) ** 2.00000)+( STATES(55)*STATES(24))/( CONSTS(196)*CONSTS(195)*ALGBRC(105) ** 2.00000)+( STATES(55)*STATES(25))/( CONSTS(268)*CONSTS(267)*ALGBRC(108) ** 2.00000)+( STATES(55)*STATES(27))/( CONSTS(201)*CONSTS(272)*ALGBRC(125) ** 2.00000)+( STATES(55)*STATES(26))/( CONSTS(202)*CONSTS(274)*ALGBRC(128) ** 2.00000)+( STATES(55)*STATES(55))/( CONSTS(238)*CONSTS(237)*CONSTS(286) ** 2.00000)+( STATES(55)*STATES(59))/( CONSTS(235)*CONSTS(234)*CONSTS(285) ** 2.00000)+( STATES(55)*STATES(8))/( CONSTS(223)*CONSTS(222)*CONSTS(281) ** 2.00000)+( STATES(55)*CONSTS(295))/( CONSTS(226)*CONSTS(225)*CONSTS(282) ** 2.00000)+( STATES(55)*CONSTS(287))/( CONSTS(229)*CONSTS(228)*CONSTS(283) ** 2.00000)+( STATES(55)*STATES(13))/( CONSTS(198)*CONSTS(197)*ALGBRC(118) ** 2.00000)) ALGBRC(177) = ( (1.00000+STATES(1)/CONSTS(230)+STATES(59)/CONSTS(231))*STATES(1))/( CONSTS(232)*CONSTS(284) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(297)+STATES(59)/CONSTS(301))*STATES(9))/( CONSTS(303)*ALGBRC(37) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(305)+STATES(59)/CONSTS(307))*STATES(10))/( CONSTS(309)*ALGBRC(42) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(311)+STATES(59)/CONSTS(313))*STATES(17))/( CONSTS(315)*ALGBRC(51) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(297)+STATES(59)/CONSTS(301))*STATES(23))/( CONSTS(303)*ALGBRC(67) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(305)+STATES(59)/CONSTS(307))*STATES(21))/( CONSTS(309)*ALGBRC(73) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(251)+STATES(59)/CONSTS(252))*STATES(6))/( CONSTS(253)*ALGBRC(77) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(206)+STATES(59)/CONSTS(207))*STATES(4))/( CONSTS(208)*CONSTS(276) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(203)+STATES(59)/CONSTS(204))*ALGBRC(144))/( CONSTS(205)*CONSTS(275) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(209)+STATES(59)/CONSTS(210))*STATES(5))/( CONSTS(211)*CONSTS(277) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(212)+STATES(59)/CONSTS(213))*ALGBRC(157))/( CONSTS(214)*CONSTS(278) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(199)+STATES(59)/CONSTS(270))*STATES(11))/( CONSTS(200)*ALGBRC(121) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(190)+STATES(59)/CONSTS(255))*STATES(15))/( CONSTS(191)*ALGBRC(85) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(215)+STATES(59)/CONSTS(216))*STATES(14))/( CONSTS(217)*CONSTS(279) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(256)+STATES(59)/CONSTS(257))*STATES(16))/( CONSTS(258)*ALGBRC(86) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(259)+STATES(59)/CONSTS(260))*STATES(19))/( CONSTS(192)*ALGBRC(95) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(218)+STATES(59)/CONSTS(219))*STATES(20))/( CONSTS(220)*CONSTS(280) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(261)+STATES(59)/CONSTS(193))*STATES(18))/( CONSTS(194)*ALGBRC(99) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(254)+STATES(59)/CONSTS(188))*STATES(12))/( CONSTS(189)*ALGBRC(84) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(262)+STATES(59)/CONSTS(263))*STATES(22))/( CONSTS(264)*ALGBRC(100) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(265)+STATES(59)/CONSTS(195))*STATES(24))/( CONSTS(196)*ALGBRC(105) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(266)+STATES(59)/CONSTS(267))*STATES(25))/( CONSTS(268)*ALGBRC(108) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(271)+STATES(59)/CONSTS(272))*STATES(27))/( CONSTS(201)*ALGBRC(125) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(273)+STATES(59)/CONSTS(274))*STATES(26))/( CONSTS(202)*ALGBRC(128) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(236)+STATES(59)/CONSTS(237))*STATES(55))/( CONSTS(238)*CONSTS(286) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(233)+STATES(59)/CONSTS(234))*STATES(59))/( CONSTS(235)*CONSTS(285) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(221)+STATES(59)/CONSTS(222))*STATES(8))/( CONSTS(223)*CONSTS(281) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(224)+STATES(59)/CONSTS(225))*CONSTS(295))/( CONSTS(226)*CONSTS(282) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(227)+STATES(59)/CONSTS(228))*CONSTS(287))/( CONSTS(229)*CONSTS(283) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(269)+STATES(59)/CONSTS(197))*STATES(13))/( CONSTS(198)*ALGBRC(118) ** 2.00000) ALGBRC(186) = 1.00000+ALGBRC(177) ALGBRC(174) = ( (1.00000+STATES(1)/CONSTS(230)+STATES(55)/CONSTS(232))*STATES(1))/( CONSTS(231)*CONSTS(284) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(297)+STATES(55)/CONSTS(303))*STATES(9))/( CONSTS(301)*ALGBRC(37) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(305)+STATES(55)/CONSTS(309))*STATES(10))/( CONSTS(307)*ALGBRC(42) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(311)+STATES(55)/CONSTS(315))*STATES(17))/( CONSTS(313)*ALGBRC(51) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(297)+STATES(55)/CONSTS(303))*STATES(23))/( CONSTS(301)*ALGBRC(67) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(305)+STATES(55)/CONSTS(309))*STATES(21))/( CONSTS(307)*ALGBRC(73) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(251)+STATES(55)/CONSTS(253))*STATES(6))/( CONSTS(252)*ALGBRC(77) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(206)+STATES(55)/CONSTS(208))*STATES(4))/( CONSTS(207)*CONSTS(276) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(203)+STATES(55)/CONSTS(205))*ALGBRC(144))/( CONSTS(204)*CONSTS(275) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(209)+STATES(55)/CONSTS(211))*STATES(5))/( CONSTS(210)*CONSTS(277) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(212)+STATES(55)/CONSTS(214))*ALGBRC(157))/( CONSTS(213)*CONSTS(278) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(199)+STATES(55)/CONSTS(200))*STATES(11))/( CONSTS(270)*ALGBRC(121) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(190)+STATES(55)/CONSTS(191))*STATES(15))/( CONSTS(255)*ALGBRC(85) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(215)+STATES(55)/CONSTS(217))*STATES(14))/( CONSTS(216)*CONSTS(279) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(256)+STATES(55)/CONSTS(258))*STATES(16))/( CONSTS(257)*ALGBRC(86) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(259)+STATES(55)/CONSTS(192))*STATES(19))/( CONSTS(260)*ALGBRC(95) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(218)+STATES(55)/CONSTS(220))*STATES(20))/( CONSTS(219)*CONSTS(280) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(261)+STATES(55)/CONSTS(194))*STATES(18))/( CONSTS(193)*ALGBRC(99) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(254)+STATES(55)/CONSTS(189))*STATES(12))/( CONSTS(188)*ALGBRC(84) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(262)+STATES(55)/CONSTS(264))*STATES(22))/( CONSTS(263)*ALGBRC(100) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(265)+STATES(55)/CONSTS(196))*STATES(24))/( CONSTS(195)*ALGBRC(105) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(266)+STATES(55)/CONSTS(268))*STATES(25))/( CONSTS(267)*ALGBRC(108) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(271)+STATES(55)/CONSTS(201))*STATES(27))/( CONSTS(272)*ALGBRC(125) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(273)+STATES(55)/CONSTS(202))*STATES(26))/( CONSTS(274)*ALGBRC(128) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(236)+STATES(55)/CONSTS(238))*STATES(55))/( CONSTS(237)*CONSTS(286) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(233)+STATES(55)/CONSTS(235))*STATES(59))/( CONSTS(234)*CONSTS(285) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(221)+STATES(55)/CONSTS(223))*STATES(8))/( CONSTS(222)*CONSTS(281) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(224)+STATES(55)/CONSTS(226))*CONSTS(295))/( CONSTS(225)*CONSTS(282) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(227)+STATES(55)/CONSTS(229))*CONSTS(287))/( CONSTS(228)*CONSTS(283) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(269)+STATES(55)/CONSTS(198))*STATES(13))/( CONSTS(197)*ALGBRC(118) ** 2.00000) ALGBRC(185) = 1.00000+ALGBRC(174) ALGBRC(171) = ( (1.00000+STATES(59)/CONSTS(231)+STATES(55)/CONSTS(232))*STATES(1))/( CONSTS(230)*CONSTS(284) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(301)+STATES(55)/CONSTS(303))*STATES(9))/( CONSTS(297)*ALGBRC(37) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(307)+STATES(55)/CONSTS(309))*STATES(10))/( CONSTS(305)*ALGBRC(42) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(313)+STATES(55)/CONSTS(315))*STATES(17))/( CONSTS(311)*ALGBRC(51) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(301)+STATES(55)/CONSTS(303))*STATES(23))/( CONSTS(297)*ALGBRC(67) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(307)+STATES(55)/CONSTS(309))*STATES(21))/( CONSTS(305)*ALGBRC(73) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(252)+STATES(55)/CONSTS(253))*STATES(6))/( CONSTS(251)*ALGBRC(77) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(207)+STATES(55)/CONSTS(208))*STATES(4))/( CONSTS(206)*CONSTS(276) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(204)+STATES(55)/CONSTS(205))*ALGBRC(144))/( CONSTS(203)*CONSTS(275) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(210)+STATES(55)/CONSTS(211))*STATES(5))/( CONSTS(209)*CONSTS(277) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(213)+STATES(55)/CONSTS(214))*ALGBRC(157))/( CONSTS(212)*CONSTS(278) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(270)+STATES(55)/CONSTS(200))*STATES(11))/( CONSTS(199)*ALGBRC(121) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(255)+STATES(55)/CONSTS(191))*STATES(15))/( CONSTS(190)*ALGBRC(85) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(216)+STATES(55)/CONSTS(217))*STATES(14))/( CONSTS(215)*CONSTS(279) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(257)+STATES(55)/CONSTS(258))*STATES(16))/( CONSTS(256)*ALGBRC(86) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(260)+STATES(55)/CONSTS(192))*STATES(19))/( CONSTS(259)*ALGBRC(95) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(219)+STATES(55)/CONSTS(220))*STATES(20))/( CONSTS(218)*CONSTS(280) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(193)+STATES(55)/CONSTS(194))*STATES(18))/( CONSTS(261)*ALGBRC(99) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(188)+STATES(55)/CONSTS(189))*STATES(12))/( CONSTS(254)*ALGBRC(84) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(263)+STATES(55)/CONSTS(264))*STATES(22))/( CONSTS(262)*ALGBRC(100) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(195)+STATES(55)/CONSTS(196))*STATES(24))/( CONSTS(265)*ALGBRC(105) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(267)+STATES(55)/CONSTS(268))*STATES(25))/( CONSTS(266)*ALGBRC(108) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(272)+STATES(55)/CONSTS(201))*STATES(27))/( CONSTS(271)*ALGBRC(125) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(274)+STATES(55)/CONSTS(202))*STATES(26))/( CONSTS(273)*ALGBRC(128) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(237)+STATES(55)/CONSTS(238))*STATES(55))/( CONSTS(236)*CONSTS(286) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(234)+STATES(55)/CONSTS(235))*STATES(59))/( CONSTS(233)*CONSTS(285) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(222)+STATES(55)/CONSTS(223))*STATES(8))/( CONSTS(221)*CONSTS(281) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(225)+STATES(55)/CONSTS(226))*CONSTS(295))/( CONSTS(224)*CONSTS(282) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(228)+STATES(55)/CONSTS(229))*CONSTS(287))/( CONSTS(227)*CONSTS(283) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(197)+STATES(55)/CONSTS(198))*STATES(13))/( CONSTS(269)*ALGBRC(118) ** 2.00000) ALGBRC(184) = 1.00000+ALGBRC(171)+CONSTS(244)/( CONSTS(245)*1.00000+STATES(1)/CONSTS(245) ** 2.00000) ALGBRC(175) = - (( STATES(55)*STATES(1))/( CONSTS(232)*CONSTS(230)*CONSTS(284) ** 2.00000)+( STATES(55)*STATES(9))/( CONSTS(303)*CONSTS(297)*ALGBRC(37) ** 2.00000)+( STATES(55)*STATES(10))/( CONSTS(309)*CONSTS(305)*ALGBRC(42) ** 2.00000)+( STATES(55)*STATES(17))/( CONSTS(315)*CONSTS(311)*ALGBRC(51) ** 2.00000)+( STATES(55)*STATES(23))/( CONSTS(303)*CONSTS(297)*ALGBRC(67) ** 2.00000)+( STATES(55)*STATES(21))/( CONSTS(309)*CONSTS(305)*ALGBRC(73) ** 2.00000)+( STATES(55)*STATES(6))/( CONSTS(253)*CONSTS(251)*ALGBRC(77) ** 2.00000)+( STATES(55)*STATES(4))/( CONSTS(208)*CONSTS(206)*CONSTS(276) ** 2.00000)+( STATES(55)*ALGBRC(144))/( CONSTS(205)*CONSTS(203)*CONSTS(275) ** 2.00000)+( STATES(55)*STATES(5))/( CONSTS(211)*CONSTS(209)*CONSTS(277) ** 2.00000)+( STATES(55)*ALGBRC(157))/( CONSTS(214)*CONSTS(212)*CONSTS(278) ** 2.00000)+( STATES(55)*STATES(11))/( CONSTS(200)*CONSTS(199)*ALGBRC(121) ** 2.00000)+( STATES(55)*STATES(15))/( CONSTS(191)*CONSTS(190)*ALGBRC(85) ** 2.00000)+( STATES(55)*STATES(14))/( CONSTS(217)*CONSTS(215)*CONSTS(279) ** 2.00000)+( STATES(55)*STATES(16))/( CONSTS(258)*CONSTS(256)*ALGBRC(86) ** 2.00000)+( STATES(55)*STATES(19))/( CONSTS(192)*CONSTS(259)*ALGBRC(95) ** 2.00000)+( STATES(55)*STATES(20))/( CONSTS(220)*CONSTS(218)*CONSTS(280) ** 2.00000)+( STATES(55)*STATES(18))/( CONSTS(194)*CONSTS(261)*ALGBRC(99) ** 2.00000)+( STATES(55)*STATES(12))/( CONSTS(189)*CONSTS(254)*ALGBRC(84) ** 2.00000)+( STATES(55)*STATES(22))/( CONSTS(264)*CONSTS(262)*ALGBRC(100) ** 2.00000)+( STATES(55)*STATES(24))/( CONSTS(196)*CONSTS(265)*ALGBRC(105) ** 2.00000)+( STATES(55)*STATES(25))/( CONSTS(268)*CONSTS(266)*ALGBRC(108) ** 2.00000)+( STATES(55)*STATES(27))/( CONSTS(201)*CONSTS(271)*ALGBRC(125) ** 2.00000)+( STATES(55)*STATES(26))/( CONSTS(202)*CONSTS(273)*ALGBRC(128) ** 2.00000)+( STATES(55)*STATES(55))/( CONSTS(238)*CONSTS(236)*CONSTS(286) ** 2.00000)+( STATES(55)*STATES(59))/( CONSTS(235)*CONSTS(233)*CONSTS(285) ** 2.00000)+( STATES(55)*STATES(8))/( CONSTS(223)*CONSTS(221)*CONSTS(281) ** 2.00000)+( STATES(55)*CONSTS(295))/( CONSTS(226)*CONSTS(224)*CONSTS(282) ** 2.00000)+( STATES(55)*CONSTS(287))/( CONSTS(229)*CONSTS(227)*CONSTS(283) ** 2.00000)+( STATES(55)*STATES(13))/( CONSTS(198)*CONSTS(269)*ALGBRC(118) ** 2.00000)) ALGBRC(172) = - (( STATES(59)*STATES(1))/( CONSTS(231)*CONSTS(230)*CONSTS(284) ** 2.00000)+( STATES(59)*STATES(9))/( CONSTS(301)*CONSTS(297)*ALGBRC(37) ** 2.00000)+( STATES(59)*STATES(10))/( CONSTS(307)*CONSTS(305)*ALGBRC(42) ** 2.00000)+( STATES(59)*STATES(17))/( CONSTS(313)*CONSTS(311)*ALGBRC(51) ** 2.00000)+( STATES(59)*STATES(23))/( CONSTS(301)*CONSTS(297)*ALGBRC(67) ** 2.00000)+( STATES(59)*STATES(21))/( CONSTS(307)*CONSTS(305)*ALGBRC(73) ** 2.00000)+( STATES(59)*STATES(6))/( CONSTS(252)*CONSTS(251)*ALGBRC(77) ** 2.00000)+( STATES(59)*STATES(4))/( CONSTS(207)*CONSTS(206)*CONSTS(276) ** 2.00000)+( STATES(59)*ALGBRC(144))/( CONSTS(204)*CONSTS(203)*CONSTS(275) ** 2.00000)+( STATES(59)*STATES(5))/( CONSTS(210)*CONSTS(209)*CONSTS(277) ** 2.00000)+( STATES(59)*ALGBRC(157))/( CONSTS(213)*CONSTS(212)*CONSTS(278) ** 2.00000)+( STATES(59)*STATES(11))/( CONSTS(270)*CONSTS(199)*ALGBRC(121) ** 2.00000)+( STATES(59)*STATES(15))/( CONSTS(255)*CONSTS(190)*ALGBRC(85) ** 2.00000)+( STATES(59)*STATES(14))/( CONSTS(216)*CONSTS(215)*CONSTS(279) ** 2.00000)+( STATES(59)*STATES(16))/( CONSTS(257)*CONSTS(256)*ALGBRC(86) ** 2.00000)+( STATES(59)*STATES(19))/( CONSTS(260)*CONSTS(259)*ALGBRC(95) ** 2.00000)+( STATES(59)*STATES(20))/( CONSTS(219)*CONSTS(218)*CONSTS(280) ** 2.00000)+( STATES(59)*STATES(18))/( CONSTS(193)*CONSTS(261)*ALGBRC(99) ** 2.00000)+( STATES(59)*STATES(12))/( CONSTS(188)*CONSTS(254)*ALGBRC(84) ** 2.00000)+( STATES(59)*STATES(22))/( CONSTS(263)*CONSTS(262)*ALGBRC(100) ** 2.00000)+( STATES(59)*STATES(24))/( CONSTS(195)*CONSTS(265)*ALGBRC(105) ** 2.00000)+( STATES(59)*STATES(25))/( CONSTS(267)*CONSTS(266)*ALGBRC(108) ** 2.00000)+( STATES(59)*STATES(27))/( CONSTS(272)*CONSTS(271)*ALGBRC(125) ** 2.00000)+( STATES(59)*STATES(26))/( CONSTS(274)*CONSTS(273)*ALGBRC(128) ** 2.00000)+( STATES(59)*STATES(55))/( CONSTS(237)*CONSTS(236)*CONSTS(286) ** 2.00000)+( STATES(59)*STATES(59))/( CONSTS(234)*CONSTS(233)*CONSTS(285) ** 2.00000)+( STATES(59)*STATES(8))/( CONSTS(222)*CONSTS(221)*CONSTS(281) ** 2.00000)+( STATES(59)*CONSTS(295))/( CONSTS(225)*CONSTS(224)*CONSTS(282) ** 2.00000)+( STATES(59)*CONSTS(287))/( CONSTS(228)*CONSTS(227)*CONSTS(283) ** 2.00000)+( STATES(59)*STATES(13))/( CONSTS(197)*CONSTS(269)*ALGBRC(118) ** 2.00000)) ALGBRC(187) = ((( ALGBRC(184)*ALGBRC(176)*ALGBRC(173)+ ALGBRC(186)*ALGBRC(169)*ALGBRC(172)+ ALGBRC(185)*ALGBRC(170)*ALGBRC(175)) - ALGBRC(185)*ALGBRC(186)*ALGBRC(184)) - ALGBRC(170)*ALGBRC(176)*ALGBRC(172)) - ALGBRC(169)*ALGBRC(173)*ALGBRC(175) ALGBRC(136) = ((ALGBRC(59)+ALGBRC(79)) - ALGBRC(64))/CONSTS(35) ALGBRC(137) = ((- ALGBRC(59) - ALGBRC(79))+ALGBRC(64))/CONSTS(35) ALGBRC(138) = (ALGBRC(103) - ALGBRC(59))/CONSTS(35) ALGBRC(139) = (- ALGBRC(103)+ALGBRC(59))/CONSTS(35) ALGBRC(140) = (((- ALGBRC(103) - ALGBRC(79))+ALGBRC(83)) - ALGBRC(116))/CONSTS(35) ALGBRC(160) = ((ALGBRC(145)+ALGBRC(146)+ALGBRC(147)+ALGBRC(148)) - ALGBRC(158))/CONSTS(35) ALGBRC(167) = ((ALGBRC(159)+ALGBRC(158)) - ALGBRC(165))/CONSTS(35) ALGBRC(149) = (- ALGBRC(145)+ALGBRC(124))/CONSTS(35) ALGBRC(150) = (ALGBRC(145) - ALGBRC(90))/CONSTS(35) ALGBRC(141) = (- ALGBRC(98)+ALGBRC(115)+ALGBRC(90))/CONSTS(35) ALGBRC(151) = (ALGBRC(98) - ALGBRC(146))/CONSTS(35) ALGBRC(152) = (((ALGBRC(146) - ALGBRC(147)) - ALGBRC(132))+ALGBRC(14))/CONSTS(35) ALGBRC(153) = (ALGBRC(147) - ALGBRC(103))/CONSTS(35) ALGBRC(154) = ((- ALGBRC(145) - ALGBRC(147))+ALGBRC(103)+ALGBRC(90))/CONSTS(35) ALGBRC(161) = ((ALGBRC(103) - ALGBRC(159))+ALGBRC(117))/CONSTS(35) ALGBRC(162) = (ALGBRC(159) - ALGBRC(111))/CONSTS(35) ALGBRC(155) = (((((ALGBRC(111) - ALGBRC(148))+ALGBRC(116)) - ALGBRC(14)) - ALGBRC(115)) - ALGBRC(117))/CONSTS(35) ALGBRC(156) = (- ALGBRC(90)+ALGBRC(148)+ALGBRC(132))/CONSTS(35) ALGBRC(142) = ((ALGBRC(132)+ALGBRC(127)) - ALGBRC(135))/CONSTS(35) ALGBRC(143) = (- ALGBRC(132)+ALGBRC(135))/CONSTS(35) ALGBRC(163) = - ALGBRC(160) ALGBRC(168) = - ALGBRC(167) ALGBRC(178) = (((- ALGBRC(145)+ 2.00000*ALGBRC(90)) - ALGBRC(147))+ALGBRC(103)+ALGBRC(148))/CONSTS(35) ALGBRC(35) = CONSTS(31)*( STATES(54)*STATES(1) - STATES(55)*STATES(2)) ALGBRC(179) = (((((((ALGBRC(124)+ALGBRC(127)+ALGBRC(115)) - ALGBRC(135)) - 5.00000*ALGBRC(158)) - 2.00000*ALGBRC(165)) - 4.00000*ALGBRC(166))+ (CONSTS(39) - 1.00000)*ALGBRC(79)+ 2.00000*ALGBRC(83)+ALGBRC(33)) - ALGBRC(35))/CONSTS(35) ALGBRC(181) = ( STATES(1)*CONSTS(288))/( CONSTS(230)*CONSTS(284))+( STATES(1)*ALGBRC(136))/( CONSTS(297)*ALGBRC(37))+( STATES(1)*ALGBRC(137))/( CONSTS(305)*ALGBRC(42))+( STATES(1)*CONSTS(239))/( CONSTS(311)*ALGBRC(51))+( STATES(1)*ALGBRC(138))/( CONSTS(297)*ALGBRC(67))+( STATES(1)*ALGBRC(139))/( CONSTS(305)*ALGBRC(73))+( STATES(1)*ALGBRC(140))/( CONSTS(251)*ALGBRC(77))+( STATES(1)*ALGBRC(160))/( CONSTS(206)*CONSTS(276))+( STATES(1)*ALGBRC(163))/( CONSTS(203)*CONSTS(275))+( STATES(1)*ALGBRC(167))/( CONSTS(209)*CONSTS(277))+( STATES(1)*ALGBRC(168))/( CONSTS(212)*CONSTS(278))+( STATES(1)*ALGBRC(149))/( CONSTS(199)*ALGBRC(121))+( STATES(1)*ALGBRC(156))/( CONSTS(190)*ALGBRC(85))+( STATES(1)*ALGBRC(150))/( CONSTS(215)*CONSTS(279))+( STATES(1)*ALGBRC(141))/( CONSTS(256)*ALGBRC(86))+( STATES(1)*ALGBRC(151))/( CONSTS(259)*ALGBRC(95))+( STATES(1)*ALGBRC(152))/( CONSTS(218)*CONSTS(280))+( STATES(1)*ALGBRC(153))/( CONSTS(261)*ALGBRC(99))+( STATES(1)*ALGBRC(154))/( CONSTS(254)*ALGBRC(84))+( STATES(1)*ALGBRC(161))/( CONSTS(262)*ALGBRC(100))+( STATES(1)*ALGBRC(162))/( CONSTS(265)*ALGBRC(105))+( STATES(1)*ALGBRC(155))/( CONSTS(266)*ALGBRC(108))+( STATES(1)*ALGBRC(142))/( CONSTS(271)*ALGBRC(125))+( STATES(1)*ALGBRC(143))/( CONSTS(273)*ALGBRC(128))+( STATES(1)*CONSTS(290))/( CONSTS(236)*CONSTS(286))+( STATES(1)*CONSTS(289))/( CONSTS(233)*CONSTS(285))+( STATES(1)*CONSTS(240))/( CONSTS(221)*CONSTS(281))+( STATES(1)*CONSTS(243))/( CONSTS(224)*CONSTS(282))+( STATES(1)*CONSTS(242))/( CONSTS(227)*CONSTS(283))+( STATES(1)*CONSTS(241))/( CONSTS(269)*ALGBRC(118))+ALGBRC(178)+ALGBRC(179) ALGBRC(182) = ( STATES(59)*CONSTS(288))/( CONSTS(231)*CONSTS(284))+( STATES(59)*ALGBRC(136))/( CONSTS(301)*ALGBRC(37))+( STATES(59)*ALGBRC(137))/( CONSTS(307)*ALGBRC(42))+( STATES(59)*CONSTS(239))/( CONSTS(313)*ALGBRC(51))+( STATES(59)*ALGBRC(138))/( CONSTS(301)*ALGBRC(67))+( STATES(59)*ALGBRC(139))/( CONSTS(307)*ALGBRC(73))+( STATES(59)*ALGBRC(140))/( CONSTS(252)*ALGBRC(77))+( STATES(59)*ALGBRC(160))/( CONSTS(207)*CONSTS(276))+( STATES(59)*ALGBRC(163))/( CONSTS(204)*CONSTS(275))+( STATES(59)*ALGBRC(167))/( CONSTS(210)*CONSTS(277))+( STATES(59)*ALGBRC(168))/( CONSTS(213)*CONSTS(278))+( STATES(59)*ALGBRC(149))/( CONSTS(270)*ALGBRC(121))+( STATES(59)*ALGBRC(156))/( CONSTS(255)*ALGBRC(85))+( STATES(59)*ALGBRC(150))/( CONSTS(216)*CONSTS(279))+( STATES(59)*ALGBRC(141))/( CONSTS(257)*ALGBRC(86))+( STATES(59)*ALGBRC(151))/( CONSTS(260)*ALGBRC(95))+( STATES(59)*ALGBRC(152))/( CONSTS(219)*CONSTS(280))+( STATES(59)*ALGBRC(153))/( CONSTS(193)*ALGBRC(99))+( STATES(59)*ALGBRC(154))/( CONSTS(188)*ALGBRC(84))+( STATES(59)*ALGBRC(161))/( CONSTS(263)*ALGBRC(100))+( STATES(59)*ALGBRC(162))/( CONSTS(195)*ALGBRC(105))+( STATES(59)*ALGBRC(155))/( CONSTS(267)*ALGBRC(108))+( STATES(59)*ALGBRC(142))/( CONSTS(272)*ALGBRC(125))+( STATES(59)*ALGBRC(143))/( CONSTS(274)*ALGBRC(128))+( STATES(59)*CONSTS(290))/( CONSTS(237)*CONSTS(286))+( STATES(59)*CONSTS(289))/( CONSTS(234)*CONSTS(285))+( STATES(59)*CONSTS(240))/( CONSTS(222)*CONSTS(281))+( STATES(59)*CONSTS(243))/( CONSTS(225)*CONSTS(282))+( STATES(59)*CONSTS(242))/( CONSTS(228)*CONSTS(283))+( STATES(59)*CONSTS(241))/( CONSTS(197)*ALGBRC(118))+CONSTS(291) ALGBRC(180) = ALGBRC(35)/CONSTS(35) ALGBRC(183) = ( STATES(55)*CONSTS(288))/( CONSTS(232)*CONSTS(284))+( STATES(55)*ALGBRC(136))/( CONSTS(303)*ALGBRC(37))+( STATES(55)*ALGBRC(137))/( CONSTS(309)*ALGBRC(42))+( STATES(55)*CONSTS(239))/( CONSTS(315)*ALGBRC(51))+( STATES(55)*ALGBRC(138))/( CONSTS(303)*ALGBRC(67))+( STATES(55)*ALGBRC(139))/( CONSTS(309)*ALGBRC(73))+( STATES(55)*ALGBRC(140))/( CONSTS(253)*ALGBRC(77))+( STATES(55)*ALGBRC(160))/( CONSTS(208)*CONSTS(276))+( STATES(55)*ALGBRC(163))/( CONSTS(205)*CONSTS(275))+( STATES(55)*ALGBRC(167))/( CONSTS(211)*CONSTS(277))+( STATES(55)*ALGBRC(168))/( CONSTS(214)*CONSTS(278))+( STATES(55)*ALGBRC(149))/( CONSTS(200)*ALGBRC(121))+( STATES(55)*ALGBRC(156))/( CONSTS(191)*ALGBRC(85))+( STATES(55)*ALGBRC(150))/( CONSTS(217)*CONSTS(279))+( STATES(55)*ALGBRC(141))/( CONSTS(258)*ALGBRC(86))+( STATES(55)*ALGBRC(151))/( CONSTS(192)*ALGBRC(95))+( STATES(55)*ALGBRC(152))/( CONSTS(220)*CONSTS(280))+( STATES(55)*ALGBRC(153))/( CONSTS(194)*ALGBRC(99))+( STATES(55)*ALGBRC(154))/( CONSTS(189)*ALGBRC(84))+( STATES(55)*ALGBRC(161))/( CONSTS(264)*ALGBRC(100))+( STATES(55)*ALGBRC(162))/( CONSTS(196)*ALGBRC(105))+( STATES(55)*ALGBRC(155))/( CONSTS(268)*ALGBRC(108))+( STATES(55)*ALGBRC(142))/( CONSTS(201)*ALGBRC(125))+( STATES(55)*ALGBRC(143))/( CONSTS(202)*ALGBRC(128))+( STATES(55)*CONSTS(290))/( CONSTS(238)*CONSTS(286))+( STATES(55)*CONSTS(289))/( CONSTS(235)*CONSTS(285))+( STATES(55)*CONSTS(240))/( CONSTS(223)*CONSTS(281))+( STATES(55)*CONSTS(243))/( CONSTS(226)*CONSTS(282))+( STATES(55)*CONSTS(242))/( CONSTS(229)*CONSTS(283))+( STATES(55)*CONSTS(241))/( CONSTS(198)*ALGBRC(118))+ALGBRC(180) RATES(1) = ( ( ALGBRC(176)*ALGBRC(173) - ALGBRC(185)*ALGBRC(186))*ALGBRC(181)+ ( ALGBRC(186)*ALGBRC(169) - ALGBRC(170)*ALGBRC(176))*ALGBRC(182)+ ( ALGBRC(185)*ALGBRC(170) - ALGBRC(169)*ALGBRC(173))*ALGBRC(183))/ALGBRC(187) RATES(59) = ( ( ALGBRC(186)*ALGBRC(172) - ALGBRC(175)*ALGBRC(173))*ALGBRC(181)+ ( ALGBRC(175)*ALGBRC(170) - ALGBRC(184)*ALGBRC(186))*ALGBRC(182)+ ( ALGBRC(184)*ALGBRC(173) - ALGBRC(170)*ALGBRC(172))*ALGBRC(183))/ALGBRC(187) RATES(55) = ( ( ALGBRC(185)*ALGBRC(175) - ALGBRC(176)*ALGBRC(172))*ALGBRC(181)+ ( ALGBRC(184)*ALGBRC(176) - ALGBRC(175)*ALGBRC(169))*ALGBRC(182)+ ( ALGBRC(172)*ALGBRC(169) - ALGBRC(184)*ALGBRC(185))*ALGBRC(183))/ALGBRC(187) RETURN END SUBROUTINE computeVariables(VOI, CONSTS, RATES, STATES, ALGBRC) REAL VOI, CONSTS(*), RATES(*), STATES(*), ALGBRC(*) ALGBRC(2) = CONSTS(37)*CONSTS(42)*(STATES(45) - STATES(46)) ALGBRC(3) = CONSTS(37)*CONSTS(171)*(STATES(52) - STATES(53)) ALGBRC(14) = ( CONSTS(18)*( STATES(31)*STATES(25) - STATES(20)*STATES(30)))/( CONSTS(162)*CONSTS(165)*(2.00000+STATES(30)/CONSTS(164)+STATES(25)/CONSTS(165)+STATES(31)/CONSTS(162)+STATES(20)/CONSTS(163)+( STATES(30)*STATES(20))/( CONSTS(164)*CONSTS(163))+( STATES(25)*STATES(31))/( CONSTS(165)*CONSTS(162)))) ALGBRC(16) = CONSTS(37)*CONSTS(42)*(STATES(48) - STATES(31)) ALGBRC(19) = CONSTS(37)*CONSTS(40)*(STATES(41) - STATES(32)) ALGBRC(21) = CONSTS(37)*CONSTS(42)*(STATES(42) - STATES(28)) ALGBRC(23) = CONSTS(37)*CONSTS(42)*(STATES(43) - STATES(44)) ALGBRC(25) = CONSTS(37)*CONSTS(42)*(STATES(47) - STATES(30)) ALGBRC(27) = CONSTS(37)*CONSTS(42)*(STATES(49) - STATES(34)) ALGBRC(29) = CONSTS(37)*CONSTS(42)*(STATES(50) - STATES(29)) ALGBRC(31) = CONSTS(37)*CONSTS(42)*(STATES(51) - STATES(33)) ALGBRC(20) = STATES(2) ALGBRC(24) = STATES(60) ALGBRC(26) = STATES(54) ALGBRC(28) = 1.00000+ALGBRC(20)/CONSTS(297)+ALGBRC(24)/CONSTS(301)+ALGBRC(26)/CONSTS(303) ALGBRC(30) = (( STATES(35)*ALGBRC(24))/CONSTS(301))/ALGBRC(28) ALGBRC(32) = 1.00000+ALGBRC(20)/CONSTS(305)+ALGBRC(24)/CONSTS(307)+ALGBRC(26)/CONSTS(309) ALGBRC(38) = (( STATES(37)*ALGBRC(24))/CONSTS(307))/ALGBRC(32) ALGBRC(22) = 1.00000+ALGBRC(20)/CONSTS(317) ALGBRC(34) = ( CONSTS(293)*ALGBRC(22)*ALGBRC(32))/( ALGBRC(20)*ALGBRC(28)) ALGBRC(36) = ( ALGBRC(34)*CONSTS(301)*ALGBRC(28))/( CONSTS(307)*ALGBRC(32)) ALGBRC(40) = ( (CONSTS(246)/( CONSTS(180)*CONSTS(183)))*( ALGBRC(30)*STATES(57) - ( STATES(58)*ALGBRC(38))/ALGBRC(36)))/(1.00000+ALGBRC(30)/CONSTS(179)+STATES(57)/CONSTS(180)+( ALGBRC(30)*STATES(57))/( CONSTS(180)*CONSTS(183))+STATES(58)/CONSTS(181)+ALGBRC(38)/CONSTS(182)+( STATES(58)*ALGBRC(38))/( CONSTS(182)*CONSTS(185))+( STATES(58)*STATES(57))/( CONSTS(187)*CONSTS(180))) ALGBRC(18) = CONSTS(37)*CONSTS(41)*(STATES(39) - STATES(40)) ALGBRC(43) = 1.00000+ALGBRC(20)/CONSTS(311)+ALGBRC(24)/CONSTS(313)+ALGBRC(26)/CONSTS(315) ALGBRC(45) = ( CONSTS(177)*ALGBRC(28)*ALGBRC(43))/( ALGBRC(32)*ALGBRC(32)) ALGBRC(48) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, CONSTS(176)*( ALGBRC(45)*STATES(37)*STATES(37) - STATES(39)*STATES(35))) ALGBRC(15) = CONSTS(37)*CONSTS(41)*(STATES(35) - STATES(36)) ALGBRC(50) = CONSTS(50) - STATES(56) ALGBRC(52) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, CONSTS(178)*( (( CONSTS(294)*STATES(37))/ALGBRC(32))*STATES(56)*ALGBRC(20) - (STATES(35)/ALGBRC(28))*ALGBRC(50))) ALGBRC(17) = CONSTS(37)*CONSTS(41)*(STATES(37) - STATES(38)) ALGBRC(37) = 1.00000+STATES(1)/CONSTS(297)+STATES(59)/CONSTS(301)+STATES(55)/CONSTS(303) ALGBRC(42) = 1.00000+STATES(1)/CONSTS(305)+STATES(59)/CONSTS(307)+STATES(55)/CONSTS(309) ALGBRC(61) = 1.00000+STATES(2)/CONSTS(305)+STATES(60)/CONSTS(307)+STATES(54)/CONSTS(309) ALGBRC(60) = 1.00000+STATES(2)/CONSTS(297)+STATES(60)/CONSTS(301)+STATES(54)/CONSTS(303) ALGBRC(64) = TERNRY(STATES(38).GT.CONSTS(172).AND.STATES(9).GT.CONSTS(172), (CONSTS(28)/(1.00000+(CONSTS(43)/STATES(38))/ALGBRC(61)))*((STATES(38)/ALGBRC(61))/(STATES(38)/ALGBRC(61)+ (STATES(36)/ALGBRC(60))*EXP(( (CONSTS(44) - 1.00000)*CONSTS(34)*STATES(3))/CONSTS(250)))+(STATES(10)/ALGBRC(42))/(STATES(10)/ALGBRC(42)+ (STATES(9)/ALGBRC(37))*EXP(( CONSTS(44)*CONSTS(34)*STATES(3))/CONSTS(250)))), 0.00000) ALGBRC(68) = 1.00000+STATES(2)/CONSTS(311)+STATES(60)/CONSTS(313)+STATES(54)/CONSTS(315) ALGBRC(70) = ( CONSTS(175)*ALGBRC(60)*ALGBRC(68))/( ALGBRC(61)*ALGBRC(61)) ALGBRC(74) = TERNRY(CONSTS(1).EQ.1.00000.OR.CONSTS(1).EQ.2.00000.OR.CONSTS(1).EQ.5.00000, 0.00000, CONSTS(174)*( ALGBRC(70)*STATES(38)*STATES(38) - STATES(40)*STATES(36))) ALGBRC(77) = 1.00000+STATES(1)/CONSTS(251)+STATES(59)/CONSTS(252)+STATES(55)/CONSTS(253) ALGBRC(9) = EXP(- (CONSTS(57) - CONSTS(39)*CONSTS(34)*STATES(3))/CONSTS(250)) ALGBRC(78) = ( ALGBRC(9)*STATES(2) ** CONSTS(39)*ALGBRC(37))/( STATES(1) ** CONSTS(39) - 1.00000*ALGBRC(42)*ALGBRC(77)*1.00000) ALGBRC(79) = CONSTS(27)*( ALGBRC(78)*STATES(10)*STATES(6) - STATES(9)) ALGBRC(51) = 1.00000+STATES(1)/CONSTS(311)+STATES(59)/CONSTS(313)+STATES(55)/CONSTS(315) ALGBRC(53) = ( STATES(17)*(1.00000+STATES(1)/CONSTS(311)))/ALGBRC(51) ALGBRC(57) = 1.00000+ALGBRC(53)/CONSTS(149) ALGBRC(58) = TERNRY(STATES(23).GT.CONSTS(150).AND.STATES(10).GT.CONSTS(150), ( (( CONSTS(13)*CONSTS(248))/ALGBRC(57))*STATES(23)*STATES(10))/( CONSTS(248)*CONSTS(146)*STATES(23)+ CONSTS(248)*CONSTS(145)*STATES(10)+( CONSTS(13)*CONSTS(148)*STATES(21))/CONSTS(140)+( CONSTS(13)*CONSTS(147)*STATES(9))/CONSTS(140)+ CONSTS(248)*STATES(23)*STATES(10)+( CONSTS(13)*CONSTS(148)*STATES(23)*STATES(21))/( CONSTS(140)*CONSTS(141))+( CONSTS(13)*STATES(21)*STATES(9))/CONSTS(140)+( CONSTS(248)*CONSTS(145)*STATES(10)*STATES(9))/CONSTS(144)), 0.00000) ALGBRC(59) = TERNRY(STATES(21).GT.CONSTS(150).AND.STATES(9).GT.CONSTS(150), ALGBRC(58) - (( (( CONSTS(13)*CONSTS(248))/ALGBRC(57))*STATES(21)*STATES(9))/CONSTS(140))/( CONSTS(248)*CONSTS(146)*STATES(23)+ CONSTS(248)*CONSTS(145)*STATES(10)+( CONSTS(13)*CONSTS(148)*STATES(21))/CONSTS(140)+( CONSTS(13)*CONSTS(147)*STATES(9))/CONSTS(140)+ CONSTS(248)*STATES(23)*STATES(10)+( CONSTS(13)*CONSTS(148)*STATES(23)*STATES(21))/( CONSTS(140)*CONSTS(141))+( CONSTS(13)*STATES(21)*STATES(9))/CONSTS(140)+( CONSTS(248)*CONSTS(145)*STATES(10)*STATES(9))/CONSTS(144)), ALGBRC(58)) ALGBRC(84) = 1.00000+STATES(1)/CONSTS(254) ALGBRC(99) = 1.00000+STATES(1)/CONSTS(261) ALGBRC(100) = 1.00000+STATES(1)/CONSTS(262)+STATES(59)/CONSTS(263)+STATES(55)/CONSTS(264) ALGBRC(67) = ALGBRC(37) ALGBRC(73) = ALGBRC(42) ALGBRC(101) = ( CONSTS(97)*ALGBRC(84)*ALGBRC(100)*ALGBRC(67))/( STATES(1)*ALGBRC(73)*ALGBRC(99)*ALGBRC(77)) ALGBRC(102) = ( CONSTS(9)*CONSTS(107)*CONSTS(102)*CONSTS(103))/( ALGBRC(101)*CONSTS(98)*CONSTS(99)*CONSTS(106)) ALGBRC(103) = ( CONSTS(9)*ALGBRC(102)*( STATES(21)*STATES(18)*STATES(6) - ( STATES(12)*STATES(22)*STATES(23))/ALGBRC(101)))/( ALGBRC(102)*CONSTS(98)*CONSTS(99)*CONSTS(107)+ ALGBRC(102)*CONSTS(99)*CONSTS(107)*STATES(21)+ ALGBRC(102)*CONSTS(98)*CONSTS(105)*STATES(6)+ ALGBRC(102)*CONSTS(107)*STATES(21)*STATES(18)+ ALGBRC(102)*CONSTS(105)*STATES(21)*STATES(6)+ ALGBRC(102)*CONSTS(104)*STATES(18)*STATES(6)+ ALGBRC(102)*STATES(21)*STATES(18)*STATES(6)+( CONSTS(9)*CONSTS(103)*CONSTS(108)*STATES(12))/ALGBRC(101)+( CONSTS(9)*CONSTS(102)*CONSTS(107)*STATES(23))/ALGBRC(101)+( CONSTS(9)*CONSTS(109)*STATES(12)*STATES(22))/ALGBRC(101)+( CONSTS(9)*CONSTS(108)*STATES(12)*STATES(23))/ALGBRC(101)+( CONSTS(9)*CONSTS(107)*STATES(22)*STATES(23))/ALGBRC(101)+( CONSTS(9)*STATES(12)*STATES(22)*STATES(23))/ALGBRC(101)+( CONSTS(9)*CONSTS(108)*CONSTS(103)*STATES(21)*STATES(12))/( CONSTS(98)*ALGBRC(101))+( ALGBRC(102)*CONSTS(98)*CONSTS(105)*STATES(6)*STATES(23))/CONSTS(103)+( CONSTS(9)*CONSTS(108)*CONSTS(103)*STATES(21)*STATES(18)*STATES(22))/( CONSTS(98)*CONSTS(99)*ALGBRC(101))+( ALGBRC(102)*CONSTS(104)*STATES(18)*STATES(6)*STATES(23))/CONSTS(103)+( CONSTS(9)*CONSTS(109)*STATES(21)*STATES(12)*STATES(22))/( CONSTS(98)*ALGBRC(101))+( ALGBRC(102)*CONSTS(98)*CONSTS(105)*STATES(6)*STATES(22)*STATES(23))/( CONSTS(102)*CONSTS(103))+( CONSTS(9)*CONSTS(103)*CONSTS(108)*STATES(21)*STATES(18)*STATES(6)*STATES(12))/( CONSTS(98)*CONSTS(99)*CONSTS(100)*ALGBRC(101))+( CONSTS(9)*CONSTS(101)*CONSTS(109)*STATES(21)*STATES(18)*STATES(6)*STATES(22))/( CONSTS(98)*CONSTS(99)*CONSTS(101)*ALGBRC(101))+( CONSTS(9)*CONSTS(109)*STATES(21)*STATES(18)*STATES(12)*STATES(22))/( CONSTS(98)*CONSTS(99)*ALGBRC(101))+( CONSTS(9)*CONSTS(104)*STATES(18)*STATES(6)*STATES(22)*STATES(23))/( CONSTS(102)*CONSTS(103))+( ALGBRC(102)*CONSTS(104)*CONSTS(101)*STATES(18)*STATES(12)*STATES(22)*STATES(23))/( CONSTS(101)*CONSTS(102)*CONSTS(103))+( ALGBRC(102)*CONSTS(98)*CONSTS(105)*STATES(6)*STATES(12)*STATES(22)*STATES(23))/( CONSTS(101)*CONSTS(102)*CONSTS(103))+( CONSTS(9)*CONSTS(109)*STATES(21)*STATES(18)*STATES(6)*STATES(12)*STATES(22))/( CONSTS(98)*CONSTS(99)*CONSTS(101)*ALGBRC(101))+( CONSTS(9)*CONSTS(104)*STATES(18)*STATES(6)*STATES(12)*STATES(22)*STATES(23))/( CONSTS(101)*CONSTS(102)*CONSTS(103))) ALGBRC(86) = 1.00000+STATES(1)/CONSTS(256)+STATES(59)/CONSTS(257)+STATES(55)/CONSTS(258) ALGBRC(85) = 1.00000+STATES(59)/CONSTS(255) ALGBRC(87) = ( CONSTS(65)*ALGBRC(86))/( STATES(1)*STATES(1)*ALGBRC(85)) ALGBRC(88) = ( STATES(16)*(1.00000+STATES(1)/CONSTS(256)))/ALGBRC(86) ALGBRC(89) = 1.00000+ALGBRC(88)/CONSTS(69) ALGBRC(39) = ( STATES(9)*(1.00000+STATES(1)/CONSTS(297)))/ALGBRC(37) ALGBRC(44) = ( STATES(10)*(1.00000+STATES(1)/CONSTS(305)))/ALGBRC(42) ALGBRC(55) = 1.00000+ALGBRC(39)/CONSTS(70)+ALGBRC(44)/CONSTS(71)+ALGBRC(53)/CONSTS(72)+STATES(12)/CONSTS(73)+STATES(18)/CONSTS(74) ALGBRC(90) = ( CONSTS(4)*( STATES(14)*STATES(15) - ( STATES(12)*STATES(16))/ALGBRC(87)))/( CONSTS(68)*CONSTS(67)*ALGBRC(89)+ CONSTS(66)*ALGBRC(89)*STATES(14)+ CONSTS(67)*ALGBRC(55)*STATES(15)+ STATES(15)*STATES(14)) ALGBRC(95) = 1.00000+STATES(1)/CONSTS(259)+STATES(59)/CONSTS(260) ALGBRC(96) = ( CONSTS(75)*ALGBRC(95))/ALGBRC(86) ALGBRC(97) = ( CONSTS(5)*CONSTS(77))/( CONSTS(76)*ALGBRC(96)) ALGBRC(98) = ( CONSTS(5)*ALGBRC(97)*(STATES(16) - STATES(19)/ALGBRC(96)))/( CONSTS(76)*ALGBRC(97)+ ALGBRC(97)*STATES(16)+( CONSTS(5)*STATES(19))/ALGBRC(96)) ALGBRC(108) = 1.00000+STATES(1)/CONSTS(266)+STATES(59)/CONSTS(267)+STATES(55)/CONSTS(268) ALGBRC(92) = 1.00000+STATES(2)/CONSTS(256)+STATES(60)/CONSTS(257)+STATES(54)/CONSTS(258) ALGBRC(93) = (( STATES(44)*STATES(2))/CONSTS(256))/ALGBRC(92) ALGBRC(114) = 1.00000+STATES(2)/CONSTS(266)+STATES(60)/CONSTS(267)+STATES(54)/CONSTS(268) ALGBRC(91) = (( STATES(16)*STATES(1))/CONSTS(256))/ALGBRC(86) ALGBRC(115) = CONSTS(17)*(( ALGBRC(93)*STATES(25))/ALGBRC(108) - ( ALGBRC(91)*STATES(30))/ALGBRC(114)) ALGBRC(81) = 1.00000+STATES(2)/CONSTS(251)+STATES(60)/CONSTS(252)+STATES(54)/CONSTS(253) ALGBRC(116) = CONSTS(20)*(( (STATES(30)/ALGBRC(114))*STATES(6))/ALGBRC(77) - ( (STATES(25)/ALGBRC(108))*STATES(32))/ALGBRC(81)) ALGBRC(82) = (( STATES(32)*STATES(2))/CONSTS(251))/ALGBRC(81) ALGBRC(80) = (( STATES(6)*STATES(1))/CONSTS(251))/ALGBRC(77) ALGBRC(83) = ( CONSTS(29)*( ALGBRC(82)*STATES(2) - ALGBRC(80)*STATES(1)))/( CONSTS(30)*(1.00000+ALGBRC(82)/CONSTS(30))*(1.00000+ALGBRC(80)/CONSTS(30))) ALGBRC(104) = 1.00000+STATES(2)/CONSTS(262)+STATES(60)/CONSTS(263)+STATES(54)/CONSTS(264) ALGBRC(117) = CONSTS(19)*(( (STATES(34)/ALGBRC(104))*STATES(25))/ALGBRC(108) - ( (STATES(22)/ALGBRC(100))*STATES(30))/ALGBRC(114)) ALGBRC(121) = 1.00000+STATES(59)/CONSTS(270) ALGBRC(123) = 1.00000+STATES(60)/CONSTS(270) ALGBRC(124) = CONSTS(15)*( (STATES(28)/ALGBRC(123))*STATES(2) - (STATES(11)/ALGBRC(121))*STATES(1)) ALGBRC(128) = 1.00000+STATES(1)/CONSTS(273)+STATES(59)/CONSTS(274) ALGBRC(125) = 1.00000+STATES(1)/CONSTS(271)+STATES(59)/CONSTS(272) ALGBRC(129) = ( CONSTS(151)*ALGBRC(125)*ALGBRC(85))/ALGBRC(128) ALGBRC(130) = ( CONSTS(14)*CONSTS(159)*CONSTS(154))/( ALGBRC(129)*CONSTS(152)*CONSTS(157)) ALGBRC(13) = 1.00000+STATES(20)/CONSTS(160) ALGBRC(131) = TERNRY(STATES(26).GT.CONSTS(161).AND.STATES(20).GT.CONSTS(161), ( CONSTS(14)*ALGBRC(130)*STATES(26)*STATES(20))/( ALGBRC(130)*CONSTS(157)*STATES(26)+ ALGBRC(130)*CONSTS(156)*ALGBRC(13)*STATES(20)+( CONSTS(14)*CONSTS(159)*ALGBRC(13)*STATES(15))/ALGBRC(129)+( CONSTS(14)*CONSTS(158)*STATES(27))/ALGBRC(129)+ ALGBRC(130)*STATES(26)*STATES(20)+( CONSTS(14)*CONSTS(159)*STATES(26)*STATES(15))/( ALGBRC(129)*CONSTS(152))+( CONSTS(14)*STATES(15)*STATES(27))/ALGBRC(129)+( ALGBRC(130)*CONSTS(156)*STATES(20)*STATES(27))/CONSTS(155)), 0.00000) ALGBRC(132) = TERNRY(STATES(15).GT.CONSTS(161).AND.STATES(27).GT.CONSTS(161), ALGBRC(131) - (( CONSTS(14)*ALGBRC(130)*STATES(15)*STATES(27))/ALGBRC(129))/( ALGBRC(130)*CONSTS(157)*STATES(26)+ ALGBRC(130)*CONSTS(156)*ALGBRC(13)*STATES(20)+( CONSTS(14)*CONSTS(159)*ALGBRC(13)*STATES(15))/ALGBRC(129)+( CONSTS(14)*CONSTS(158)*STATES(27))/ALGBRC(129)+ ALGBRC(130)*STATES(26)*STATES(20)+( CONSTS(14)*CONSTS(159)*STATES(26)*STATES(15))/( ALGBRC(129)*CONSTS(152))+( CONSTS(14)*STATES(15)*STATES(27))/ALGBRC(129)+( ALGBRC(130)*CONSTS(156)*STATES(20)*STATES(27))/CONSTS(155)), ALGBRC(131)) ALGBRC(126) = 1.00000+STATES(2)/CONSTS(271)+STATES(60)/CONSTS(272) ALGBRC(127) = CONSTS(16)*( (STATES(29)/ALGBRC(126))*STATES(2) - (STATES(27)/ALGBRC(125))*STATES(1)) ALGBRC(133) = 1.00000+STATES(2)/CONSTS(273)+STATES(60)/CONSTS(274) ALGBRC(134) = ( EXP(( - CONSTS(34)*STATES(3))/CONSTS(250))*ALGBRC(128)*ALGBRC(126))/( ALGBRC(133)*ALGBRC(125)) ALGBRC(135) = ( CONSTS(21)*( ALGBRC(134)*STATES(33)*STATES(27)*STATES(1) - STATES(26)*STATES(29)*STATES(2)))/( ALGBRC(134)*CONSTS(166)*CONSTS(169)*CONSTS(249)*( 2.00000*CONSTS(170)+( CONSTS(170)*STATES(33))/CONSTS(166)+( STATES(33)*STATES(27)*STATES(1))/( CONSTS(166)*CONSTS(169)*CONSTS(249))+( CONSTS(170)*STATES(26)*STATES(2))/( CONSTS(167)*CONSTS(249))+( STATES(26)*STATES(29)*STATES(2))/( CONSTS(167)*CONSTS(168)*CONSTS(249))+( CONSTS(170)*STATES(26))/CONSTS(167)+( CONSTS(170)*STATES(33)*STATES(1))/( CONSTS(166)*CONSTS(249))+( CONSTS(170)*STATES(1))/CONSTS(249)+( CONSTS(170)*STATES(29)*STATES(2))/( CONSTS(168)*CONSTS(249))+( CONSTS(170)*STATES(2))/CONSTS(249)+( CONSTS(170)*STATES(27)*STATES(1))/( CONSTS(169)*CONSTS(249)))) ALGBRC(144) = TERNRY(STATES(4).GT.CONSTS(46), 0.00000, CONSTS(46) - STATES(4)) ALGBRC(118) = 1.00000+STATES(1)/CONSTS(269) ALGBRC(122) = ( CONSTS(58)*ALGBRC(118))/( STATES(1)*ALGBRC(121)*ALGBRC(84)) ALGBRC(10) = 1.00000+STATES(14)/CONSTS(62) ALGBRC(11) = 1.00000+STATES(4)/CONSTS(63) ALGBRC(145) = TERNRY(STATES(11).GT.CONSTS(64).AND.STATES(12).GT.CONSTS(64).AND.ALGBRC(144).GT.CONSTS(64), ( CONSTS(3)*( STATES(11)*STATES(12)*ALGBRC(144) - ( STATES(13)*STATES(14)*STATES(4))/ALGBRC(122)))/( CONSTS(61)*ALGBRC(11)*STATES(11)*STATES(12)+ CONSTS(60)*ALGBRC(10)*STATES(11)*ALGBRC(144)+ CONSTS(59)*STATES(12)*ALGBRC(144)+ STATES(11)*STATES(12)*ALGBRC(144)), 0.00000) ALGBRC(119) = ( CONSTS(78)*ALGBRC(118))/( STATES(1)*STATES(1)*ALGBRC(95)) ALGBRC(47) = 1.00000+ (CONSTS(85)/ALGBRC(44))*(1.00000+ALGBRC(39)/CONSTS(84)) ALGBRC(146) = TERNRY(ALGBRC(144).GT.CONSTS(86).AND.STATES(19).GT.CONSTS(86), ( CONSTS(6)*(1.00000 - ( STATES(13)*STATES(20)*STATES(4))/( ALGBRC(119)*ALGBRC(144)*STATES(19))))/(1.00000+ CONSTS(80)/STATES(19) ** CONSTS(83)*ALGBRC(47)+ (CONSTS(79)/ALGBRC(144))*(1.00000+ CONSTS(81)/STATES(19) ** CONSTS(83)*ALGBRC(47)+( STATES(4)*ALGBRC(47))/CONSTS(82))), 0.00000) ALGBRC(120) = ( CONSTS(87)*ALGBRC(118)*ALGBRC(99))/( STATES(1)*ALGBRC(84)) ALGBRC(49) = 1.00000+ (CONSTS(95)/ALGBRC(44))*(1.00000+ALGBRC(39)/CONSTS(94)) ALGBRC(147) = TERNRY(STATES(20).GT.CONSTS(96).AND.STATES(12).GT.CONSTS(96).AND.ALGBRC(144).GT.CONSTS(96), (( CONSTS(7)*(1.00000 - ( STATES(13)*STATES(18)*STATES(4))/( ALGBRC(120)*STATES(20)*STATES(12)*ALGBRC(144))))/(1.00000+ (CONSTS(88)/STATES(20))*ALGBRC(49)+ (CONSTS(89)/STATES(12))*(1.00000+STATES(18)/CONSTS(91))+ (CONSTS(90)/ALGBRC(144))*(1.00000+STATES(4)/CONSTS(92))))/(1.00000+STATES(4)/CONSTS(93)), 0.00000) ALGBRC(105) = 1.00000+STATES(1)/CONSTS(265) ALGBRC(109) = ( CONSTS(120)*ALGBRC(108))/ALGBRC(105) ALGBRC(110) = ( CONSTS(11)*CONSTS(122))/( ALGBRC(109)*CONSTS(121)) ALGBRC(69) = ALGBRC(39) ALGBRC(75) = ALGBRC(44) ALGBRC(76) = 1.00000+STATES(16)/CONSTS(123)+ALGBRC(39)/CONSTS(124)+ALGBRC(44)/CONSTS(125)+ALGBRC(69)/CONSTS(126)+ALGBRC(75)/CONSTS(127) ALGBRC(111) = ( ALGBRC(110)*CONSTS(11)*(STATES(24) - STATES(25)/ALGBRC(109)))/( CONSTS(121)*ALGBRC(110)*ALGBRC(76)+ ALGBRC(110)*STATES(24)+( CONSTS(11)*STATES(25))/ALGBRC(109)) ALGBRC(112) = ( CONSTS(128)*ALGBRC(85))/( STATES(1)*ALGBRC(108)) ALGBRC(113) = ( CONSTS(12)*CONSTS(132)*CONSTS(135))/( ALGBRC(112)*CONSTS(129)*CONSTS(134)) ALGBRC(56) = 1.00000+ALGBRC(39)/CONSTS(137)+ALGBRC(44)/CONSTS(138)+ALGBRC(53)/CONSTS(139) ALGBRC(148) = ( CONSTS(12)*ALGBRC(113)*( ALGBRC(144)*STATES(25) - ( STATES(15)*STATES(4))/ALGBRC(112)))/( ALGBRC(113)*CONSTS(129)*CONSTS(134)*ALGBRC(56)+ ALGBRC(113)*CONSTS(134)*ALGBRC(144)+ ALGBRC(113)*CONSTS(133)*ALGBRC(56)*STATES(25)+( CONSTS(12)*CONSTS(136)*ALGBRC(56)*STATES(15))/ALGBRC(112)+( CONSTS(12)*CONSTS(135)*STATES(4))/ALGBRC(112)+ ALGBRC(113)*ALGBRC(144)*STATES(25)+( CONSTS(12)*CONSTS(136)*ALGBRC(144)*STATES(15))/( ALGBRC(112)*CONSTS(129))+( CONSTS(12)*STATES(15)*STATES(4))/ALGBRC(112)+( ALGBRC(113)*CONSTS(133)*STATES(25)*STATES(4))/CONSTS(132)+( ALGBRC(113)*ALGBRC(144)*STATES(25)*STATES(15))/CONSTS(131)+( CONSTS(12)*STATES(25)*STATES(15)*STATES(4))/( CONSTS(130)*ALGBRC(112))) ALGBRC(1) = EXP(- (CONSTS(54)+ 4.00000*CONSTS(34)*STATES(3))/CONSTS(250)) ALGBRC(4) = (( ALGBRC(1)*STATES(1) ** 5.00000)/STATES(2) ** 4.00000)/1.00000 ALGBRC(157) = CONSTS(47) - STATES(5) ALGBRC(158) = CONSTS(22)*( ALGBRC(4)*STATES(4)*ALGBRC(157) - ALGBRC(144)*STATES(5)) ALGBRC(106) = ( CONSTS(110)*ALGBRC(105))/ALGBRC(100) ALGBRC(107) = ( CONSTS(10)*CONSTS(115)*CONSTS(112))/( ALGBRC(106)*CONSTS(111)*CONSTS(114)) ALGBRC(12) = (1.00000+STATES(15)/CONSTS(117)+STATES(22)/CONSTS(118)+STATES(24)/CONSTS(119))/(1.00000+STATES(22)/CONSTS(118)+STATES(24)/CONSTS(119)) ALGBRC(159) = ( CONSTS(10)*ALGBRC(107)*( STATES(22)*ALGBRC(157) - ( STATES(5)*STATES(24))/ALGBRC(106)))/( ALGBRC(107)*CONSTS(111)*CONSTS(114)*ALGBRC(12)+ ALGBRC(107)*CONSTS(114)*STATES(22)+ ALGBRC(107)*CONSTS(113)*ALGBRC(12)*ALGBRC(157)+( CONSTS(10)*CONSTS(116)*ALGBRC(12)*STATES(5))/ALGBRC(106)+( CONSTS(10)*CONSTS(115)*STATES(24))/ALGBRC(106)+ ALGBRC(107)*STATES(22)*ALGBRC(157)+( CONSTS(10)*CONSTS(116)*STATES(22)*STATES(5))/( ALGBRC(106)*CONSTS(111))+( ALGBRC(107)*CONSTS(113)*ALGBRC(157)*STATES(24))/CONSTS(112)+( CONSTS(10)*STATES(5)*STATES(24))/ALGBRC(106)) ALGBRC(5) = EXP(- (CONSTS(55)+ 2.00000*CONSTS(34)*STATES(3))/CONSTS(250)) ALGBRC(6) = ( 1.00000*1.00000*ALGBRC(5)*STATES(1) ** 2.00000)/STATES(2) ** 4.00000 ALGBRC(164) = CONSTS(48) - STATES(7) ALGBRC(165) = (( CONSTS(23)*(1.00000+STATES(6)/CONSTS(24)))/(1.00000+STATES(6)/CONSTS(25)))*( ALGBRC(6) ** 0.500000*ALGBRC(164)*STATES(5) ** 0.500000 - STATES(7)*ALGBRC(157) ** 0.500000) ALGBRC(7) = EXP(- (CONSTS(56)+ 4.00000*CONSTS(34)*STATES(3))/CONSTS(250)) ALGBRC(8) = (( ALGBRC(7)*STATES(1) ** 4.00000)/STATES(2) ** 2.00000)/( 1.00000*1.00000) ALGBRC(166) = (( (( CONSTS(26)*STATES(8))/(STATES(8)+CONSTS(45)))*EXP(( CONSTS(34)*STATES(3))/CONSTS(250))*STATES(7))/CONSTS(48))*( ALGBRC(8) ** 1.00000/2.00000*STATES(7)*STATES(8) ** 1.00000/4.00000 - ALGBRC(164)) ALGBRC(33) = TERNRY(ABS(STATES(3)).GT.CONSTS(173), ( CONSTS(32)*STATES(3)*( STATES(2)*EXP(( CONSTS(34)*STATES(3))/CONSTS(250)) - STATES(1)))/(EXP(( CONSTS(34)*STATES(3))/CONSTS(250)) - 1.00000), ( CONSTS(32)*CONSTS(250)*(STATES(2) - STATES(1)))/CONSTS(34)) ALGBRC(169) = - (( STATES(1)*STATES(1))/( CONSTS(230)*CONSTS(231)*CONSTS(284) ** 2.00000)+( STATES(1)*STATES(9))/( CONSTS(297)*CONSTS(301)*ALGBRC(37) ** 2.00000)+( STATES(1)*STATES(10))/( CONSTS(305)*CONSTS(307)*ALGBRC(42) ** 2.00000)+( STATES(1)*STATES(17))/( CONSTS(311)*CONSTS(313)*ALGBRC(51) ** 2.00000)+( STATES(1)*STATES(23))/( CONSTS(297)*CONSTS(301)*ALGBRC(67) ** 2.00000)+( STATES(1)*STATES(21))/( CONSTS(305)*CONSTS(307)*ALGBRC(73) ** 2.00000)+( STATES(1)*STATES(6))/( CONSTS(251)*CONSTS(252)*ALGBRC(77) ** 2.00000)+( STATES(1)*STATES(4))/( CONSTS(206)*CONSTS(207)*CONSTS(276) ** 2.00000)+( STATES(1)*ALGBRC(144))/( CONSTS(203)*CONSTS(204)*CONSTS(275) ** 2.00000)+( STATES(1)*STATES(5))/( CONSTS(209)*CONSTS(210)*CONSTS(277) ** 2.00000)+( STATES(1)*ALGBRC(157))/( CONSTS(212)*CONSTS(213)*CONSTS(278) ** 2.00000)+( STATES(1)*STATES(11))/( CONSTS(199)*CONSTS(270)*ALGBRC(121) ** 2.00000)+( STATES(1)*STATES(15))/( CONSTS(190)*CONSTS(255)*ALGBRC(85) ** 2.00000)+( STATES(1)*STATES(14))/( CONSTS(215)*CONSTS(216)*CONSTS(279) ** 2.00000)+( STATES(1)*STATES(16))/( CONSTS(256)*CONSTS(257)*ALGBRC(86) ** 2.00000)+( STATES(1)*STATES(19))/( CONSTS(259)*CONSTS(260)*ALGBRC(95) ** 2.00000)+( STATES(1)*STATES(20))/( CONSTS(218)*CONSTS(219)*CONSTS(280) ** 2.00000)+( STATES(1)*STATES(18))/( CONSTS(261)*CONSTS(193)*ALGBRC(99) ** 2.00000)+( STATES(1)*STATES(12))/( CONSTS(254)*CONSTS(188)*ALGBRC(84) ** 2.00000)+( STATES(1)*STATES(22))/( CONSTS(262)*CONSTS(263)*ALGBRC(100) ** 2.00000)+( STATES(1)*STATES(24))/( CONSTS(265)*CONSTS(195)*ALGBRC(105) ** 2.00000)+( STATES(1)*STATES(25))/( CONSTS(266)*CONSTS(267)*ALGBRC(108) ** 2.00000)+( STATES(1)*STATES(27))/( CONSTS(271)*CONSTS(272)*ALGBRC(125) ** 2.00000)+( STATES(1)*STATES(26))/( CONSTS(273)*CONSTS(274)*ALGBRC(128) ** 2.00000)+( STATES(1)*STATES(55))/( CONSTS(236)*CONSTS(237)*CONSTS(286) ** 2.00000)+( STATES(1)*STATES(59))/( CONSTS(233)*CONSTS(234)*CONSTS(285) ** 2.00000)+( STATES(1)*STATES(8))/( CONSTS(221)*CONSTS(222)*CONSTS(281) ** 2.00000)+( STATES(1)*CONSTS(295))/( CONSTS(224)*CONSTS(225)*CONSTS(282) ** 2.00000)+( STATES(1)*CONSTS(287))/( CONSTS(227)*CONSTS(228)*CONSTS(283) ** 2.00000)+( STATES(1)*STATES(13))/( CONSTS(269)*CONSTS(197)*ALGBRC(118) ** 2.00000)) ALGBRC(170) = - (( STATES(1)*STATES(1))/( CONSTS(230)*CONSTS(232)*CONSTS(284) ** 2.00000)+( STATES(1)*STATES(9))/( CONSTS(297)*CONSTS(303)*ALGBRC(37) ** 2.00000)+( STATES(1)*STATES(10))/( CONSTS(305)*CONSTS(309)*ALGBRC(42) ** 2.00000)+( STATES(1)*STATES(17))/( CONSTS(311)*CONSTS(315)*ALGBRC(51) ** 2.00000)+( STATES(1)*STATES(23))/( CONSTS(297)*CONSTS(303)*ALGBRC(67) ** 2.00000)+( STATES(1)*STATES(21))/( CONSTS(305)*CONSTS(309)*ALGBRC(73) ** 2.00000)+( STATES(1)*STATES(6))/( CONSTS(251)*CONSTS(253)*ALGBRC(77) ** 2.00000)+( STATES(1)*STATES(4))/( CONSTS(206)*CONSTS(208)*CONSTS(276) ** 2.00000)+( STATES(1)*ALGBRC(144))/( CONSTS(203)*CONSTS(205)*CONSTS(275) ** 2.00000)+( STATES(1)*STATES(5))/( CONSTS(209)*CONSTS(211)*CONSTS(277) ** 2.00000)+( STATES(1)*ALGBRC(157))/( CONSTS(212)*CONSTS(214)*CONSTS(278) ** 2.00000)+( STATES(1)*STATES(11))/( CONSTS(199)*CONSTS(200)*ALGBRC(121) ** 2.00000)+( STATES(1)*STATES(15))/( CONSTS(190)*CONSTS(191)*ALGBRC(85) ** 2.00000)+( STATES(1)*STATES(14))/( CONSTS(215)*CONSTS(217)*CONSTS(279) ** 2.00000)+( STATES(1)*STATES(16))/( CONSTS(256)*CONSTS(258)*ALGBRC(86) ** 2.00000)+( STATES(1)*STATES(19))/( CONSTS(259)*CONSTS(192)*ALGBRC(95) ** 2.00000)+( STATES(1)*STATES(20))/( CONSTS(218)*CONSTS(220)*CONSTS(280) ** 2.00000)+( STATES(1)*STATES(18))/( CONSTS(261)*CONSTS(194)*ALGBRC(99) ** 2.00000)+( STATES(1)*STATES(12))/( CONSTS(254)*CONSTS(189)*ALGBRC(84) ** 2.00000)+( STATES(1)*STATES(22))/( CONSTS(262)*CONSTS(264)*ALGBRC(100) ** 2.00000)+( STATES(1)*STATES(24))/( CONSTS(265)*CONSTS(196)*ALGBRC(105) ** 2.00000)+( STATES(1)*STATES(25))/( CONSTS(266)*CONSTS(268)*ALGBRC(108) ** 2.00000)+( STATES(1)*STATES(27))/( CONSTS(271)*CONSTS(201)*ALGBRC(125) ** 2.00000)+( STATES(1)*STATES(26))/( CONSTS(273)*CONSTS(202)*ALGBRC(128) ** 2.00000)+( STATES(1)*STATES(55))/( CONSTS(236)*CONSTS(238)*CONSTS(286) ** 2.00000)+( STATES(1)*STATES(59))/( CONSTS(233)*CONSTS(235)*CONSTS(285) ** 2.00000)+( STATES(1)*STATES(8))/( CONSTS(221)*CONSTS(223)*CONSTS(281) ** 2.00000)+( STATES(1)*CONSTS(295))/( CONSTS(224)*CONSTS(226)*CONSTS(282) ** 2.00000)+( STATES(1)*CONSTS(287))/( CONSTS(227)*CONSTS(229)*CONSTS(283) ** 2.00000)+( STATES(1)*STATES(13))/( CONSTS(269)*CONSTS(198)*ALGBRC(118) ** 2.00000)) ALGBRC(173) = - (( STATES(59)*STATES(1))/( CONSTS(231)*CONSTS(232)*CONSTS(284) ** 2.00000)+( STATES(59)*STATES(9))/( CONSTS(301)*CONSTS(303)*ALGBRC(37) ** 2.00000)+( STATES(59)*STATES(10))/( CONSTS(307)*CONSTS(309)*ALGBRC(42) ** 2.00000)+( STATES(59)*STATES(17))/( CONSTS(313)*CONSTS(315)*ALGBRC(51) ** 2.00000)+( STATES(59)*STATES(23))/( CONSTS(301)*CONSTS(303)*ALGBRC(67) ** 2.00000)+( STATES(59)*STATES(21))/( CONSTS(307)*CONSTS(309)*ALGBRC(73) ** 2.00000)+( STATES(59)*STATES(6))/( CONSTS(252)*CONSTS(253)*ALGBRC(77) ** 2.00000)+( STATES(59)*STATES(4))/( CONSTS(207)*CONSTS(208)*CONSTS(276) ** 2.00000)+( STATES(59)*ALGBRC(144))/( CONSTS(204)*CONSTS(205)*CONSTS(275) ** 2.00000)+( STATES(59)*STATES(5))/( CONSTS(210)*CONSTS(211)*CONSTS(277) ** 2.00000)+( STATES(59)*ALGBRC(157))/( CONSTS(213)*CONSTS(214)*CONSTS(278) ** 2.00000)+( STATES(59)*STATES(11))/( CONSTS(270)*CONSTS(200)*ALGBRC(121) ** 2.00000)+( STATES(59)*STATES(15))/( CONSTS(255)*CONSTS(191)*ALGBRC(85) ** 2.00000)+( STATES(59)*STATES(14))/( CONSTS(216)*CONSTS(217)*CONSTS(279) ** 2.00000)+( STATES(59)*STATES(16))/( CONSTS(257)*CONSTS(258)*ALGBRC(86) ** 2.00000)+( STATES(59)*STATES(19))/( CONSTS(260)*CONSTS(192)*ALGBRC(95) ** 2.00000)+( STATES(59)*STATES(20))/( CONSTS(219)*CONSTS(220)*CONSTS(280) ** 2.00000)+( STATES(59)*STATES(18))/( CONSTS(193)*CONSTS(194)*ALGBRC(99) ** 2.00000)+( STATES(59)*STATES(12))/( CONSTS(188)*CONSTS(189)*ALGBRC(84) ** 2.00000)+( STATES(59)*STATES(22))/( CONSTS(263)*CONSTS(264)*ALGBRC(100) ** 2.00000)+( STATES(59)*STATES(24))/( CONSTS(195)*CONSTS(196)*ALGBRC(105) ** 2.00000)+( STATES(59)*STATES(25))/( CONSTS(267)*CONSTS(268)*ALGBRC(108) ** 2.00000)+( STATES(59)*STATES(27))/( CONSTS(272)*CONSTS(201)*ALGBRC(125) ** 2.00000)+( STATES(59)*STATES(26))/( CONSTS(274)*CONSTS(202)*ALGBRC(128) ** 2.00000)+( STATES(59)*STATES(55))/( CONSTS(237)*CONSTS(238)*CONSTS(286) ** 2.00000)+( STATES(59)*STATES(59))/( CONSTS(234)*CONSTS(235)*CONSTS(285) ** 2.00000)+( STATES(59)*STATES(8))/( CONSTS(222)*CONSTS(223)*CONSTS(281) ** 2.00000)+( STATES(59)*CONSTS(295))/( CONSTS(225)*CONSTS(226)*CONSTS(282) ** 2.00000)+( STATES(59)*CONSTS(287))/( CONSTS(228)*CONSTS(229)*CONSTS(283) ** 2.00000)+( STATES(59)*STATES(13))/( CONSTS(197)*CONSTS(198)*ALGBRC(118) ** 2.00000)) ALGBRC(176) = - (( STATES(55)*STATES(1))/( CONSTS(232)*CONSTS(231)*CONSTS(284) ** 2.00000)+( STATES(55)*STATES(9))/( CONSTS(303)*CONSTS(301)*ALGBRC(37) ** 2.00000)+( STATES(55)*STATES(10))/( CONSTS(309)*CONSTS(307)*ALGBRC(42) ** 2.00000)+( STATES(55)*STATES(17))/( CONSTS(315)*CONSTS(313)*ALGBRC(51) ** 2.00000)+( STATES(55)*STATES(23))/( CONSTS(303)*CONSTS(301)*ALGBRC(67) ** 2.00000)+( STATES(55)*STATES(21))/( CONSTS(309)*CONSTS(307)*ALGBRC(73) ** 2.00000)+( STATES(55)*STATES(6))/( CONSTS(253)*CONSTS(252)*ALGBRC(77) ** 2.00000)+( STATES(55)*STATES(4))/( CONSTS(208)*CONSTS(207)*CONSTS(276) ** 2.00000)+( STATES(55)*ALGBRC(144))/( CONSTS(205)*CONSTS(204)*CONSTS(275) ** 2.00000)+( STATES(55)*STATES(5))/( CONSTS(211)*CONSTS(210)*CONSTS(277) ** 2.00000)+( STATES(55)*ALGBRC(157))/( CONSTS(214)*CONSTS(213)*CONSTS(278) ** 2.00000)+( STATES(55)*STATES(11))/( CONSTS(200)*CONSTS(270)*ALGBRC(121) ** 2.00000)+( STATES(55)*STATES(15))/( CONSTS(191)*CONSTS(255)*ALGBRC(85) ** 2.00000)+( STATES(55)*STATES(14))/( CONSTS(217)*CONSTS(216)*CONSTS(279) ** 2.00000)+( STATES(55)*STATES(16))/( CONSTS(258)*CONSTS(257)*ALGBRC(86) ** 2.00000)+( STATES(55)*STATES(19))/( CONSTS(192)*CONSTS(260)*ALGBRC(95) ** 2.00000)+( STATES(55)*STATES(20))/( CONSTS(220)*CONSTS(219)*CONSTS(280) ** 2.00000)+( STATES(55)*STATES(18))/( CONSTS(194)*CONSTS(193)*ALGBRC(99) ** 2.00000)+( STATES(55)*STATES(12))/( CONSTS(189)*CONSTS(188)*ALGBRC(84) ** 2.00000)+( STATES(55)*STATES(22))/( CONSTS(264)*CONSTS(263)*ALGBRC(100) ** 2.00000)+( STATES(55)*STATES(24))/( CONSTS(196)*CONSTS(195)*ALGBRC(105) ** 2.00000)+( STATES(55)*STATES(25))/( CONSTS(268)*CONSTS(267)*ALGBRC(108) ** 2.00000)+( STATES(55)*STATES(27))/( CONSTS(201)*CONSTS(272)*ALGBRC(125) ** 2.00000)+( STATES(55)*STATES(26))/( CONSTS(202)*CONSTS(274)*ALGBRC(128) ** 2.00000)+( STATES(55)*STATES(55))/( CONSTS(238)*CONSTS(237)*CONSTS(286) ** 2.00000)+( STATES(55)*STATES(59))/( CONSTS(235)*CONSTS(234)*CONSTS(285) ** 2.00000)+( STATES(55)*STATES(8))/( CONSTS(223)*CONSTS(222)*CONSTS(281) ** 2.00000)+( STATES(55)*CONSTS(295))/( CONSTS(226)*CONSTS(225)*CONSTS(282) ** 2.00000)+( STATES(55)*CONSTS(287))/( CONSTS(229)*CONSTS(228)*CONSTS(283) ** 2.00000)+( STATES(55)*STATES(13))/( CONSTS(198)*CONSTS(197)*ALGBRC(118) ** 2.00000)) ALGBRC(177) = ( (1.00000+STATES(1)/CONSTS(230)+STATES(59)/CONSTS(231))*STATES(1))/( CONSTS(232)*CONSTS(284) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(297)+STATES(59)/CONSTS(301))*STATES(9))/( CONSTS(303)*ALGBRC(37) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(305)+STATES(59)/CONSTS(307))*STATES(10))/( CONSTS(309)*ALGBRC(42) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(311)+STATES(59)/CONSTS(313))*STATES(17))/( CONSTS(315)*ALGBRC(51) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(297)+STATES(59)/CONSTS(301))*STATES(23))/( CONSTS(303)*ALGBRC(67) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(305)+STATES(59)/CONSTS(307))*STATES(21))/( CONSTS(309)*ALGBRC(73) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(251)+STATES(59)/CONSTS(252))*STATES(6))/( CONSTS(253)*ALGBRC(77) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(206)+STATES(59)/CONSTS(207))*STATES(4))/( CONSTS(208)*CONSTS(276) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(203)+STATES(59)/CONSTS(204))*ALGBRC(144))/( CONSTS(205)*CONSTS(275) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(209)+STATES(59)/CONSTS(210))*STATES(5))/( CONSTS(211)*CONSTS(277) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(212)+STATES(59)/CONSTS(213))*ALGBRC(157))/( CONSTS(214)*CONSTS(278) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(199)+STATES(59)/CONSTS(270))*STATES(11))/( CONSTS(200)*ALGBRC(121) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(190)+STATES(59)/CONSTS(255))*STATES(15))/( CONSTS(191)*ALGBRC(85) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(215)+STATES(59)/CONSTS(216))*STATES(14))/( CONSTS(217)*CONSTS(279) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(256)+STATES(59)/CONSTS(257))*STATES(16))/( CONSTS(258)*ALGBRC(86) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(259)+STATES(59)/CONSTS(260))*STATES(19))/( CONSTS(192)*ALGBRC(95) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(218)+STATES(59)/CONSTS(219))*STATES(20))/( CONSTS(220)*CONSTS(280) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(261)+STATES(59)/CONSTS(193))*STATES(18))/( CONSTS(194)*ALGBRC(99) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(254)+STATES(59)/CONSTS(188))*STATES(12))/( CONSTS(189)*ALGBRC(84) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(262)+STATES(59)/CONSTS(263))*STATES(22))/( CONSTS(264)*ALGBRC(100) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(265)+STATES(59)/CONSTS(195))*STATES(24))/( CONSTS(196)*ALGBRC(105) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(266)+STATES(59)/CONSTS(267))*STATES(25))/( CONSTS(268)*ALGBRC(108) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(271)+STATES(59)/CONSTS(272))*STATES(27))/( CONSTS(201)*ALGBRC(125) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(273)+STATES(59)/CONSTS(274))*STATES(26))/( CONSTS(202)*ALGBRC(128) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(236)+STATES(59)/CONSTS(237))*STATES(55))/( CONSTS(238)*CONSTS(286) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(233)+STATES(59)/CONSTS(234))*STATES(59))/( CONSTS(235)*CONSTS(285) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(221)+STATES(59)/CONSTS(222))*STATES(8))/( CONSTS(223)*CONSTS(281) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(224)+STATES(59)/CONSTS(225))*CONSTS(295))/( CONSTS(226)*CONSTS(282) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(227)+STATES(59)/CONSTS(228))*CONSTS(287))/( CONSTS(229)*CONSTS(283) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(269)+STATES(59)/CONSTS(197))*STATES(13))/( CONSTS(198)*ALGBRC(118) ** 2.00000) ALGBRC(186) = 1.00000+ALGBRC(177) ALGBRC(174) = ( (1.00000+STATES(1)/CONSTS(230)+STATES(55)/CONSTS(232))*STATES(1))/( CONSTS(231)*CONSTS(284) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(297)+STATES(55)/CONSTS(303))*STATES(9))/( CONSTS(301)*ALGBRC(37) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(305)+STATES(55)/CONSTS(309))*STATES(10))/( CONSTS(307)*ALGBRC(42) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(311)+STATES(55)/CONSTS(315))*STATES(17))/( CONSTS(313)*ALGBRC(51) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(297)+STATES(55)/CONSTS(303))*STATES(23))/( CONSTS(301)*ALGBRC(67) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(305)+STATES(55)/CONSTS(309))*STATES(21))/( CONSTS(307)*ALGBRC(73) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(251)+STATES(55)/CONSTS(253))*STATES(6))/( CONSTS(252)*ALGBRC(77) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(206)+STATES(55)/CONSTS(208))*STATES(4))/( CONSTS(207)*CONSTS(276) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(203)+STATES(55)/CONSTS(205))*ALGBRC(144))/( CONSTS(204)*CONSTS(275) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(209)+STATES(55)/CONSTS(211))*STATES(5))/( CONSTS(210)*CONSTS(277) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(212)+STATES(55)/CONSTS(214))*ALGBRC(157))/( CONSTS(213)*CONSTS(278) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(199)+STATES(55)/CONSTS(200))*STATES(11))/( CONSTS(270)*ALGBRC(121) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(190)+STATES(55)/CONSTS(191))*STATES(15))/( CONSTS(255)*ALGBRC(85) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(215)+STATES(55)/CONSTS(217))*STATES(14))/( CONSTS(216)*CONSTS(279) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(256)+STATES(55)/CONSTS(258))*STATES(16))/( CONSTS(257)*ALGBRC(86) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(259)+STATES(55)/CONSTS(192))*STATES(19))/( CONSTS(260)*ALGBRC(95) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(218)+STATES(55)/CONSTS(220))*STATES(20))/( CONSTS(219)*CONSTS(280) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(261)+STATES(55)/CONSTS(194))*STATES(18))/( CONSTS(193)*ALGBRC(99) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(254)+STATES(55)/CONSTS(189))*STATES(12))/( CONSTS(188)*ALGBRC(84) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(262)+STATES(55)/CONSTS(264))*STATES(22))/( CONSTS(263)*ALGBRC(100) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(265)+STATES(55)/CONSTS(196))*STATES(24))/( CONSTS(195)*ALGBRC(105) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(266)+STATES(55)/CONSTS(268))*STATES(25))/( CONSTS(267)*ALGBRC(108) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(271)+STATES(55)/CONSTS(201))*STATES(27))/( CONSTS(272)*ALGBRC(125) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(273)+STATES(55)/CONSTS(202))*STATES(26))/( CONSTS(274)*ALGBRC(128) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(236)+STATES(55)/CONSTS(238))*STATES(55))/( CONSTS(237)*CONSTS(286) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(233)+STATES(55)/CONSTS(235))*STATES(59))/( CONSTS(234)*CONSTS(285) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(221)+STATES(55)/CONSTS(223))*STATES(8))/( CONSTS(222)*CONSTS(281) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(224)+STATES(55)/CONSTS(226))*CONSTS(295))/( CONSTS(225)*CONSTS(282) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(227)+STATES(55)/CONSTS(229))*CONSTS(287))/( CONSTS(228)*CONSTS(283) ** 2.00000)+( (1.00000+STATES(1)/CONSTS(269)+STATES(55)/CONSTS(198))*STATES(13))/( CONSTS(197)*ALGBRC(118) ** 2.00000) ALGBRC(185) = 1.00000+ALGBRC(174) ALGBRC(171) = ( (1.00000+STATES(59)/CONSTS(231)+STATES(55)/CONSTS(232))*STATES(1))/( CONSTS(230)*CONSTS(284) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(301)+STATES(55)/CONSTS(303))*STATES(9))/( CONSTS(297)*ALGBRC(37) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(307)+STATES(55)/CONSTS(309))*STATES(10))/( CONSTS(305)*ALGBRC(42) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(313)+STATES(55)/CONSTS(315))*STATES(17))/( CONSTS(311)*ALGBRC(51) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(301)+STATES(55)/CONSTS(303))*STATES(23))/( CONSTS(297)*ALGBRC(67) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(307)+STATES(55)/CONSTS(309))*STATES(21))/( CONSTS(305)*ALGBRC(73) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(252)+STATES(55)/CONSTS(253))*STATES(6))/( CONSTS(251)*ALGBRC(77) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(207)+STATES(55)/CONSTS(208))*STATES(4))/( CONSTS(206)*CONSTS(276) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(204)+STATES(55)/CONSTS(205))*ALGBRC(144))/( CONSTS(203)*CONSTS(275) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(210)+STATES(55)/CONSTS(211))*STATES(5))/( CONSTS(209)*CONSTS(277) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(213)+STATES(55)/CONSTS(214))*ALGBRC(157))/( CONSTS(212)*CONSTS(278) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(270)+STATES(55)/CONSTS(200))*STATES(11))/( CONSTS(199)*ALGBRC(121) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(255)+STATES(55)/CONSTS(191))*STATES(15))/( CONSTS(190)*ALGBRC(85) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(216)+STATES(55)/CONSTS(217))*STATES(14))/( CONSTS(215)*CONSTS(279) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(257)+STATES(55)/CONSTS(258))*STATES(16))/( CONSTS(256)*ALGBRC(86) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(260)+STATES(55)/CONSTS(192))*STATES(19))/( CONSTS(259)*ALGBRC(95) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(219)+STATES(55)/CONSTS(220))*STATES(20))/( CONSTS(218)*CONSTS(280) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(193)+STATES(55)/CONSTS(194))*STATES(18))/( CONSTS(261)*ALGBRC(99) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(188)+STATES(55)/CONSTS(189))*STATES(12))/( CONSTS(254)*ALGBRC(84) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(263)+STATES(55)/CONSTS(264))*STATES(22))/( CONSTS(262)*ALGBRC(100) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(195)+STATES(55)/CONSTS(196))*STATES(24))/( CONSTS(265)*ALGBRC(105) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(267)+STATES(55)/CONSTS(268))*STATES(25))/( CONSTS(266)*ALGBRC(108) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(272)+STATES(55)/CONSTS(201))*STATES(27))/( CONSTS(271)*ALGBRC(125) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(274)+STATES(55)/CONSTS(202))*STATES(26))/( CONSTS(273)*ALGBRC(128) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(237)+STATES(55)/CONSTS(238))*STATES(55))/( CONSTS(236)*CONSTS(286) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(234)+STATES(55)/CONSTS(235))*STATES(59))/( CONSTS(233)*CONSTS(285) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(222)+STATES(55)/CONSTS(223))*STATES(8))/( CONSTS(221)*CONSTS(281) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(225)+STATES(55)/CONSTS(226))*CONSTS(295))/( CONSTS(224)*CONSTS(282) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(228)+STATES(55)/CONSTS(229))*CONSTS(287))/( CONSTS(227)*CONSTS(283) ** 2.00000)+( (1.00000+STATES(59)/CONSTS(197)+STATES(55)/CONSTS(198))*STATES(13))/( CONSTS(269)*ALGBRC(118) ** 2.00000) ALGBRC(184) = 1.00000+ALGBRC(171)+CONSTS(244)/( CONSTS(245)*1.00000+STATES(1)/CONSTS(245) ** 2.00000) ALGBRC(175) = - (( STATES(55)*STATES(1))/( CONSTS(232)*CONSTS(230)*CONSTS(284) ** 2.00000)+( STATES(55)*STATES(9))/( CONSTS(303)*CONSTS(297)*ALGBRC(37) ** 2.00000)+( STATES(55)*STATES(10))/( CONSTS(309)*CONSTS(305)*ALGBRC(42) ** 2.00000)+( STATES(55)*STATES(17))/( CONSTS(315)*CONSTS(311)*ALGBRC(51) ** 2.00000)+( STATES(55)*STATES(23))/( CONSTS(303)*CONSTS(297)*ALGBRC(67) ** 2.00000)+( STATES(55)*STATES(21))/( CONSTS(309)*CONSTS(305)*ALGBRC(73) ** 2.00000)+( STATES(55)*STATES(6))/( CONSTS(253)*CONSTS(251)*ALGBRC(77) ** 2.00000)+( STATES(55)*STATES(4))/( CONSTS(208)*CONSTS(206)*CONSTS(276) ** 2.00000)+( STATES(55)*ALGBRC(144))/( CONSTS(205)*CONSTS(203)*CONSTS(275) ** 2.00000)+( STATES(55)*STATES(5))/( CONSTS(211)*CONSTS(209)*CONSTS(277) ** 2.00000)+( STATES(55)*ALGBRC(157))/( CONSTS(214)*CONSTS(212)*CONSTS(278) ** 2.00000)+( STATES(55)*STATES(11))/( CONSTS(200)*CONSTS(199)*ALGBRC(121) ** 2.00000)+( STATES(55)*STATES(15))/( CONSTS(191)*CONSTS(190)*ALGBRC(85) ** 2.00000)+( STATES(55)*STATES(14))/( CONSTS(217)*CONSTS(215)*CONSTS(279) ** 2.00000)+( STATES(55)*STATES(16))/( CONSTS(258)*CONSTS(256)*ALGBRC(86) ** 2.00000)+( STATES(55)*STATES(19))/( CONSTS(192)*CONSTS(259)*ALGBRC(95) ** 2.00000)+( STATES(55)*STATES(20))/( CONSTS(220)*CONSTS(218)*CONSTS(280) ** 2.00000)+( STATES(55)*STATES(18))/( CONSTS(194)*CONSTS(261)*ALGBRC(99) ** 2.00000)+( STATES(55)*STATES(12))/( CONSTS(189)*CONSTS(254)*ALGBRC(84) ** 2.00000)+( STATES(55)*STATES(22))/( CONSTS(264)*CONSTS(262)*ALGBRC(100) ** 2.00000)+( STATES(55)*STATES(24))/( CONSTS(196)*CONSTS(265)*ALGBRC(105) ** 2.00000)+( STATES(55)*STATES(25))/( CONSTS(268)*CONSTS(266)*ALGBRC(108) ** 2.00000)+( STATES(55)*STATES(27))/( CONSTS(201)*CONSTS(271)*ALGBRC(125) ** 2.00000)+( STATES(55)*STATES(26))/( CONSTS(202)*CONSTS(273)*ALGBRC(128) ** 2.00000)+( STATES(55)*STATES(55))/( CONSTS(238)*CONSTS(236)*CONSTS(286) ** 2.00000)+( STATES(55)*STATES(59))/( CONSTS(235)*CONSTS(233)*CONSTS(285) ** 2.00000)+( STATES(55)*STATES(8))/( CONSTS(223)*CONSTS(221)*CONSTS(281) ** 2.00000)+( STATES(55)*CONSTS(295))/( CONSTS(226)*CONSTS(224)*CONSTS(282) ** 2.00000)+( STATES(55)*CONSTS(287))/( CONSTS(229)*CONSTS(227)*CONSTS(283) ** 2.00000)+( STATES(55)*STATES(13))/( CONSTS(198)*CONSTS(269)*ALGBRC(118) ** 2.00000)) ALGBRC(172) = - (( STATES(59)*STATES(1))/( CONSTS(231)*CONSTS(230)*CONSTS(284) ** 2.00000)+( STATES(59)*STATES(9))/( CONSTS(301)*CONSTS(297)*ALGBRC(37) ** 2.00000)+( STATES(59)*STATES(10))/( CONSTS(307)*CONSTS(305)*ALGBRC(42) ** 2.00000)+( STATES(59)*STATES(17))/( CONSTS(313)*CONSTS(311)*ALGBRC(51) ** 2.00000)+( STATES(59)*STATES(23))/( CONSTS(301)*CONSTS(297)*ALGBRC(67) ** 2.00000)+( STATES(59)*STATES(21))/( CONSTS(307)*CONSTS(305)*ALGBRC(73) ** 2.00000)+( STATES(59)*STATES(6))/( CONSTS(252)*CONSTS(251)*ALGBRC(77) ** 2.00000)+( STATES(59)*STATES(4))/( CONSTS(207)*CONSTS(206)*CONSTS(276) ** 2.00000)+( STATES(59)*ALGBRC(144))/( CONSTS(204)*CONSTS(203)*CONSTS(275) ** 2.00000)+( STATES(59)*STATES(5))/( CONSTS(210)*CONSTS(209)*CONSTS(277) ** 2.00000)+( STATES(59)*ALGBRC(157))/( CONSTS(213)*CONSTS(212)*CONSTS(278) ** 2.00000)+( STATES(59)*STATES(11))/( CONSTS(270)*CONSTS(199)*ALGBRC(121) ** 2.00000)+( STATES(59)*STATES(15))/( CONSTS(255)*CONSTS(190)*ALGBRC(85) ** 2.00000)+( STATES(59)*STATES(14))/( CONSTS(216)*CONSTS(215)*CONSTS(279) ** 2.00000)+( STATES(59)*STATES(16))/( CONSTS(257)*CONSTS(256)*ALGBRC(86) ** 2.00000)+( STATES(59)*STATES(19))/( CONSTS(260)*CONSTS(259)*ALGBRC(95) ** 2.00000)+( STATES(59)*STATES(20))/( CONSTS(219)*CONSTS(218)*CONSTS(280) ** 2.00000)+( STATES(59)*STATES(18))/( CONSTS(193)*CONSTS(261)*ALGBRC(99) ** 2.00000)+( STATES(59)*STATES(12))/( CONSTS(188)*CONSTS(254)*ALGBRC(84) ** 2.00000)+( STATES(59)*STATES(22))/( CONSTS(263)*CONSTS(262)*ALGBRC(100) ** 2.00000)+( STATES(59)*STATES(24))/( CONSTS(195)*CONSTS(265)*ALGBRC(105) ** 2.00000)+( STATES(59)*STATES(25))/( CONSTS(267)*CONSTS(266)*ALGBRC(108) ** 2.00000)+( STATES(59)*STATES(27))/( CONSTS(272)*CONSTS(271)*ALGBRC(125) ** 2.00000)+( STATES(59)*STATES(26))/( CONSTS(274)*CONSTS(273)*ALGBRC(128) ** 2.00000)+( STATES(59)*STATES(55))/( CONSTS(237)*CONSTS(236)*CONSTS(286) ** 2.00000)+( STATES(59)*STATES(59))/( CONSTS(234)*CONSTS(233)*CONSTS(285) ** 2.00000)+( STATES(59)*STATES(8))/( CONSTS(222)*CONSTS(221)*CONSTS(281) ** 2.00000)+( STATES(59)*CONSTS(295))/( CONSTS(225)*CONSTS(224)*CONSTS(282) ** 2.00000)+( STATES(59)*CONSTS(287))/( CONSTS(228)*CONSTS(227)*CONSTS(283) ** 2.00000)+( STATES(59)*STATES(13))/( CONSTS(197)*CONSTS(269)*ALGBRC(118) ** 2.00000)) ALGBRC(187) = ((( ALGBRC(184)*ALGBRC(176)*ALGBRC(173)+ ALGBRC(186)*ALGBRC(169)*ALGBRC(172)+ ALGBRC(185)*ALGBRC(170)*ALGBRC(175)) - ALGBRC(185)*ALGBRC(186)*ALGBRC(184)) - ALGBRC(170)*ALGBRC(176)*ALGBRC(172)) - ALGBRC(169)*ALGBRC(173)*ALGBRC(175) ALGBRC(136) = ((ALGBRC(59)+ALGBRC(79)) - ALGBRC(64))/CONSTS(35) ALGBRC(137) = ((- ALGBRC(59) - ALGBRC(79))+ALGBRC(64))/CONSTS(35) ALGBRC(138) = (ALGBRC(103) - ALGBRC(59))/CONSTS(35) ALGBRC(139) = (- ALGBRC(103)+ALGBRC(59))/CONSTS(35) ALGBRC(140) = (((- ALGBRC(103) - ALGBRC(79))+ALGBRC(83)) - ALGBRC(116))/CONSTS(35) ALGBRC(160) = ((ALGBRC(145)+ALGBRC(146)+ALGBRC(147)+ALGBRC(148)) - ALGBRC(158))/CONSTS(35) ALGBRC(167) = ((ALGBRC(159)+ALGBRC(158)) - ALGBRC(165))/CONSTS(35) ALGBRC(149) = (- ALGBRC(145)+ALGBRC(124))/CONSTS(35) ALGBRC(150) = (ALGBRC(145) - ALGBRC(90))/CONSTS(35) ALGBRC(141) = (- ALGBRC(98)+ALGBRC(115)+ALGBRC(90))/CONSTS(35) ALGBRC(151) = (ALGBRC(98) - ALGBRC(146))/CONSTS(35) ALGBRC(152) = (((ALGBRC(146) - ALGBRC(147)) - ALGBRC(132))+ALGBRC(14))/CONSTS(35) ALGBRC(153) = (ALGBRC(147) - ALGBRC(103))/CONSTS(35) ALGBRC(154) = ((- ALGBRC(145) - ALGBRC(147))+ALGBRC(103)+ALGBRC(90))/CONSTS(35) ALGBRC(161) = ((ALGBRC(103) - ALGBRC(159))+ALGBRC(117))/CONSTS(35) ALGBRC(162) = (ALGBRC(159) - ALGBRC(111))/CONSTS(35) ALGBRC(155) = (((((ALGBRC(111) - ALGBRC(148))+ALGBRC(116)) - ALGBRC(14)) - ALGBRC(115)) - ALGBRC(117))/CONSTS(35) ALGBRC(156) = (- ALGBRC(90)+ALGBRC(148)+ALGBRC(132))/CONSTS(35) ALGBRC(142) = ((ALGBRC(132)+ALGBRC(127)) - ALGBRC(135))/CONSTS(35) ALGBRC(143) = (- ALGBRC(132)+ALGBRC(135))/CONSTS(35) ALGBRC(163) = - ALGBRC(160) ALGBRC(168) = - ALGBRC(167) ALGBRC(178) = (((- ALGBRC(145)+ 2.00000*ALGBRC(90)) - ALGBRC(147))+ALGBRC(103)+ALGBRC(148))/CONSTS(35) ALGBRC(35) = CONSTS(31)*( STATES(54)*STATES(1) - STATES(55)*STATES(2)) ALGBRC(179) = (((((((ALGBRC(124)+ALGBRC(127)+ALGBRC(115)) - ALGBRC(135)) - 5.00000*ALGBRC(158)) - 2.00000*ALGBRC(165)) - 4.00000*ALGBRC(166))+ (CONSTS(39) - 1.00000)*ALGBRC(79)+ 2.00000*ALGBRC(83)+ALGBRC(33)) - ALGBRC(35))/CONSTS(35) ALGBRC(181) = ( STATES(1)*CONSTS(288))/( CONSTS(230)*CONSTS(284))+( STATES(1)*ALGBRC(136))/( CONSTS(297)*ALGBRC(37))+( STATES(1)*ALGBRC(137))/( CONSTS(305)*ALGBRC(42))+( STATES(1)*CONSTS(239))/( CONSTS(311)*ALGBRC(51))+( STATES(1)*ALGBRC(138))/( CONSTS(297)*ALGBRC(67))+( STATES(1)*ALGBRC(139))/( CONSTS(305)*ALGBRC(73))+( STATES(1)*ALGBRC(140))/( CONSTS(251)*ALGBRC(77))+( STATES(1)*ALGBRC(160))/( CONSTS(206)*CONSTS(276))+( STATES(1)*ALGBRC(163))/( CONSTS(203)*CONSTS(275))+( STATES(1)*ALGBRC(167))/( CONSTS(209)*CONSTS(277))+( STATES(1)*ALGBRC(168))/( CONSTS(212)*CONSTS(278))+( STATES(1)*ALGBRC(149))/( CONSTS(199)*ALGBRC(121))+( STATES(1)*ALGBRC(156))/( CONSTS(190)*ALGBRC(85))+( STATES(1)*ALGBRC(150))/( CONSTS(215)*CONSTS(279))+( STATES(1)*ALGBRC(141))/( CONSTS(256)*ALGBRC(86))+( STATES(1)*ALGBRC(151))/( CONSTS(259)*ALGBRC(95))+( STATES(1)*ALGBRC(152))/( CONSTS(218)*CONSTS(280))+( STATES(1)*ALGBRC(153))/( CONSTS(261)*ALGBRC(99))+( STATES(1)*ALGBRC(154))/( CONSTS(254)*ALGBRC(84))+( STATES(1)*ALGBRC(161))/( CONSTS(262)*ALGBRC(100))+( STATES(1)*ALGBRC(162))/( CONSTS(265)*ALGBRC(105))+( STATES(1)*ALGBRC(155))/( CONSTS(266)*ALGBRC(108))+( STATES(1)*ALGBRC(142))/( CONSTS(271)*ALGBRC(125))+( STATES(1)*ALGBRC(143))/( CONSTS(273)*ALGBRC(128))+( STATES(1)*CONSTS(290))/( CONSTS(236)*CONSTS(286))+( STATES(1)*CONSTS(289))/( CONSTS(233)*CONSTS(285))+( STATES(1)*CONSTS(240))/( CONSTS(221)*CONSTS(281))+( STATES(1)*CONSTS(243))/( CONSTS(224)*CONSTS(282))+( STATES(1)*CONSTS(242))/( CONSTS(227)*CONSTS(283))+( STATES(1)*CONSTS(241))/( CONSTS(269)*ALGBRC(118))+ALGBRC(178)+ALGBRC(179) ALGBRC(182) = ( STATES(59)*CONSTS(288))/( CONSTS(231)*CONSTS(284))+( STATES(59)*ALGBRC(136))/( CONSTS(301)*ALGBRC(37))+( STATES(59)*ALGBRC(137))/( CONSTS(307)*ALGBRC(42))+( STATES(59)*CONSTS(239))/( CONSTS(313)*ALGBRC(51))+( STATES(59)*ALGBRC(138))/( CONSTS(301)*ALGBRC(67))+( STATES(59)*ALGBRC(139))/( CONSTS(307)*ALGBRC(73))+( STATES(59)*ALGBRC(140))/( CONSTS(252)*ALGBRC(77))+( STATES(59)*ALGBRC(160))/( CONSTS(207)*CONSTS(276))+( STATES(59)*ALGBRC(163))/( CONSTS(204)*CONSTS(275))+( STATES(59)*ALGBRC(167))/( CONSTS(210)*CONSTS(277))+( STATES(59)*ALGBRC(168))/( CONSTS(213)*CONSTS(278))+( STATES(59)*ALGBRC(149))/( CONSTS(270)*ALGBRC(121))+( STATES(59)*ALGBRC(156))/( CONSTS(255)*ALGBRC(85))+( STATES(59)*ALGBRC(150))/( CONSTS(216)*CONSTS(279))+( STATES(59)*ALGBRC(141))/( CONSTS(257)*ALGBRC(86))+( STATES(59)*ALGBRC(151))/( CONSTS(260)*ALGBRC(95))+( STATES(59)*ALGBRC(152))/( CONSTS(219)*CONSTS(280))+( STATES(59)*ALGBRC(153))/( CONSTS(193)*ALGBRC(99))+( STATES(59)*ALGBRC(154))/( CONSTS(188)*ALGBRC(84))+( STATES(59)*ALGBRC(161))/( CONSTS(263)*ALGBRC(100))+( STATES(59)*ALGBRC(162))/( CONSTS(195)*ALGBRC(105))+( STATES(59)*ALGBRC(155))/( CONSTS(267)*ALGBRC(108))+( STATES(59)*ALGBRC(142))/( CONSTS(272)*ALGBRC(125))+( STATES(59)*ALGBRC(143))/( CONSTS(274)*ALGBRC(128))+( STATES(59)*CONSTS(290))/( CONSTS(237)*CONSTS(286))+( STATES(59)*CONSTS(289))/( CONSTS(234)*CONSTS(285))+( STATES(59)*CONSTS(240))/( CONSTS(222)*CONSTS(281))+( STATES(59)*CONSTS(243))/( CONSTS(225)*CONSTS(282))+( STATES(59)*CONSTS(242))/( CONSTS(228)*CONSTS(283))+( STATES(59)*CONSTS(241))/( CONSTS(197)*ALGBRC(118))+CONSTS(291) ALGBRC(180) = ALGBRC(35)/CONSTS(35) ALGBRC(183) = ( STATES(55)*CONSTS(288))/( CONSTS(232)*CONSTS(284))+( STATES(55)*ALGBRC(136))/( CONSTS(303)*ALGBRC(37))+( STATES(55)*ALGBRC(137))/( CONSTS(309)*ALGBRC(42))+( STATES(55)*CONSTS(239))/( CONSTS(315)*ALGBRC(51))+( STATES(55)*ALGBRC(138))/( CONSTS(303)*ALGBRC(67))+( STATES(55)*ALGBRC(139))/( CONSTS(309)*ALGBRC(73))+( STATES(55)*ALGBRC(140))/( CONSTS(253)*ALGBRC(77))+( STATES(55)*ALGBRC(160))/( CONSTS(208)*CONSTS(276))+( STATES(55)*ALGBRC(163))/( CONSTS(205)*CONSTS(275))+( STATES(55)*ALGBRC(167))/( CONSTS(211)*CONSTS(277))+( STATES(55)*ALGBRC(168))/( CONSTS(214)*CONSTS(278))+( STATES(55)*ALGBRC(149))/( CONSTS(200)*ALGBRC(121))+( STATES(55)*ALGBRC(156))/( CONSTS(191)*ALGBRC(85))+( STATES(55)*ALGBRC(150))/( CONSTS(217)*CONSTS(279))+( STATES(55)*ALGBRC(141))/( CONSTS(258)*ALGBRC(86))+( STATES(55)*ALGBRC(151))/( CONSTS(192)*ALGBRC(95))+( STATES(55)*ALGBRC(152))/( CONSTS(220)*CONSTS(280))+( STATES(55)*ALGBRC(153))/( CONSTS(194)*ALGBRC(99))+( STATES(55)*ALGBRC(154))/( CONSTS(189)*ALGBRC(84))+( STATES(55)*ALGBRC(161))/( CONSTS(264)*ALGBRC(100))+( STATES(55)*ALGBRC(162))/( CONSTS(196)*ALGBRC(105))+( STATES(55)*ALGBRC(155))/( CONSTS(268)*ALGBRC(108))+( STATES(55)*ALGBRC(142))/( CONSTS(201)*ALGBRC(125))+( STATES(55)*ALGBRC(143))/( CONSTS(202)*ALGBRC(128))+( STATES(55)*CONSTS(290))/( CONSTS(238)*CONSTS(286))+( STATES(55)*CONSTS(289))/( CONSTS(235)*CONSTS(285))+( STATES(55)*CONSTS(240))/( CONSTS(223)*CONSTS(281))+( STATES(55)*CONSTS(243))/( CONSTS(226)*CONSTS(282))+( STATES(55)*CONSTS(242))/( CONSTS(229)*CONSTS(283))+( STATES(55)*CONSTS(241))/( CONSTS(198)*ALGBRC(118))+ALGBRC(180) ALGBRC(41) = STATES(9)/ALGBRC(37) ALGBRC(46) = STATES(10)/ALGBRC(42) ALGBRC(54) = STATES(17)/ALGBRC(51) ALGBRC(62) = STATES(36)/ALGBRC(60) ALGBRC(63) = ( STATES(36)*(1.00000+STATES(2)/CONSTS(297)))/ALGBRC(60) ALGBRC(65) = STATES(38)/ALGBRC(61) ALGBRC(66) = ( STATES(38)*(1.00000+STATES(2)/CONSTS(305)))/ALGBRC(61) ALGBRC(71) = STATES(40)/ALGBRC(68) ALGBRC(72) = ( STATES(40)*(1.00000+STATES(2)/CONSTS(311)))/ALGBRC(68) ALGBRC(94) = ( STATES(44)*(1.00000+STATES(2)/CONSTS(256)))/ALGBRC(92) RETURN END REAL FUNCTION TERNRY(TEST, VALA, VALB) LOGICAL TEST REAL VALA, VALB IF (TEST) THEN TERNRY = VALA ELSE TERNRY = VALB ENDIF RETURN END