Parent Directory
| 
Revision Log
| 
Revision Graph
| 
Patch
| revision 1.1 by heimbach, Wed Jun 7 01:45:43 2006 UTC | revision 1.2 by heimbach, Mon May 14 22:02:33 2007 UTC | |
|---|---|---|
| # | Line 112 C-- | Line 112 C-- |
| 112 | il=ilnblnk( xx_depth_file ) | il=ilnblnk( xx_depth_file ) |
| 113 | write(fnamedepth(1:80),'(2a,i10.10)') | write(fnamedepth(1:80),'(2a,i10.10)') |
| 114 | & xx_depth_file(1:il),'.',optimcycle | & xx_depth_file(1:il),'.',optimcycle |
| 115 | call active_read_xy_loc( fnamedepth, tmpfld2d, 1, | call active_read_xy( fnamedepth, tmpfld2d, 1, |
| 116 | & doglobalread, ladinit, optimcycle, | & doglobalread, ladinit, optimcycle, |
| 117 | & mythid, xx_depth_dummy ) | & mythid, xx_depth_dummy ) |
| 118 | do bj = jtlo,jthi | do bj = jtlo,jthi |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |