| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_init_chem.F |
26 |
FIZHI_INIT_CHEM |
_RL watlats(nwatlats), watlevs(nwatlevs) |
|
./pkg/fizhi/fizhi_init_chem.F |
35 |
FIZHI_INIT_CHEM |
call READ_QZ (kqz,water,watlats,watlevs,nwatlats,nwatlevs,ntimesq) |
|
./pkg/fizhi/fizhi_init_chem.F |
7 |
FIZHI_INIT_CHEM |
. nwatlats,nwatlevs,ntimesq,watlats,watlevs,water, |
|
./pkg/fizhi/update_chemistry_exports.F |
110 |
INTERP_CHEMISTRY |
. watlats,ozone,nozlevs,nozlats,ozlevs,ozlats, |
|
./pkg/fizhi/update_chemistry_exports.F |
119 |
INTERP_CHEMISTRY |
_RL watlevs(nwatlevs),watlats(nwatlats) |
|
./pkg/fizhi/update_chemistry_exports.F |
131 |
INTERP_CHEMISTRY |
call INTERP_QZ (stratq,nwatlevs,nwatlats,watlevs,watlats,im*jm, |
|
./pkg/fizhi/update_chemistry_exports.F |
139 |
INTERP_QZ |
subroutine INTERP_QZ(stratq,nwatlevs,nwatlats,watlevs,watlats, |
|
./pkg/fizhi/update_chemistry_exports.F |
161 |
INTERP_QZ |
_RL watlats (nwatlats) |
|
./pkg/fizhi/update_chemistry_exports.F |
194 |
INTERP_QZ |
IF( watlats(jlat).gt.xlat(i) ) THEN |
|
./pkg/fizhi/update_chemistry_exports.F |
202 |
INTERP_QZ |
slope(i) = ( xlat(i) -watlats(jlat-1) ) |
|
./pkg/fizhi/update_chemistry_exports.F |
203 |
INTERP_QZ |
. / ( watlats(jlat)-watlats(jlat-1) ) |