20 |
#include "PARAMS.h" |
#include "PARAMS.h" |
21 |
#include "GRID.h" |
#include "GRID.h" |
22 |
#include "PTRACERS_SIZE.h" |
#include "PTRACERS_SIZE.h" |
23 |
#include "PTRACERS.h" |
#include "PTRACERS_PARAMS.h" |
24 |
|
#include "PTRACERS_FIELDS.h" |
25 |
#ifdef ALLOW_MONITOR |
#ifdef ALLOW_MONITOR |
26 |
#include "MONITOR.h" |
#include "MONITOR.h" |
27 |
#endif |
#endif |
111 |
WRITE(suff,'(A7,I2.2)') 'ptracer',ip |
WRITE(suff,'(A7,I2.2)') 'ptracer',ip |
112 |
c WRITE(suff,'(A7,I3.3)') 'ptrac_', ip |
c WRITE(suff,'(A7,I3.3)') 'ptrac_', ip |
113 |
CALL MON_PRINTSTATS_RL( |
CALL MON_PRINTSTATS_RL( |
114 |
& Nr, ptracer(1-Olx,1-Oly,1,1,1,ip), |
& Nr, pTracer(1-Olx,1-Oly,1,1,1,ip), |
115 |
& suff, maskC,hFacC,rA ,drF,myThid) |
& suff, maskC,hFacC,rA ,drF,myThid) |
116 |
ENDDO |
ENDDO |
117 |
|
|