@@ -777,7 +777,7 @@ data Exists : (A : Set) -> (P : A -> Set) -> Set where
779Again, there is syntactic sugar for this. \texttt{(a : A ** P)} is the type of a pair of
779Again, there is syntactic sugar for this. \texttt{(a : A ** P)} is the type of a pair of
780−A and P, where the name \texttt{a} can occur inside P. \texttt{( a ** p (}
780+A and P, where the name \texttt{a} can occur inside P. \texttt{( a ** p )}
781constructs a value of this type. For example, we can pair a number with a
781constructs a value of this type. For example, we can pair a number with a
782\texttt{Vect} of a particular length.
782\texttt{Vect} of a particular length.
@@ -847,7 +847,7 @@ notation. with allows pattern matching on intermediate values:
847\begin{SaveVerbatim}{vfiltercons}
847\begin{SaveVerbatim}{vfiltercons}
849filter p (x :: xs) with (filter p xs)
849filter p (x :: xs) with (filter p xs)
850− | (_ , xs') = if (p x) then (_ , x :: xs') else (_ , xs')
850+ | ( _ ** xs' ) = if (p x) then ( _ ** x :: xs' ) else ( _ ** xs' )
852\end{SaveVerbatim}
852\end{SaveVerbatim}
853\useverb{vfiltercons}
853\useverb{vfiltercons}