--- ray/src/gen/gencat.c 1993/08/02 14:23:02 2.2 +++ ray/src/gen/gencat.c 2003/11/16 10:29:38 2.5 @@ -1,9 +1,6 @@ -/* Copyright (c) 1993 Regents of the University of California */ - #ifndef lint -static char SCCSid[] = "$SunId$ LBL"; +static const char RCSid[] = "$Id: gencat.c,v 2.5 2003/11/16 10:29:38 schorsch Exp $"; #endif - /***************************************************************************** This program is to make series of right triangles forming hyperbolic cosin (ie, cosh) curve in between of 2 points. @@ -28,12 +25,9 @@ static char SCCSid[] = "$SunId$ LBL"; ******************************************************************************/ #include +#include #include -#ifdef DCL_ATOF -extern double atof(); -#endif - char *cmtype, *cname; double z0, z1; double k, D; @@ -70,6 +64,20 @@ fprintf(stderr, "Interation limit exceeded -- invalid } +static void +printhead(ac, av) /* print command header */ +register int ac; +register char **av; +{ + putchar('#'); + while (ac--) { + putchar(' '); + fputs(*av++, stdout); + } + putchar('\n'); +} + +int main (argc, argv) int argc; char *argv[]; @@ -128,17 +136,6 @@ char *argv[]; } h += delh; } + return 0; } - -printhead(ac, av) /* print command header */ -register int ac; -register char **av; -{ - putchar('#'); - while (ac--) { - putchar(' '); - fputs(*av++, stdout); - } - putchar('\n'); -}