Nuprl Definition : provisional-subterm-context
provisional-subterm-context{i:l}(X;f;vs;L) ==
  bind-provision(X;ctxt.ctt-subterm-context{i:l}(ctxt;f;||L||;vs;if (ctt-opr-is(f;"Glue")
                                                                    ∧b ((||L|| =z 2) ∨b(||L|| =z 3)))
                                                                    ∨b(ctt-opr-is(f;"case") ∧b (||L|| =z 3))
                                                                    ∨b(ctt-opr-is(f;"unglue")
                                                                      ∧b ((||L|| =z 2) ∨b(||L|| =z 3)))
  then snd(snd(L[1]))
  else snd(snd(L[0]))
  fi ))
Definitions occuring in Statement : 
ctt-subterm-context: ctt-subterm-context{i:l}(ctxt;f;n;vs;m)
, 
ctt-opr-is: ctt-opr-is(f;s)
, 
select: L[n]
, 
length: ||as||
, 
bor: p ∨bq
, 
band: p ∧b q
, 
ifthenelse: if b then t else f fi 
, 
eq_int: (i =z j)
, 
pi2: snd(t)
, 
natural_number: $n
, 
token: "$token"
, 
bind-provision: bind-provision(x;t.f[t])
Definitions occuring in definition : 
bind-provision: Error :bind-provision, 
ctt-subterm-context: ctt-subterm-context{i:l}(ctxt;f;n;vs;m)
, 
ifthenelse: if b then t else f fi 
, 
band: p ∧b q
, 
ctt-opr-is: ctt-opr-is(f;s)
, 
token: "$token"
, 
bor: p ∨bq
, 
eq_int: (i =z j)
, 
length: ||as||
, 
pi2: snd(t)
, 
select: L[n]
, 
natural_number: $n
FDL editor aliases : 
provisional-subterm-context
Latex:
provisional-subterm-context\{i:l\}(X;f;vs;L)  ==
    bind-provision(X;ctxt.ctt-subterm-context\{i:l\}(ctxt;f;||L||;vs;if  (ctt-opr-is(f;"Glue")
                                                                                                                                        \mwedge{}\msubb{}  ((||L||  =\msubz{}  2)
                                                                                                                                              \mvee{}\msubb{}(||L||  =\msubz{}  3)))
                                                                                                                                        \mvee{}\msubb{}(ctt-opr-is(f;"case")
                                                                                                                                            \mwedge{}\msubb{}  (||L||  =\msubz{}  3))
                                                                                                                                        \mvee{}\msubb{}(ctt-opr-is(f;"unglue")
                                                                                                                                            \mwedge{}\msubb{}  ((||L||  =\msubz{}  2)
                                                                                                                                                  \mvee{}\msubb{}(||L||  =\msubz{}  3)))
    then  snd(snd(L[1]))
    else  snd(snd(L[0]))
    fi  ))
Date html generated:
2020_05_21-AM-10_37_24
Last ObjectModification:
2020_03_17-PM-03_35_31
Theory : cubical!type!theory
Home
Index