File |
Line number |
Procedure |
Code |
./pkg/ptracers/ptracers_debug.F |
37 |
PTRACERS_DEBUG |
CHARACTER*(9) strng |
./pkg/ptracers/ptracers_debug.F |
43 |
PTRACERS_DEBUG |
WRITE(strng(1:9),'(a7,i2.2)') 'PTRACER',iTracer |
./pkg/ptracers/ptracers_debug.F |
45 |
PTRACERS_DEBUG |
& pTracer(1-Olx,1-Oly,1,1,1,iTracer),strng,myThid) |
./pkg/ptracers/ptracers_debug.F |
46 |
PTRACERS_DEBUG |
WRITE(strng(1:9),'(a7,i2.2)') 'GTRACER',iTracer |
./pkg/ptracers/ptracers_debug.F |
48 |
PTRACERS_DEBUG |
& gPtr(1-Olx,1-Oly,1,1,1,iTracer),strng,myThid) |
./pkg/ptracers/ptracers_debug.F |
49 |
PTRACERS_DEBUG |
WRITE(strng(1:9),'(a7,i2.2)') 'GNm1TRC',iTracer |
./pkg/ptracers/ptracers_debug.F |
51 |
PTRACERS_DEBUG |
& gPtrNm1(1-Olx,1-Oly,1,1,1,iTracer),strng,myThid) |