X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Flibrary%2Fdemo%2Frealisability.ma;h=9d89ef4f7edda901bb2ffecb2ab2b544a578a608;hb=070b44c9c2344967ca8c4531909614a0d4da2fbe;hp=66a96148eadc4cb6c193f0da845ca7ec952b9071;hpb=4dc47c9675ffd5fa50296ffaa9b5997501518c98;p=helm.git

diff --git a/helm/software/matita/library/demo/realisability.ma b/helm/software/matita/library/demo/realisability.ma
index 66a96148e..9d89ef4f7 100644
--- a/helm/software/matita/library/demo/realisability.ma
+++ b/helm/software/matita/library/demo/realisability.ma
@@ -63,7 +63,7 @@ for @{ 'sigma ${default
   @{\lambda ${ident i} : $ty. $p}
   @{\lambda ${ident i} . $p}}}.
 
-interpretation "Sigma" 'sigma \eta.x = (sigma _ x).
+interpretation "Sigma" 'sigma \eta.x = (sigma ? x).
 
 let rec type_OF_SP F ≝
  match F return λF.Type with