Welcome to the CHICKEN Scheme pasting service

bad argument type? added by dsp on Tue Oct 11 21:22:30 2016

(define phiOfX
        (lambda (M phir dx)
          (letrec ((phiofx (lambda (i)
                           (cond ((= i 0) (let ((val  phir)) (format #t "1: ~A~%" val)))
                                 ((= i -1) (let ((val (- phir (* dx (DsagdeevDphi phir M))))) (format #t "-1: ~A~%" val)))
                                 (else (let ((val (- (* 2 (phiofx (- i 1))) (phiofx (- i 2)) (* dx dx (DsagdeevDphi (phiofx (- i 1)) M))))) (format #t "~A: ~A~%" i val)))))))
            (phiofx 3))))

;null impl
(define DsagdeevDphi (lambda (phi M) 1))
[ permalink | raw ]

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
What does `(string? "foo")' produce?
Visually impaired? Let me spell it for you (wav file) download WAV