Parent Directory
|
Revision Log
|
Patch
trunk/dyn3d/test_disvert.f revision 116 by guez, Thu Dec 4 16:35:03 2014 UTC | trunk/Sources/dyn3d/test_disvert.f 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)) |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |