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