Changeset 1839 for branches/newmole/source/mole_reactions.cpp
- Timestamp:
- 03/09/08 17:20:59 (10 months ago)
- Files:
-
- 1 modified
-
branches/newmole/source/mole_reactions.cpp (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
branches/newmole/source/mole_reactions.cpp
r1830 r1839 870 870 871 871 binding_energy = rate->b; 872 /*>>chng 06 nov 28 only include source from molecules if we have an estimated first 873 * solution - first test is that we have called mole at least twice, 874 * second test is that we are on a later iteration */ 875 if( conv.nTotalIoniz > 1 || iteration > 1 ) 876 { 877 for( nd=0; nd < gv.nBin; nd++ ) 878 { 879 exponent += exp(-binding_energy/gv.bin[nd]->tedust); 880 } 881 } 872 for( nd=0; nd < gv.nBin; nd++ ) 873 { 874 exponent += exp(-binding_energy/gv.bin[nd]->tedust); 875 } 882 876 number_of_sites = 1.5e15; 883 877 … … 1137 1131 STATIC double hopexch(struct mole_reaction_s *rate) 1138 1132 { 1139 if ( iteration==1 && conv.lgSearch ) 1140 return 0.; 1141 else 1142 return atmdat.HCharExcRecTo[ipOXYGEN][0]; 1133 return atmdat.HCharExcRecTo[ipOXYGEN][0]; 1143 1134 } 1144 1135 STATIC double hpoexch(struct mole_reaction_s *rate) 1145 1136 { 1146 if ( iteration==1 && conv.lgSearch ) 1147 return 0.; 1148 else 1149 return atmdat.HCharExcIonOf[ipOXYGEN][0]; 1137 return atmdat.HCharExcIonOf[ipOXYGEN][0]; 1150 1138 } 1151 1139 STATIC double hmattach(struct mole_reaction_s *rate)
