diff --git a/src/cal-day.scm b/src/cal-day.scm
index d7fdcd2..2811ffe 100644
--- a/src/cal-day.scm
+++ b/src/cal-day.scm
@@ -38,6 +38,10 @@
 
   cal-day->month
 
+  cal-day->string
+  string->cal-day
+  parse-cal-day/month
+
   cal-day-tests!
   )
 
@@ -180,6 +184,8 @@
 		 (make-cal-day 2023 5 11))
     (test-true parse-cal-day/month
 	       (cal-day? (parse-cal-day/month "2023-05-11")))
+    (test-true parse-cal-day/month
+	       (cal-month? (parse-cal-day/month "2023-05")))
     ))
 
  )