From f4b43031adf1094d007ce9e44b191255909d178c Mon Sep 17 00:00:00 2001
From: Aryadev Chavali <aryadev@aryadevchavali.com>
Date: Fri, 14 Feb 2025 16:59:46 +0000
Subject: Add a package for modelling cards

Time to do the fun non-yakshaving part.  I'll start out by writing
some custom types for the objects of concern: ranks, suits, cards and
sets of cards.
---
 packages.lisp | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'packages.lisp')

diff --git a/packages.lisp b/packages.lisp
index 56d3727..cd99262 100644
--- a/packages.lisp
+++ b/packages.lisp
@@ -32,6 +32,10 @@
    :range :take :split
    :rev-map))
 
+(defpackage cantedraw.model
+  (:use :cl :cantedraw.lib.macros :cantedraw.lib.functions)
+  (:export :int-card :rank :suit :card :cardset))
+
 (defpackage cantedraw.main
   (:use :cl :cantedraw.lib.macros :cantedraw.lib.functions)
   (:export :start))
-- 
cgit v1.2.3-13-gbd6f