#| BEGIN (Write your solution here) |#
(define (RC R C dt)
  (lambda (i v0)
    (add-streams (scale-stream i
                               R)
                 (integral
                  (scale-stream i
                                (/ 1 C))
                  v0
                  dt))))
#| END |#