File |
Line number |
Procedure |
Code |
./pkg/gchem/gchem_add_tendency.F |
50 |
GCHEM_ADD_TENDENCY |
INTEGER jTr |
./pkg/gchem/gchem_add_tendency.F |
60 |
GCHEM_ADD_TENDENCY |
jTr = iTr - gchem_sepFTr_num |
./pkg/gchem/gchem_add_tendency.F |
64 |
GCHEM_ADD_TENDENCY |
& + gchemTendency(i,j,k,bi,bj,jTr) |
./pkg/gchem/gchem_calc_tendency.F |
106 |
GCHEM_CALC_TENDENCY |
jTr = iTr - gchem_sepFTr_num |
./pkg/gchem/gchem_calc_tendency.F |
109 |
GCHEM_CALC_TENDENCY |
U gchemTendency(1-OLx,1-OLy,1,bi,bj,jTr), |
./pkg/gchem/gchem_calc_tendency.F |
113 |
GCHEM_CALC_TENDENCY |
jTr = iTr - gchem_sepFTr_num |
./pkg/gchem/gchem_calc_tendency.F |
116 |
GCHEM_CALC_TENDENCY |
U gchemTendency(1-OLx,1-OLy,1,bi,bj,jTr), |
./pkg/gchem/gchem_calc_tendency.F |
58 |
GCHEM_CALC_TENDENCY |
INTEGER iTr, jTr |
./pkg/gchem/gchem_calc_tendency.F |
62 |
GCHEM_CALC_TENDENCY |
DO jTr = 1, GCHEM_tendTr_num |
./pkg/gchem/gchem_calc_tendency.F |
68 |
GCHEM_CALC_TENDENCY |
gchemTendency(i,j,k,bi,bj,jTr) = 0. _d 0 |
./pkg/gchem/gchem_init_vari.F |
43 |
GCHEM_INIT_VARI |
INTEGER jTr |
./pkg/gchem/gchem_init_vari.F |
49 |
GCHEM_INIT_VARI |
DO jTr = 1, GCHEM_tendTr_num |
./pkg/gchem/gchem_init_vari.F |
55 |
GCHEM_INIT_VARI |
gchemTendency(i,j,k,bi,bj,jTr) = 0. _d 0 |