Fixed typo

b933bf0b · Dave Whipp · 4933ba02 · b933bf0b
Commit b933bf0b authored 15 years ago by Dave Whipp
--- a/src/VTK/post.f90
+++ b/src/VTK/post.f90
@@ -360,7 +360,7 @@ end do
                dumpdp,    &
                dumpdp,    &
                dumpi,     &
-                i=1,cl%npcl)
+                i=1,npcl)

   ! read isostasy basal displacement array - dwhipp 11/09
   dxy=abs(ov%x(1)-ov%x(2))