'BEGIN'
    'COMMENT' 'LIBRARY' 1;
    'REAL'
        X;
    X := &+;OUTREAL(99, X);
'END'