Parent Directory
| 
Revision Log
| 
Revision Graph
| 
Patch
| revision 1.11 by jmc, Tue Apr 28 18:10:47 2009 UTC | revision 1.12 by heimbach, Wed Oct 14 20:12:30 2009 UTC | |
|---|---|---|
| # | Line 45 cswdmonth -add- | Line 45 cswdmonth -add- |
| 45 | cswddmonth -- end- | cswddmonth -- end- |
| 46 | c | c |
| 47 | c initialize to zero | c initialize to zero |
| 48 | totcost=0.d0 | cph totcost=0.d0 |
| 49 | DO bj = myByLo(myThid), myByHi(myThid) | DO bj = myByLo(myThid), myByHi(myThid) |
| 50 | DO bi = myBxLo(myThid), myBxHi(myThid) | DO bi = myBxLo(myThid), myBxHi(myThid) |
| 51 | CALL TIMEAVE_RESET(PO4obs, Nr, bi, bj, myThid) | CALL TIMEAVE_RESET(PO4obs, Nr, bi, bj, myThid) |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |