X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Flibrary%2Fdemo%2Frealisability.ma;h=9d89ef4f7edda901bb2ffecb2ab2b544a578a608;hb=e78cf74f8976cf0ca554f64baa9979d0423ee927;hp=66a96148eadc4cb6c193f0da845ca7ec952b9071;hpb=c6094ab9349aaa41a8c29c5773a3e756ac819e7f;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