Nuprl Definition : per-union

per-union(A;B) ==
  pertype(λa,b. uand(uand((a)↓;(b)↓);if is inl then if is inl then outl(a) outl(b) ∈ A
                                                      else per-void()
                                     else if is inr then if is inr then outr(a) outr(b) ∈ B
                                                           else per-void()
                                          else per-void() 
                                     supposing uand((a)↓;(b)↓)))



Definitions occuring in Statement :  per-void: per-void() uand: uand(A;B) pertype: pertype(R) has-value: (a)↓ outr: outr(x) outl: outl(x) uimplies: supposing a isinr: isinr def isinl: isinl def lambda: λx.A[x] equal: t ∈ T
Definitions occuring in definition :  pertype: pertype(R) lambda: λx.A[x] uimplies: supposing a uand: uand(A;B) has-value: (a)↓ isinl: isinl def outl: outl(x) isinr: isinr def equal: t ∈ T outr: outr(x) per-void: per-void()
FDL editor aliases :  per-union

Latex:
per-union(A;B)  ==
    pertype(\mlambda{}a,b.  uand(uand((a)\mdownarrow{};(b)\mdownarrow{});if  a  is  inl  then  if  b  is  inl  then  outl(a)  =  outl(b)
                                                                                                            else  per-void()
                                                                          else  if  a  is  inr  then  if  b  is  inr  then  outr(a)  =  outr(b)
                                                                                                                      else  per-void()
                                                                                    else  per-void() 
                                                                          supposing  uand((a)\mdownarrow{};(b)\mdownarrow{})))



Date html generated: 2016_05_13-PM-03_54_49
Last ObjectModification: 2015_09_22-PM-05_45_34

Theory : per!type


Home Index