diff options
| author |  letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-11-28 02:22:43 +0000 |
|---|---|---|
| committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-11-28 02:22:43 +0000 |
| commit | 23931fef8a21e5bff5c1faa7d9d9dd6787197d35 (patch) | |
| tree | 3ce6476a82a10460228fc5da32d50274cc140d9d /lib/util.ml | |
| parent | 96c0a3e660d9ecc20a95086d3094645dd56bd0e3 (diff) | |
A usage cosmetique
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3320 85f007b7-540e-0410-9357-904b9bb8a0f7
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 1d020b516..eca6e9885 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 = |