-%% test _with_ the WHD on the apply argument
+(* test _with_ the WHD on the apply argument *)
+set "baseuri" "cic:/matita/tests/apply/".
alias id "not" = "cic:/Coq/Init/Logic/not.con".
alias id "False" = "cic:/Coq/Init/Logic/False.ind#xpointer(1/1)".
assumption.
qed.
-%% test _without_ the WHD on the apply argument
+(* test _without_ the WHD on the apply argument *)
alias symbol "eq" (instance 0) = "leibnitz's equality".