196 |
C *note* should update GMREDI_XTRANSPORT to use localT and set df *aja* |
C *note* should update GMREDI_XTRANSPORT to use localT and set df *aja* |
197 |
CALL GMREDI_XTRANSPORT( |
CALL GMREDI_XTRANSPORT( |
198 |
I iMin,iMax,jMin,jMax,bi,bj,K, |
I iMin,iMax,jMin,jMax,bi,bj,K, |
199 |
I xA,Tracer, |
I xA,Tracer,tracerIdentity, |
200 |
U df, |
U df, |
201 |
I myThid) |
I myThid) |
202 |
ENDIF |
ENDIF |
268 |
C *note* should update GMREDI_YTRANSPORT to use localT and set df *aja* |
C *note* should update GMREDI_YTRANSPORT to use localT and set df *aja* |
269 |
CALL GMREDI_YTRANSPORT( |
CALL GMREDI_YTRANSPORT( |
270 |
I iMin,iMax,jMin,jMax,bi,bj,K, |
I iMin,iMax,jMin,jMax,bi,bj,K, |
271 |
I yA,Tracer, |
I yA,Tracer,tracerIdentity, |
272 |
U df, |
U df, |
273 |
I myThid) |
I myThid) |
274 |
ENDIF |
ENDIF |
355 |
C *note* should update GMREDI_RTRANSPORT to set df *aja* |
C *note* should update GMREDI_RTRANSPORT to set df *aja* |
356 |
CALL GMREDI_RTRANSPORT( |
CALL GMREDI_RTRANSPORT( |
357 |
I iMin,iMax,jMin,jMax,bi,bj,K, |
I iMin,iMax,jMin,jMax,bi,bj,K, |
358 |
I Tracer, |
I Tracer,tracerIdentity, |
359 |
U df, |
U df, |
360 |
I myThid) |
I myThid) |
361 |
ENDIF |
ENDIF |