diff options
Diffstat (limited to 'lib/util.ml')
| -rw-r--r-- | lib/util.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/util.ml b/lib/util.ml index 1d020b516b..eca6e9885e 100644 --- a/lib/util.ml +++ b/lib/util.ml @@ -513,6 +513,8 @@ let matrix_transpose mat = (* Functions *) +let identity x = x + let compose f g x = f (g x) let iterate f = |