<div dir="ltr">I think you need to use (number->string . . . ) to make this work.</div><div class="gmail_extra"><br><br><div class="gmail_quote">On Thu, Jan 2, 2014 at 12:46 PM, James Hearon <span dir="ltr"><<a href="mailto:j_hearon@hotmail.com" target="_blank">j_hearon@hotmail.com</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div><div dir="ltr">Hi,<br>I'm a bit stuck on finding info for scheme s7 format conversion from float to string for output to file. I've tried several things, mostly looking at lisp code, but cannot seem to come up with what it wants. Any help or hints would be appreciated.<br>
<br>Thank you.<br><br> <br>(define ouf1 (open-output-file "myfloats.txt"))
<br>(define outstring "init")
<br> <br>(define (myfloats total)
<br>(let ((test 0))
<br> (process with mytable = (make-heap '(.5 1 2.5 3))<br> until (= test total)
<br> do
<br>(set! outstring (next mytable)) ;***stuck here with format conversion ***<br>(set! outstring (string-append outstring (string #\newline)))<br>(display outstring ouf1)<br>(print (next mytable))
<br>(set! test (+ test 1))
)))
<br> <br>(sprout (myfloats 10) )
<br> <br>(close-output-port ouf1)<br> </div></div>
<br>_______________________________________________<br>
Cmdist mailing list<br>
<a href="mailto:Cmdist@ccrma.stanford.edu">Cmdist@ccrma.stanford.edu</a><br>
<a href="http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist" target="_blank">http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist</a><br>
<br></blockquote></div><br></div>