(STRATEGY INNERMOST) (VAR x) (DATATYPES A = < a >) (SIGNATURES f :: [A] -> A) (RULES f(x) -> f(a()))