X-Git-Url: https://git.xandkar.net/?a=blobdiff_plain;f=polymorphic-life%2F001%2Fsrc%2Fpolymorphic_life.ml;h=7b55572331618be1fe94fccf52a65dc4b25e604d;hb=5c37daedbec6f75943578145d715a8e23d89cfd1;hp=e25bbf623bb4ac49afc6447916e953ecd04c2f44;hpb=0ce0e7980a7b2b94b646d063127f064290340cfa;p=cellular-automata.git diff --git a/polymorphic-life/001/src/polymorphic_life.ml b/polymorphic-life/001/src/polymorphic_life.ml index e25bbf6..7b55572 100644 --- a/polymorphic-life/001/src/polymorphic_life.ml +++ b/polymorphic-life/001/src/polymorphic_life.ml @@ -85,7 +85,8 @@ module Conway : CELL = struct | D -> " " | A -> "o" - let init () = Random.int 2 |> of_int + let init () = + Random.int 2 |> of_int let state = to_int