Re: guile-question: 3/2 -> "1 1/2"

[Thomas Morley]

2015-08-11 8:19 GMT+02:00 David Kastrup <address@hidden>:
[...]
>
> Well, how about something like
>
> (define (integer-and-fraction nmbr)
>   (let* ((wh (truncate nmbr)) (rem (- nmbr wh)))
>     (if (or (zero? wh) (zero? rem)) (format #f "~s" nmbr)
>       (format #f "~s ~s" wh (abs rem)))))
>
> (display (integer-and-fraction (/ 1111 7)))
>
> Of course the disadvantage being that you cannot distinguish between one
> and two numbers and cannot read the number back in easily.
>
> --
> David Kastrup

Will have a closer look later, I'm in a hurry.

Many thanks,
  Harm