We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent f4a7c0e commit 7629b94Copy full SHA for 7629b94
src/export/coq.ml
@@ -331,8 +331,8 @@ let command oc {elt; pos} =
331
begin match p_sym_def, p_sym_trm, p_sym_arg, p_sym_typ with
332
| true, Some t, _, Some a when List.exists is_lem p_sym_mod ->
333
(* If they have a type, opaque or private defined symbols are
334
- translated as Lemma's so that their definition is loaded in
335
- memory only when it is necessary. *)
+ translated as Lemma's so that their definition is loaded in
+ memory only when it is necessary. *)
336
string oc "Lemma "; ident oc p_sym_nam; params_list oc p_sym_arg;
337
string oc " : "; term oc a; string oc ".\nProof. exact (";
338
term oc t; string oc "). Qed.\n"
0 commit comments