--- Revision None
+++ Revision 343566306634
@@ -0,0 +1,3 @@
+(defn base-positions 
+  []
+  (white [Queen 'd1] [King 'e1] [Rook 'a1 'h1] [Knight 'b1 'g1] [Elephant 'c1 'f1] [Pawn 'a2 'h2]))