|
|
1.1 ! root 1: /* ! 2: * set flag to initialize fortran-66 mods ! 3: * @(#)libI66.c 1.4 ! 4: * usage: f77 ... -lI66 ... ! 5: */ ! 6: ! 7: #include "fiodefs.h" ! 8: ! 9: struct ioiflg ioiflg_ = { ! 10: 0, /* open files at beginning */ ! 11: 1, /* carriage control on all units */ ! 12: 1, /* blanks are zero on input; 0 => 0.0 on output */ ! 13: };
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.