• by WalterGR on 11/7/2021, 3:24:18 PM

    The only examples are in the source.

      [ dup * ] is square
      [ dup 2 < [ drop 1 ] [ dup 1 - fact * ] ifelse ] is fact
      4 square .
      5 fact .