Anonymous user
Formatted numeric output: Difference between revisions
→{{header|Lambdatalk}}
Line 1,223:
=={{header|Lambdatalk}}==
Lambdatalk has no primitive for numeric output. This is a way to define it:
<lang scheme>
{def fmt
Line 1,232 ⟶ 1,233:
{:dec {abs {trunc {* 1.0e:b {- :n {trunc :n}}}}}}
} {br}{padd {- :a {W.length {trunc :n}}} >}
{if {W.equal? :sign -} then else :sign}:trunc.:dec{padd {- :b {W.length :dec}} 0} }}}
-> fmt
| |||