:: ClosedTerm a -> Script -package:comonad package:adjunctions