summaryrefslogtreecommitdiff
path: root/coding-exercises/2/78.rkt
diff options
context:
space:
mode:
Diffstat (limited to 'coding-exercises/2/78.rkt')
-rw-r--r--coding-exercises/2/78.rkt5
1 files changed, 5 insertions, 0 deletions
diff --git a/coding-exercises/2/78.rkt b/coding-exercises/2/78.rkt
index 3a4b100..637ea10 100644
--- a/coding-exercises/2/78.rkt
+++ b/coding-exercises/2/78.rkt
@@ -1,8 +1,13 @@
#lang racket
(require "../../shared/data-directed-programming.rkt")
+(require "./78/complex-rectangular.rkt")
+(require "./78/complex-polar.rkt")
;; We are basically making a data directed framework for arithmethic operations in this module
(define pkg (make-dispatch-table))
(define put (putter pkg))
(define get (getter pkg))
+(define print-tbl (printer pkg))
(define apply-generic (make-apply put get))
+(install-rectangular-package put)
+(install-polar-package put)