File: RANGEN.FT of Tape: V50/Source/Source-Listing-FORTRAN