Function Compose

Part of:

package kmrcl
( compose &rest < fns > )