home
/
code
/
cellular-automata.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Rename Conway to Life.
[cellular-automata.git]
/
polymorphism
/
001
/
src
/
polymorphism.ml
diff --git
a/polymorphism/001/src/polymorphism.ml
b/polymorphism/001/src/polymorphism.ml
index
6fc0ba9
..
3c90972
100644
(file)
--- a/
polymorphism/001/src/polymorphism.ml
+++ b/
polymorphism/001/src/polymorphism.ml
@@
-187,7
+187,7
@@
module type RULE = sig
end
end
-module
Conway
: RULE = struct
+module
Life
: RULE = struct
type state = D | A
let state_of_string : (string -> state) = function
type state = D | A
let state_of_string : (string -> state) = function
@@
-387,7
+387,7
@@
let main () =
let rows, columns = Or_error.ok_exn Linux_ext.get_terminal_size () in
let interval = 0.1 in
let rules =
let rows, columns = Or_error.ok_exn Linux_ext.get_terminal_size () in
let interval = 0.1 in
let rules =
- [ (module
Conway
: RULE)
+ [ (module
Life
: RULE)
; (module ForestFire : RULE)
]
in
; (module ForestFire : RULE)
]
in
This page took
0.029118 seconds
and
4
git commands to generate.