69   int argi;  in main()  local
71   for (argi = 1; argi < argc; argi++)  in main()
73     if (argv[argi][0] == '-')  in main()
75       switch (argv[argi][1])  in main()
85           argi++;  in main()
86           if ((fp_al = fopen (argv[argi], "wb")) == NULL)  in main()
90                argv[argi]);  in main()
101           fprintf (stderr, "Error:  unknown option %s\n", argv[argi]);  in main()
109       if ((fp_rd = fopen (argv[argi], "rb")) == NULL)  in main()
112             fprintf (stderr, "Error:  file %s does not exist\n", argv[argi]);  in main()
118       if ((fp_wr = fopen (argv[argi], "wb")) == NULL)  in main()
121         fprintf (stderr, "Error:  can not create file %s\n", argv[argi]);  in main()