Nuprl Definition : rounded-numerator
rounded-numerator(r;k) == let r' ⟵ r in if isint(r') then r' * k else let p,q = r' in (p * k) ÷ q fi
Definitions occuring in Statement :
callbyvalueall: callbyvalueall,
ifthenelse: if b then t else f fi ,
bfalse: ff,
btrue: tt,
isint: isint def,
spread: spread def,
divide: n ÷ m,
multiply: n * m
Definitions occuring in definition :
callbyvalueall: callbyvalueall,
ifthenelse: if b then t else f fi ,
isint: isint def,
btrue: tt,
bfalse: ff,
spread: spread def,
divide: n ÷ m,
multiply: n * m
FDL editor aliases :
rounded-numerator
Latex:
rounded-numerator(r;k) ==
let r' \mleftarrow{}{} r
in if isint(r') then r' * k else let p,q = r' in (p * k) \mdiv{} q fi
Date html generated:
2016_05_15-PM-10_37_25
Last ObjectModification:
2015_09_23-AM-08_26_52
Theory : rationals
Home
Index