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