32 timesc.time_therm_long = 0.;
33 timesc.time_therm_short = 0.;
40 for( i=0; i < limit; i++ )
55 sprintf( chLine,
" AGE: longest thermal timescale= %.2es.",
63 sprintf( chLine,
" AGE: 21 cm equilibrium timescale= %.2es.",
70 sprintf( chLine,
" C-AGE: Thermal equilibrium timescale, %.2es, longer than age",
76 if( strcmp(
dense.chDenseLaw,
"CPRE") == 0 )
81 sprintf( chLine,
" AGE: sound travel time= %.2es.",
86 if(
timesc.CloudAgeSet > 0. && tsound >
timesc.CloudAgeSet )
88 sprintf( chLine,
" C-AGE: Sound travel time longer than age in constant pressure model = %.2es",
99 tlong =
MAX2(tlong,tsound);
106 timesc.time_H2_Dest_longest *= -1.;
107 timesc.time_H2_Form_longest *= -1.;
109 tlong =
MAX2( tlong ,
timesc.time_H2_Dest_longest );
110 tlong =
MAX2( tlong ,
timesc.time_H2_Form_longest );
114 timesc.BigCOMoleForm *= -1.;
119 if(
prt.lgPrnAges &&
timesc.time_H2_Dest_longest > 0. )
121 sprintf( chLine,
" AGE: longest H2 destruction timescale= %.2es.",
122 timesc.time_H2_Dest_longest );
126 if(
prt.lgPrnAges &&
timesc.time_H2_Form_longest > 0. )
128 sprintf( chLine,
" AGE: longest H2 formation timescale= %.2es.",
129 timesc.time_H2_Form_longest );
135 sprintf( chLine,
" C-AGE: H2 destruction timescale longer than age, = %.2es",
136 timesc.time_H2_Dest_longest );
142 sprintf( chLine,
" C-AGE: H2 formation timescale longer than age, = %.2es",
143 timesc.time_H2_Form_longest );
147 if(
prt.lgPrnAges &&
timesc.BigCOMoleForm > 0. )
149 sprintf( chLine,
" AGE: longest CO formation timescale= %.2es.",
156 sprintf( chLine,
" C-AGE: CO formation timescale longer than age, = %.2es",
162 timesc.time_Hrecom_long = 0.;
163 timesc.time_Hrecom_short = 0.;
164 for( i=0; i < limit; i++ )
177 sprintf( chLine,
" AGE: longest H recombination timescale= %.2es.",
178 timesc.time_Hrecom_long );
184 sprintf( chLine,
" C-AGE: Hydrogen recombination timescale longer than age, = %.2es",
185 timesc.time_Hrecom_long );
190 if(
timesc.CloudAgeSet < 0. )
196 sprintf( chLine,
" !AGE: Cloud age was not set. Longest timescale was %.2e s.",
201 else if( tlong < 8.64e4 )
204 sprintf( chLine,
" !AGE: Cloud age was not set. Longest timescale was %.2e s = %.2e hours.",
205 tlong, tlong/3600. );
209 else if( tlong < 3e7/12. )
212 sprintf( chLine,
" !AGE: Cloud age was not set. Longest timescale was %.2e s = %.2e days.",
213 tlong, tlong/86400. );
217 else if( tlong < 3e7 )
220 sprintf( chLine,
" !AGE: Cloud age was not set. Longest timescale was %.2e s = %.2e months.",
221 tlong, (tlong/3.15569e7)*12. );
228 sprintf( chLine,
" !AGE: Cloud age was not set. Longest timescale was %.2e s = %.2e years.",
229 tlong, tlong/3.15569e7 );
240 sprintf( chLine,
" AGE: Cloud age was %.2es, Longest timescale was %.2e s.",
241 timesc.CloudAgeSet, tlong );
248 sprintf( chLine,
" AGE: Cloud age was %.2e s. Longest timescale was %.2e s = %.2e years.",
249 timesc.CloudAgeSet, tlong, tlong/3.15569e7 );