diff options
Diffstat (limited to 'kernel/closure.ml')
| -rw-r--r-- | kernel/closure.ml | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/kernel/closure.ml b/kernel/closure.ml index 1d85089e9d..f4db948a02 100644 --- a/kernel/closure.ml +++ b/kernel/closure.ml @@ -1,10 +1,10 @@ -(***********************************************************************) -(* v * The Coq Proof Assistant / The Coq Development Team *) -(* <O___,, * INRIA-Rocquencourt & LRI-CNRS-Orsay *) -(* \VV/ *************************************************************) -(* // * This file is distributed under the terms of the *) -(* * GNU Lesser General Public License Version 2.1 *) -(***********************************************************************) +(************************************************************************) +(* v * The Coq Proof Assistant / The Coq Development Team *) +(* <O___,, * CNRS-Ecole Polytechnique-INRIA Futurs-Universite Paris Sud *) +(* \VV/ **************************************************************) +(* // * This file is distributed under the terms of the *) +(* * GNU Lesser General Public License Version 2.1 *) +(************************************************************************) (* $Id$ *) @@ -1006,7 +1006,7 @@ and knht e t stk = (mk_clos2 e t, stk) -(***********************************************************************) +(************************************************************************) (* Computes a normal form from the result of knh. *) let rec knr info m stk = @@ -1059,7 +1059,7 @@ and knit info e t stk = let kh info v stk = fapp_stack(kni info v stk) -(***********************************************************************) +(************************************************************************) let rec zip_term zfun m stk = match stk with |