Nuprl Definition : num-digits

num-digits(k)==r if (k) < (10)  then 1  else eval k' = k ÷ 10 in 1 + num-digits(k')

num-digits(k) ==  fix((λnum-digits,k. if (k) < (10)  then 1  else eval k' = k ÷ 10 in 1 + (num-digits k'))) k



Definitions occuring in Statement :  callbyvalue: callbyvalue,  less: if (a) < (b)  then c  else d,  apply: f a,  fix: fix(F),  lambda: λx.A[x],  divide: n ÷ m,  add: n + m,  natural_number: $n
Definitions occuring in definition :  fix: fix(F),  lambda: λx.A[x],  less: if (a) < (b)  then c  else d,  callbyvalue: callbyvalue,  divide: n ÷ m,  add: n + m,  natural_number: $n,  apply: f a
FDL editor aliases :  num-digits
Latex:
num-digits(k)==r  if  (k)  <  (10)    then  1    else  eval  k'  =  k  \mdiv{}  10  in  1  +  num-digits(k')


Latex:
num-digits(k)  ==
    fix((\mlambda{}num-digits,k.  if  (k)  <  (10)    then  1    else  eval  k'  =  k  \mdiv{}  10  in  1  +  (num-digits  k')))  k



Date html generated: 2017_10_04-PM-11_01_25
Last ObjectModification: 2017_06_02-AM-11_48_24

Theory : reals_2


Home Index