ASR 33 Teletype FORTRAN Print Sample