usr/src/usr.bin/f77/libI77/libI66.c

/*
 * set flag to initialize fortran-66 mods
 *      @(#)libI66.c    1.3
 * usage: f77 ... -lI66 ...
 */

#include        "fiodefs.h"

struct ioiflg   ioiflg_ = {
         1,             /* open files at beginning */
         1,             /* carriage control on all units */
         1,             /* blanks are zero on input; 0 => 0.0 on output */
};