Nuprl Definition : sbcode

sbcode(m;n)==r if (m) < (n)  then [0 sbcode(m;n m)]  else if (n) < (m)  then [1 sbcode(m n;n)]  else []

sbcode(m;n) ==
  fix((λsbcode,m,n. if (m) < (n)
                       then [0 (sbcode (n m))]
                       else if (n) < (m)  then [1 (sbcode (m n) n)]  else [])) 
  
  n



Definitions occuring in Statement :  cons: [a b] nil: [] less: if (a) < (b)  then c  else d apply: a fix: fix(F) lambda: λx.A[x] subtract: m natural_number: $n
Definitions occuring in definition :  fix: fix(F) lambda: λx.A[x] less: if (a) < (b)  then c  else d cons: [a b] natural_number: $n apply: a subtract: m nil: []
FDL editor aliases :  sbcode
Latex:
sbcode(m;n)
==r  if  (m)  <  (n)    then  [0  /  sbcode(m;n  -  m)]    else  if  (n)  <  (m)    then  [1  /  sbcode(m  -  n;n)]    else  []


Latex:
sbcode(m;n)  ==
    fix((\mlambda{}sbcode,m,n.  if  (m)  <  (n)
                                              then  [0  /  (sbcode  m  (n  -  m))]
                                              else  if  (n)  <  (m)    then  [1  /  (sbcode  (m  -  n)  n)]    else  [])) 
    m 
    n



Date html generated: 2016_05_15-PM-10_33_59
Last ObjectModification: 2015_09_23-AM-08_26_47

Theory : rationals


Home Index