:: ClosedTerm a -> Script -package:liqwid-plutarch-extra -package:comonad package:adjunctions