| File |
Line number |
Procedure |
Code |
|
./pkg/gchem/gchem_diagnostics_init.F |
61 |
GCHEM_DIAGNOSTICS_INIT |
ilnb = ILNBLNK(PTRACERS_names(iTrc)) |
|
./pkg/gchem/gchem_diagnostics_init.F |
64 |
GCHEM_DIAGNOSTICS_INIT |
WRITE(locName,'(A)') PTRACERS_names(iTrc)(1:ilnb) |
|
./pkg/ptracers/PTRACERS_PARAMS.h |
137 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) PTRACERS_names(PTRACERS_num) |
|
./pkg/ptracers/PTRACERS_PARAMS.h |
142 |
NO PROCEDURE |
& PTRACERS_names, |
|
./pkg/ptracers/ptracers_check.F |
102 |
PTRACERS_CHECK |
CALL WRITE_0D_C( PTRACERS_names(iTracer), -1, INDEX_NONE, |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
81 |
PTRACERS_DIAGNOSTICS_INIT |
ilnb = ILNBLNK(PTRACERS_names(iTrc)) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
84 |
PTRACERS_DIAGNOSTICS_INIT |
WRITE(locName,'(A)') PTRACERS_names(iTrc)(1:ilnb) |
|
./pkg/ptracers/ptracers_mnc_init.F |
47 |
PTRACERS_MNC_INIT |
ilnb = ILNBLNK(PTRACERS_names(ii)) |
|
./pkg/ptracers/ptracers_mnc_init.F |
56 |
PTRACERS_MNC_INIT |
& PTRACERS_names(ii),'Cen_xy_Hn__C__t',4,5,myThid) |
|
./pkg/ptracers/ptracers_mnc_init.F |
57 |
PTRACERS_MNC_INIT |
WRITE(name,'(a,a)') 'surf_',PTRACERS_names(ii)(1:ilnb) |
|
./pkg/ptracers/ptracers_mnc_init.F |
63 |
PTRACERS_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT(PTRACERS_names(ii), |
|
./pkg/ptracers/ptracers_mnc_init.F |
70 |
PTRACERS_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT(PTRACERS_names(ii),'units', |
|
./pkg/ptracers/ptracers_read_pickup.F |
77 |
PTRACERS_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0, PTRACERS_names(iTracer), |
|
./pkg/ptracers/ptracers_read_pickup.F |
84 |
PTRACERS_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0, PTRACERS_names(iTracer), |
|
./pkg/ptracers/ptracers_readparms.F |
129 |
PTRACERS_READPARMS |
PTRACERS_names(iTracer)(ic:ic) = ' ' |
|
./pkg/ptracers/ptracers_readparms.F |
70 |
PTRACERS_READPARMS |
& PTRACERS_names, |
|
./pkg/ptracers/ptracers_write_pickup.F |
102 |
PTRACERS_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0, PTRACERS_names(iTracer), |
|
./pkg/ptracers/ptracers_write_pickup.F |
95 |
PTRACERS_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0, PTRACERS_names(iTracer), |
|
./pkg/ptracers/ptracers_write_state.F |
75 |
PTRACERS_WRITE_STATE |
CALL MNC_CW_RL_W(pf,'ptracers',0,0,PTRACERS_names(iTracer), |
|
./pkg/ptracers/ptracers_write_timeave.F |
100 |
PTRACERS_WRITE_TIMEAVE |
CALL MNC_CW_RL_W(pf,'ptr_tave',0,0,PTRACERS_names(iTr), |
|
./pkg/ptracers/ptracers_write_timeave.F |
105 |
PTRACERS_WRITE_TIMEAVE |
ilnb = ILNBLNK(PTRACERS_names(iTr)) |
|
./pkg/ptracers/ptracers_write_timeave.F |
106 |
PTRACERS_WRITE_TIMEAVE |
WRITE(prefix,'(A,A)') 'surf_',PTRACERS_names(iTr)(1:ilnb) |