badsb
goto badsb;
goto badsb;
goto badsb;
goto badsb;
badsb:
{ badsb(listerr, "MAGIC NUMBER WRONG"); return (0); }
{ badsb(listerr, "NCG OUT OF RANGE"); return (0); }
{ badsb(listerr, "CPG OUT OF RANGE"); return (0); }
{ badsb(listerr, "NCYL LESS THAN NCG*CPG"); return (0); }
{ badsb(listerr, "SIZE PREPOSTEROUSLY LARGE"); return (0); }
badsb(listerr,
static void badsb(int listerr, char *s);