" <-APL2-------------------- sam280.txt ----------------------------> " <- Format Control (Lfc) p 291 ------------------------------------> " <- Lfc[1] == Character for decimal point. ------------------------> Lfc[1]#',' 5 2 F 23.45 7 -2 F 2.45e15 Lfc[1]#'.' 5 2 F 23.45 7 -2 F 2.45e15 " <- Lfc[2] == Character for thousands indicator. ------------------> total#+/234.67 456.23 987.65 34.23 Lfc[2]#'&' 'total order cost: $5,555.50' F total Lfc[2]#',' 'total order cost: $5,555.50' F total " <- Lfc[3] == Character for fill empty portions. ------------------> ' 85555.50' F 17.3 56.43 Lfc[3]#'%' ' 85555.50' F 17.3 56.43 ' -85555.10' F -17.3 56.43 " <- Lfc[4] == Character for overflow indicator. -------------------> Lfc[4]#'?' ' 55.55'F345 .6789 Lfc[4]#'0' ' 55.55'F345 .6789 " <- Lfc[5] == Character for print-as-blank. -----------------------> '555_555_5555' F 8324632190 Lfc[5]#'^' '555_555_5555' F 8324632190 '555^555^5555' F 8324632190 " <- Lfc[6] == Negative number indicator. --------------------------> " <- '7' FBE (Format By Example) character - designate e-symbol. ---> " s/b -2.5784E 01 3.4000E-03 ' -1.7000E-01' F -25.784 .0034 123.45 -123.45 ' -15.7000E-01' F 123.45 -123.45 " <- '9' FBE (Format By Example) character - pad with zeros to 9 ---> ' 9995.59' F 14.7 0 56.43 ' 9995.59-' F 14.7 0 56.43 )off