:: ClosedTerm a -> Script -package:adjunctions is:exact -package:reflection package:comonad