(define make-move-instruction cons) (define coins car) (define pile cdr)After adding these definitions to nim.scm, the ADT can be used as shown below. A move instruction to take 7 coins from pile 2 is created and then accessed.
> (define move (make-move-instruction 2 7)) > move '(2 . 7) > (pile move) 7 > (coins move) 2 >