functor (X : PARAMETERS-> S