| summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'src/struct/location.erl')
| -rw-r--r-- | src/struct/location.erl | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/src/struct/location.erl b/src/struct/location.erl index 624fe56..462dc46 100644 --- a/src/struct/location.erl +++ b/src/struct/location.erl @@ -13,6 +13,14 @@ -export ( [ + decode/1, + encode/1 + ] +). + +-export +( + [ apply_direction/2, dist/2 ] @@ -43,3 +51,9 @@ apply_direction (down, {X, Y}) -> -spec dist(type(), type()) -> non_neg_integer(). dist ({OX, OY}, {DX, DY}) -> (abs(DY - OY) + abs(DX - OX)). + +-spec encode (type()) -> list(non_neg_integer()). +encode ({X, Y}) -> [X, Y]. + +-spec decode (list(non_neg_integer)) -> type(). +decode ([X, Y]) when (is_integer(X) and is_integer(Y)) -> validate({X, Y}). |