From 950cfbd4388e05de60e30b0c18ecbb59afb3ce3a Mon Sep 17 00:00:00 2001
From: Ramakrishnan Muthukrishnan <vu3rdd@gmail.com>
Date: Fri, 1 Jul 2011 22:36:21 +0530
Subject: [PATCH] solution to 3.50

---
 src/sicp/ex3_50.rkt | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100644 src/sicp/ex3_50.rkt

diff --git a/src/sicp/ex3_50.rkt b/src/sicp/ex3_50.rkt
new file mode 100644
index 0000000..be655d3
--- /dev/null
+++ b/src/sicp/ex3_50.rkt
@@ -0,0 +1,9 @@
+#lang racket
+
+(define (stream-map proc . argstreams)
+  (if (stream-null? (car argstreams))
+      the-empty-stream
+      (cons-stream
+       (apply proc (map stream-car argstreams))
+       (apply stream-map
+              (cons proc (map stream-cdr argstreams))))))
\ No newline at end of file
-- 
2.45.2