Parent Directory | Revision Log | Patch
revision 12 by guez, Mon Jul 21 16:05:07 2008 UTC | revision 18 by guez, Thu Aug 7 12:29:13 2008 UTC | |
---|---|---|
# | Line 27 contains | Line 27 contains |
27 | ||
28 | call histclo | call histclo |
29 | print *, 'Stopping in ', modname | print *, 'Stopping in ', modname |
30 | print *, 'Reason = ', trim(message) | print *, 'Reason: ', trim(message) |
31 | print *, 'Houston, we have a problem ', ierr | print *, 'Houston, we have a problem ', ierr |
32 | STOP 1 | STOP 1 |
33 |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |