<p><b>ringler@lanl.gov</b> 2011-10-14 11:57:53 -0600 (Fri, 14 Oct 2011)</p><p><br>
fix formatting of write statement<br>
</p><hr noshade><pre><font color="gray">Modified: branches/ocean_projects/basin/src/module_cullLoops.F
===================================================================
--- branches/ocean_projects/basin/src/module_cullLoops.F        2011-10-14 17:39:11 UTC (rev 1077)
+++ branches/ocean_projects/basin/src/module_cullLoops.F        2011-10-14 17:57:53 UTC (rev 1078)
@@ -162,7 +162,7 @@
          if(LeftTurns-RightTurns.gt.0.and.rCross.gt.0.0) then
              iCellMask(iCell) = 1
              write(50,11) iCell, lonCell(iCell), latCell(iCell)
-             11 format(i5,2f12.4)
+             11 format(i8,2f12.4)
          endif
 
        enddo ! iCell

</font>
</pre>