<p><b>mpetersen@lanl.gov</b> 2010-06-10 09:25:39 -0600 (Thu, 10 Jun 2010)</p><p>Corrected error in cellsOnVertex(i,iVertex) &gt; nVertices.<br>
</p><hr noshade><pre><font color="gray">Modified: trunk/mpas/src/core_ocean/module_time_integration.F
===================================================================
--- trunk/mpas/src/core_ocean/module_time_integration.F        2010-06-09 17:33:50 UTC (rev 340)
+++ trunk/mpas/src/core_ocean/module_time_integration.F        2010-06-10 15:25:39 UTC (rev 341)
@@ -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

Modified: trunk/mpas/src/core_sw/module_time_integration.F
===================================================================
--- trunk/mpas/src/core_sw/module_time_integration.F        2010-06-09 17:33:50 UTC (rev 340)
+++ trunk/mpas/src/core_sw/module_time_integration.F        2010-06-10 15:25:39 UTC (rev 341)
@@ -618,7 +618,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>