/[lmdze]/trunk/dyn3d/test_disvert.f90
ViewVC logotype

Diff of /trunk/dyn3d/test_disvert.f90

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 134 by guez, Wed Apr 29 15:47:56 2015 UTC revision 171 by guez, Tue Sep 29 19:48:59 2015 UTC
# Line 87  contains Line 87  contains
87               end if               end if
88            end do            end do
89         end do         end do
90         call abort_gcm("test_disvert", "bad order of pressure values", 1)         call abort_gcm("test_disvert", "bad order of pressure values")
91      end if      end if
92    
93  1000 format (3(a, g10.4, a, i0))  1000 format (3(a, g10.4, a, i0))

Legend:
Removed from v.134  
changed lines
  Added in v.171

  ViewVC Help
Powered by ViewVC 1.1.21