| File |
Line number |
Procedure |
Code |
|
./pkg/gchem/gchem_diagnostics_init.F |
45 |
GCHEM_DIAGNOSTICS_INIT |
CHARACTER*7 trcUnits |
|
./pkg/gchem/gchem_diagnostics_init.F |
54 |
GCHEM_DIAGNOSTICS_INIT |
trcUnits = '(kg/kg)' |
|
./pkg/gchem/gchem_diagnostics_init.F |
58 |
GCHEM_DIAGNOSTICS_INIT |
ilnb = LEN(trcUnits) |
|
./pkg/gchem/gchem_diagnostics_init.F |
59 |
GCHEM_DIAGNOSTICS_INIT |
trcUnits = PTRACERS_units(iTrc)(1:ilnb) |
|
./pkg/gchem/gchem_diagnostics_init.F |
71 |
GCHEM_DIAGNOSTICS_INIT |
diagUnits = trcUnits//' ' |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
104 |
PTRACERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trcUnits//'.m/s', myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
121 |
PTRACERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trcUnits//wUnits, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
132 |
PTRACERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trcUnits//'/s', myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
150 |
PTRACERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trcUnits//flxUnits, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
211 |
PTRACERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trcUnits//flxUnits, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
221 |
PTRACERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trcUnits//'/s', myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
51 |
PTRACERS_DIAGNOSTICS_INIT |
CHARACTER*7 trcUnits |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
74 |
PTRACERS_DIAGNOSTICS_INIT |
trcUnits = 'kg/kg ' |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
78 |
PTRACERS_DIAGNOSTICS_INIT |
ilnb = LEN(trcUnits) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
79 |
PTRACERS_DIAGNOSTICS_INIT |
trcUnits = PTRACERS_units(iTrc)(1:ilnb) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
99 |
PTRACERS_DIAGNOSTICS_INIT |
WRITE(diagUnits,'(A)') trcUnits |