Silvio Valentini A cartesian closed category in Martin-Löf's intuitionistic type theory. 189-219 2003 290 Theor. Comput. Sci. 1 db/journals/tcs/tcs290.html#Valentini03