Nuprl Definition : union-metric-space

union-metric-space(T;eq;X) ==
  i:T × (fst((X i))) with λp,q. let i,v = p in let j,w = q in if eq i j then rmin(mdist(snd((X i));v;w);r1) else r1 fi 



Definitions occuring in Statement :  mk-metric-space: X with d,  mdist: mdist(d;x;y),  rmin: rmin(x;y),  int-to-real: r(n),  ifthenelse: if b then t else f fi ,  pi1: fst(t),  pi2: snd(t),  apply: f a,  lambda: λx.A[x],  spread: spread def,  product: x:A × B[x],  natural_number: $n
Definitions occuring in definition :  mk-metric-space: X with d,  product: x:A × B[x],  pi1: fst(t),  lambda: λx.A[x],  spread: spread def,  ifthenelse: if b then t else f fi ,  rmin: rmin(x;y),  mdist: mdist(d;x;y),  pi2: snd(t),  apply: f a,  int-to-real: r(n),  natural_number: $n
FDL editor aliases :  union-metric-space

Latex:
union-metric-space(T;eq;X)  ==
    i:T  \mtimes{}  (fst((X  i)))  with  \mlambda{}p,q.  let  i,v  =  p 
                                                                in  let  j,w  =  q 
                                                                      in  if  eq  i  j  then  rmin(mdist(snd((X  i));v;w);r1)  else  r1  fi 



Date html generated: 2019_10_29-AM-11_11_56
Last ObjectModification: 2019_10_02-AM-09_52_28

Theory : reals


Home Index