Nuprl Definition : ci-add-graph
ci-add-graph(ci;G;a;b) ==
let dd,T,f = ci in
<add-graph-decls(dd;G;T;a;b), T, λx.let i,k,s,v = x in if graph-rcvset(a;b;|dd|;G;k) then inl v else f x fi >
Definitions occuring in Statement :
add-graph-decls: add-graph-decls(dd;G;T;a;b)
,
es-decl-set-domain: |dd|
,
graph-rcvset: graph-rcvset(a;b;S;G;k)
,
ifthenelse: if b then t else f fi
,
spreadn: spread4,
spreadn: spread3,
apply: f a
,
lambda: λx.A[x]
,
pair: <a, b>
,
inl: inl x
FDL editor aliases :
ci-add-graph
ci-add-graph(ci;G;a;b) ==
let dd,T,f = ci in
<add-graph-decls(dd;G;T;a;b)
, T
, \mlambda{}x.let i,k,s,v = x
in if graph-rcvset(a;b;|dd|;G;k) then inl v else f x fi >
Date html generated:
2015_07_17-PM-00_00_16
Last ObjectModification:
2013_03_27-AM-11_08_55
Home
Index