home
/
code
/
cellular-automata.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Update GH URI
[cellular-automata.git]
/
polymorphism
/
001
/
src
/
polymorphism.ml
diff --git
a/polymorphism/001/src/polymorphism.ml
b/polymorphism/001/src/polymorphism.ml
index
bbfc59a
..
c2f0c3e
100644
(file)
--- a/
polymorphism/001/src/polymorphism.ml
+++ b/
polymorphism/001/src/polymorphism.ml
@@
-143,7
+143,7
@@
struct
let neighborhood t point =
List.map Direction.all ~f:Direction.to_offset
let neighborhood t point =
List.map Direction.all ~f:Direction.to_offset
- |> List.map ~f:(
fun offset_point -> Point.(point + offset_point)
)
+ |> List.map ~f:(
Point.(+) point
)
|> List.filter ~f:(is_within_bounds t)
let get_neighbors t point =
|> List.filter ~f:(is_within_bounds t)
let get_neighbors t point =
This page took
0.026399 seconds
and
4
git commands to generate.