@@ -24,6 +24,98 @@ primarily \emph{erasing} information.
25\subsection{From \TT{} to \Idris{}}
25\subsection{From \TT{} to \Idris{}}
27+We define a meta-operation $\uninterp{\vt}$, which converts a \TT{} expression
28+$\vt$ to an \Idris{} expression which would elaborate to $\vt$:
33+\uninterp{\vx} &\mq\:\vx\\
34+\uninterp{\vc} &\mq\:\vc\\
35+\uninterp{\vx\;\ta} &\mq\:\vx\;(\vec{\MO{Impl}}\:\vx\:\ta) \\
36+\uninterp{\vf\:\va} &\mq\:\uninterp{\vf}\:\uninterp{\va}\\
37+\uninterp{\lam{\vx}{\vT}\SC\ve} &\mq \:\ilam{\vx}\uninterp{\ve} \\
38+\uninterp{\all{\vx}{\vT}\SC\ve} &\mq \:\piexp{\vx}{\uninterp{\vT}}\uninterp{\ve} \\
39+\uninterp{\LET\:\vx\defq\vt\Hab\vT\SC\ve} &\mq
40+\ilet{\vx}{\uninterp{\vt}}\uninterp{\ve}\\
44+\MO{Impl}\:\vx\:\va_i\:\mq
46+\iarg{\vn}{\ttinterp{\va_i}}&
47+\mbox{(if the $i$th argument to $\vx$ is implicit argument $\vn$)}\\
48+& \carg{\ttinterp{\va_i}} &
49+\mbox{(if the $i$th argument to $\vx$ is a constraint argument)}\\
50+& \ttinterp{\va_i} & \mbox{(otherwise)}
56+This is mostly a straightforward
57+traversal of the \TT{} expression, translating directly to an \Idris{} equivalent.
58+The interesting case is for applications of named functions,
59+$\uninterp{\vx\:\ta}$, where the arguments are translated to either implicit,
60+constraint or explicit arguments according to the definition of $\vx$.
61+Since only type declarations are allowed to have implicit or constraint arguments,
62+and $\uninterp{\cdot}$ translates \emph{expressions},
63+all function types are assumed to take explicit arguments.
65+We also define an operation $\MO{Unelab}$, which translates \TT{} declarations
66+to corresponding \Idris{} declarations. This generates data declarations and
67+pattern matching definitions only --- it makes no attempt to reconstruct
69+or \texttt{instance} declarations, or rebuild \texttt{case} expressions.
70+First, we define the reverse elaboration of type declarations, which must reconstruct
71+which arguments are implicit or constraint arguments:
76+\MO{UnelabType}\:(\vx\Hab\vt)\:\mq\:\vx\Hab\MO{UnelabTyDecl}\:0\:\vt
80+\MO{UnelabTyDecl}\:\vi\:(\all{\vx}{\vT}\SC\ve)
81+\mq & \piimp{\vx}{\uninterp{\vT}}(\MO{UnelabTyDecl}\:(\vi+1)\:\ve) \\
82+ & \hg\mbox{(if the $i$th argument to $\vx$ is an implicit argument)} \\
83+ & \piconst{\uninterp{\vT}}(\MO{UnelabTyDecl}\:(\vi+1)\:\ve) \\
84+ & \hg\mbox{(if the $i$th argument to $\vx$ is a constraint argument)} \\
85+ & \piexp{\vx}{\uninterp{\vT}}(\MO{UnelabTyDecl}\:(\vi+1)\:\ve) \\
86+ & \hg\mbox{(otherwise)} \\
92+Using this, we define $\MO{Unelab}$ for top level declarations. For pattern
93+matching clauses, we reverse elaborate as follows, discarding the explicit
94+pattern variable bindings and applying $\MO{UnelabType}$ to reconstruct
99+\MO{Unelab}\:(\vx\Hab\vt)\:\mq\:\MO{UnelabType}\:(\vx\Hab\vt)\\
100+\MO{Unelab}\:(\pat{\tx}{\tU}\SC\FN{f}\:\tts\:=\:\ve)
101+\:\mq\:\uninterp{\FN{f}\:\tts}\:=\:\uninterp{\ve}
106+For data type declarations, we unelaborate as follows, applying $\MO{UnelabType}$
107+for each of the top level type declarations:
111+\MO{Unelab}\:(\Data\;\TC{T}\:(\tx\Hab\ttt)\Hab\vT\;\Where\;\vec{\VV{cons}})
113+\hg\hg\mq\:\idata\:\MO{UnelabType}\:(\TC{T}\Hab\all{\tx}{\ttt}\SC\vT)\:\iwhere\:
114+(\vec{\MO{UnelabType}}\:\vec{\VV{cons}})
27\subsection{Elaboration Properties}
119\subsection{Elaboration Properties}
29\todo[inline]{
121\todo[inline]{