1 files changed, 20 insertions, 0 deletions
diff --git a/community-garden/plant.scm b/community-garden/plant.scm
new file mode 100644
index 0000000..3f034b8
--- /dev/null
+++ b/community-garden/plant.scm
@@ -0,0 +1,20 @@
+(define-module (community-garden plant)
+  #:use-module (srfi srfi-9)
+  #:export (make-plant
+            plant?
+            plant-name
+            plant-char
+
+            sunflower
+            cabbage
+            winter-squash))
+
+(define-record-type <plant>
+  (make-plant name char)
+  plant?
+  (name plant-name)
+  (char plant-char))
+
+(define sunflower (make-plant "Sunflower" #\S))
+(define cabbage (make-plant "Cabbage" #\C))
+(define winter-squash (make-plant "Winter Squash" #\W))