instance Category p => ProfunctorComonad (Lift p)