| File |
Line number |
Procedure |
Code |
|
./pkg/ptracers/ptracers_integrate.F |
143 |
PTRACERS_INTEGRATE |
I pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
|
./pkg/ptracers/ptracers_integrate.F |
212 |
PTRACERS_INTEGRATE |
I pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
|
./pkg/ptracers/ptracers_implicit.F |
105 |
PTRACERS_IMPLICIT |
I kappaRk, wVel, pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
|
./pkg/ptracers/ptracers_cycle.F |
49 |
PTRACERS_CYCLE |
U pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
|
./pkg/ptracers/ptracers_advection.F |
90 |
PTRACERS_ADVECTION |
I pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
|
./pkg/ptracers/PTRACERS.h |
83 |
NO PROCEDURE |
_RL pTracer (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy, |
|
./pkg/ptracers/PTRACERS.h |
92 |
NO PROCEDURE |
& pTracer, gPtr, gPtrNM1, surfaceForcingPtr |
|
./pkg/ptracers/ptracers_convect.F |
48 |
PTRACERS_CONVECT |
U pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
|
./pkg/ptracers/ptracers_read_checkpoint.F |
103 |
PTRACERS_READ_CHECKPOINT |
_EXCH_XYZ_R8(pTracer(1-Olx,1-Oly,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_read_checkpoint.F |
57 |
PTRACERS_READ_CHECKPOINT |
& pTracer(1-OLx,1-OLy,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_read_checkpoint.F |
58 |
PTRACERS_READ_CHECKPOINT |
_EXCH_XYZ_R8(pTracer(1-Olx,1-Oly,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_read_checkpoint.F |
73 |
PTRACERS_READ_CHECKPOINT |
& pTracer(1-Olx,1-Oly,1,1,1,iTracer),iRec,myThid) |
|
./pkg/ptracers/ptracers_read_checkpoint.F |
74 |
PTRACERS_READ_CHECKPOINT |
_EXCH_XYZ_R8(pTracer(1-Olx,1-Oly,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_read_checkpoint.F |
99 |
PTRACERS_READ_CHECKPOINT |
& pTracer(1-Olx,1-Oly,1,1,1,iTracer),iRec,myThid) |
|
./pkg/ptracers/ptracers_write_state.F |
113 |
PTRACERS_WRITE_STATE |
& pTracer(1-Olx,1-Oly,1,1,1,iTracer),iRec,myIter,myThid) |
|
./pkg/ptracers/ptracers_write_state.F |
73 |
PTRACERS_WRITE_STATE |
& pTracer(1-OLx,1-OLy,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_forcing_surf.F |
84 |
PTRACERS_FORCING_SURF |
& *( PTRACERS_EvPrRn(iTrc) - pTracer(i,j,ks,bi,bj,iTrc) ) |
|
./pkg/ptracers/ptracers_write_checkpoint.F |
112 |
PTRACERS_WRITE_CHECKPOINT |
& pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
|
./pkg/ptracers/ptracers_write_checkpoint.F |
89 |
PTRACERS_WRITE_CHECKPOINT |
& pTracer(1-OLx,1-OLy,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_fields_blocking_exchanges.F |
42 |
PTRACERS_FIELDS_BLOCKING_EXCH |
_EXCH_XYZ_R8(pTracer(1-Olx,1-Oly,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_debug.F |
45 |
PTRACERS_DEBUG |
& pTracer(1-Olx,1-Oly,1,1,1,iTracer),strng,myThid) |
|
./pkg/ptracers/ptracers_init_varia.F |
48 |
PTRACERS_INIT_VARIA |
pTracer(i,j,k,bi,bj,iTracer) = PTRACERS_ref(k,iTracer) |
|
./pkg/ptracers/ptracers_init_varia.F |
75 |
PTRACERS_INIT_VARIA |
& pTracer(1-Olx,1-Oly,1,1,1,iTracer),0,myThid) |
|
./pkg/ptracers/ptracers_init_varia.F |
77 |
PTRACERS_INIT_VARIA |
_EXCH_XYZ_R8(pTracer(1-Olx,1-Oly,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_init_varia.F |
90 |
PTRACERS_INIT_VARIA |
& pTracer(i,j,k,bi,bj,iTracer)=0. _d 0 |
|
./pkg/matrix/matrix_store_tendency.F |
87 |
MATRIX_STORE_TENDENCY_IMP |
& + pTracer(i,j,k,bi,bj,iTracer) |
|
./pkg/matrix/matrix_store_tendency.F |
88 |
MATRIX_STORE_TENDENCY_IMP |
pTracer(i,j,k,bi,bj,iTracer)= |
|
./pkg/matrix/matrix_init.F |
36 |
MATRIX_INIT |
& pTracer(i,j,k,bi,bj,iTracer) |
|
./pkg/profiles/profiles_interp.F |
189 |
PROFILES_INTERP |
tab_coeffs1(1,1)=pTracer(prof_i,prof_j,k,bi,bj,1) !SO |
|
./pkg/profiles/profiles_interp.F |
190 |
PROFILES_INTERP |
tab_coeffs1(1,2)=pTracer(prof_i+1,prof_j,k,bi,bj,1) !SE |
|
./pkg/profiles/profiles_interp.F |
191 |
PROFILES_INTERP |
tab_coeffs1(2,1)=pTracer(prof_i,prof_j+1,k,bi,bj,1) !NO |
|
./pkg/profiles/profiles_interp.F |
192 |
PROFILES_INTERP |
tab_coeffs1(2,2)=pTracer(prof_i+1,prof_j+1,k,bi,bj,1) !NZ |
|
./verification/global_ocean.90x40x15/code/ptracers_forcing_surf.F |
84 |
PTRACERS_FORCING_SURF |
& *( PTRACERS_EvPrRn(iTrc) - pTracer(i,j,ks,bi,bj,iTrc) ) |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
84 |
PTRACERS_FORCING_SURF |
& *( PTRACERS_EvPrRn(iTrc) - pTracer(i,j,ks,bi,bj,iTrc) ) |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_init_varia.F |
100 |
PTRACERS_INIT_VARIA |
_EXCH_XYZ_R8(pTracer(1-Olx,1-Oly,1,1,1,iTracer),myThid) |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_init_varia.F |
49 |
PTRACERS_INIT_VARIA |
pTracer(i,j,k,bi,bj,iTracer) = 1. _d 0 |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_init_varia.F |
51 |
PTRACERS_INIT_VARIA |
pTracer(i,j,k,bi,bj,iTracer) = 0. _d 0 |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_init_varia.F |
79 |
PTRACERS_INIT_VARIA |
& pTracer(1-Olx,1-Oly,1,1,1,iTracer),0,myThid) |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_init_varia.F |
89 |
PTRACERS_INIT_VARIA |
& pTracer(i,j,k,bi,bj,iTracer)=0. |
|
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F |
84 |
PTRACERS_FORCING_SURF |
& *( PTRACERS_EvPrRn(iTrc) - pTracer(i,j,ks,bi,bj,iTrc) ) |
|
./pkg/obcs/obcs_calc.F |
234 |
OBCS_CALC |
& pTracer(I_obc-1,J,K,bi,bj,iTracer) |
|
./pkg/obcs/obcs_calc.F |
268 |
OBCS_CALC |
& pTracer(I_obc+1,J,K,bi,bj,iTracer) |
|
./pkg/obcs/obcs_calc.F |
302 |
OBCS_CALC |
& pTracer(I,J_obc-1,K,bi,bj,iTracer) |
|
./pkg/obcs/obcs_calc.F |
336 |
OBCS_CALC |
& pTracer(I,J_obc+1,K,bi,bj,iTracer) |
|
./pkg/rbcs/rbcs_add_tendency.F |
88 |
RBCS_ADD_TENDENCY |
& (pTracer(I,J,K,bi,bj,iTracer)- |
|
./pkg/ctrl/ctrl_map_ini.F |
525 |
CTRL_MAP_INI |
_EXCH_XYZ_R8(pTracer(1-Olx,1-Oly,1,1,1,1),myThid) |