date100

Source: utils/date_time/date100.pro

 DATE100
        Return a "mod 100" year in the range 50 to 150

 Usage:
        y100 = date100(year[, /print])

 Return:
        y100    <input> The fixed year value

 Argument:
        year    any     input   The year to be normalized

 Keywords:
        print   ???     input   If set, then return a true mod 100
                                value suitable for printing.
        Full    ???     input   If set, then convert to a full year
                                with century

 History:
        Original: 1/12/95; SJT