<p><b>laura@ucar.edu</b> 2010-07-26 09:52:29 -0600 (Mon, 26 Jul 2010)</p><p>updated with trunk<br>
</p><hr noshade><pre><font color="gray">Modified: branches/atmos_physics/src/core_ocean/module_time_integration.F
===================================================================
--- branches/atmos_physics/src/core_ocean/module_time_integration.F        2010-07-23 23:23:46 UTC (rev 436)
+++ branches/atmos_physics/src/core_ocean/module_time_integration.F        2010-07-26 15:52:29 UTC (rev 437)
@@ -1022,7 +1022,7 @@
       !
       VTX_LOOP: do iVertex = 1,nVertices
          do i=1,grid % vertexDegree
-            if (cellsOnVertex(i,iVertex) &gt; nVertices) cycle VTX_LOOP
+            if (cellsOnVertex(i,iVertex) &gt; nCells) cycle VTX_LOOP
          end do
          do k=1,nVertLevels
             h_vertex = 0.0

</font>
</pre>