functor (Unit : Unit-> Labeller