aboutsummaryrefslogtreecommitdiff
path: root/cell.ml
diff options
context:
space:
mode:
authorSébastien Dailly <sebastien@chimrod.com>2017-11-07 15:44:40 +0100
committerSébastien Dailly <sebastien@chimrod.com>2017-11-08 14:05:56 +0100
commit6f6ff0e39eb6d771ef5336394079646ccdc18bd5 (patch)
treef06907f88972e8e87c5924de8eb225362a4a775b /cell.ml
parent50c16c8fc79d349f9db9d7975d1ae4e57050b648 (diff)
Use Zarith instead of Num for computing numbers
Diffstat (limited to 'cell.ml')
-rwxr-xr-xcell.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/cell.ml b/cell.ml
index c4aa9c3..e6ccd63 100755
--- a/cell.ml
+++ b/cell.ml
@@ -10,7 +10,7 @@ let from_string (fixed_x, x_name) (fixed_y, y) =
| 'A'..'Z' as c -> x:= (!x * 26) + ((int_of_char c) - 64)
| _ -> ()
) x_name;
- (!x, Num.int_of_num y), (fixed_x, fixed_y)
+ (!x, y), (fixed_x, fixed_y)
let to_hname x = begin
let rec extract acc value =