File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_init_chem.F |
25 |
FIZHI_INIT_CHEM |
_RL ozlats(nozlats), ozlevs(nozlevs) |
./pkg/fizhi/fizhi_init_chem.F |
36 |
FIZHI_INIT_CHEM |
call READ_OZ (koz,o3,ozlats,ozlevs,nozlats,nozlevs,ntimesoz) |
./pkg/fizhi/fizhi_init_chem.F |
6 |
FIZHI_INIT_CHEM |
. ozlats,ozlevs,o3, |
./pkg/fizhi/update_chemistry_exports.F |
110 |
INTERP_CHEMISTRY |
. watlats,ozone,nozlevs,nozlats,ozlevs,ozlats, |
./pkg/fizhi/update_chemistry_exports.F |
120 |
INTERP_CHEMISTRY |
_RL ozlevs(nozlevs),ozlats(nozlats) |
./pkg/fizhi/update_chemistry_exports.F |
133 |
INTERP_CHEMISTRY |
call INTERP_OZ (ozone ,nozlevs,nozlats,ozlevs,ozlats,im*jm, |
./pkg/fizhi/update_chemistry_exports.F |
278 |
INTERP_OZ |
subroutine INTERP_OZ (ozone,nozlevs,nozlats,ozlevs,ozlats, |
./pkg/fizhi/update_chemistry_exports.F |
301 |
INTERP_OZ |
_RL ozlevs(nozlevs),ozlats(nozlats) |
./pkg/fizhi/update_chemistry_exports.F |
325 |
INTERP_OZ |
IF( ozlats(jlat).gt.xlat(i) ) THEN |
./pkg/fizhi/update_chemistry_exports.F |
333 |
INTERP_OZ |
slope(i) = ( XLAT(I) -ozlats(jlat-1) ) |
./pkg/fizhi/update_chemistry_exports.F |
334 |
INTERP_OZ |
. / ( ozlats(jlat)-ozlats(jlat-1) ) |