sicp-ex-3.54


 (define factorials (cons-stream 1 (mul-streams (add-streams ones integers) factorials)))