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