10 seq reduce(#*) Constant new: FACT10
: newFunction  FACT10 . ;