\open pippo

\global a : *Set

\global b : *Prop

\global f = [x:*Set].[y:*Prop].x

\global "commento\"" c = f(a,b) : *Set

\close