mirror of
https://github.com/unisonweb/unison.git
synced 2024-09-21 07:17:25 +03:00
13 lines
225 B
Plaintext
13 lines
225 B
Plaintext
-- board piece
|
|
|
|
structural type Board = Board Nat Nat Nat
|
|
|
|
use Board Board
|
|
|
|
-- uncommenting these gives errors from NPE to array index out of bounds -1, -2
|
|
-- x = 1
|
|
-- y = 2
|
|
|
|
ex = match Board 77 88 99 with
|
|
Board a b c -> c
|