(@ +-                                                                ->
    (say (# factorial 12))                                             say (factorial 12)
    (say abc -
        (# sort sequence (@ a b +- (# cmp a b)) .abc -                 say abc
            (' 'B' 'A' 'C' 'D' 'F' 'E' .sequence)                      ' abc = sort sequence ( a b -> cmp a b )
        )                                                              ' sequence = { 'B' 'A' 'C' 'D' 'F' 'E' }
    )                                                                ;
)      
