apl>" <-APL2-------------------- sam280.txt ---------------------------->


apl>" <- Format Control (Lfc) p 291 ------------------------------------>


apl>" <- Lfc[1] == Character for decimal point. ------------------------>


apl>Lfc[1]#','


apl>5 2 F 23.45

23,45

apl>7 -2 F 2.45e15

 2,4e15

apl>Lfc[1]#'.'


apl>5 2 F 23.45

23.45

apl>7 -2 F 2.45e15

 2.4e15

apl>" <- Lfc[2] == Character for thousands indicator. ------------------>


apl>total#+/234.67 456.23 987.65 34.23


apl>Lfc[2]#'&'


apl>'total order cost:  $5,555.50' F total

total order cost:  $1&712.78

apl>Lfc[2]#','


apl>'total order cost:  $5,555.50' F total

total order cost:  $1,712.78

apl>" <- Lfc[3] == Character for fill empty portions. ------------------>


apl>'  85555.50' F 17.3 56.43

  ***17.30  ***56.43

apl>Lfc[3]#'%'


apl>'  85555.50' F 17.3 56.43

  %%%17.30  %%%56.43

apl>' -85555.10' F -17.3 56.43

 %%%-17.30 %%%%56.43

apl>" <- Lfc[4] == Character for overflow indicator. ------------------->


apl>Lfc[4]#'?'


apl>' 55.55'F345 .6789

 ?????   .68

apl>Lfc[4]#'0'


apl>' 55.55'F345 .6789

' 55.55'F345 .6789
        ^ 29 - a width is too small in format.

apl>" <- Lfc[5] == Character for print-as-blank. ----------------------->


apl>'555_555_5555' F 8324632190

832 463 2190

apl>Lfc[5]#'^'


apl>'555_555_5555' F 8324632190

832_463_2190

apl>'555^555^5555' F 8324632190

832 463 2190

apl>" <- Lfc[6] == Negative number indicator. -------------------------->


apl>" <- '7' FBE (Format By Example) character - designate e-symbol. --->


apl>" s/b -2.5784E 01   3.4000E-03


apl>'  -1.7000E-01' F -25.784 .0034 123.45 -123.45

  -2.5784E 01   3.4000E-03   1.2345E 02  -1.2345E 02

apl>' -15.7000E-01' F 123.45 -123.45

  12.3450E 01 -12.3450E 01

apl>" <- '9' FBE (Format By Example) character - pad with zeros to 9 --->


apl>'  9995.59' F 14.7 0 56.43

  0014.70           0056.43

apl>'  9995.59-' F 14.7 0 56.43

  0014.70-            0056.43-

apl>)off