Parent Directory | Revision Log | Revision Graph | Patch
revision 1.2 by heimbach, Wed Mar 5 23:39:53 2003 UTC | revision 1.3 by heimbach, Fri Aug 5 18:40:24 2005 UTC | |
---|---|---|
# | Line 57 c | Line 57 c |
57 | open(unit=76,file='costfinal') | open(unit=76,file='costfinal') |
58 | read(76,*) fc | read(76,*) fc |
59 | close(76) | close(76) |
60 | else | |
61 | lastdiva = .FALSE. | |
62 | endif | endif |
63 | c | c |
64 | _END_MASTER( mythid ) | _END_MASTER( mythid ) |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |