From b553fcede2e5173922ebb86abf1661422ac567d5 Mon Sep 17 00:00:00 2001
From: Claudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Date: Thu, 7 Dec 2000 18:17:47 +0000
Subject: [PATCH] Another contribution. But this one does not work (the XML
 module crashes). Bug reported to Hugo.

---
 helm/EXPORT/export_Rocq_HIGMAN/Makefile            | 11 +++++++++++
 helm/EXPORT/export_Rocq_HIGMAN/exporttheories.sh   | 10 ++++++++++
 helm/EXPORT/export_Rocq_HIGMAN/prova_Rocq_HIGMAN.v |  5 +++++
 3 files changed, 26 insertions(+)
 create mode 100644 helm/EXPORT/export_Rocq_HIGMAN/Makefile
 create mode 100755 helm/EXPORT/export_Rocq_HIGMAN/exporttheories.sh
 create mode 100644 helm/EXPORT/export_Rocq_HIGMAN/prova_Rocq_HIGMAN.v

diff --git a/helm/EXPORT/export_Rocq_HIGMAN/Makefile b/helm/EXPORT/export_Rocq_HIGMAN/Makefile
new file mode 100644
index 000000000..0aaabeeec
--- /dev/null
+++ b/helm/EXPORT/export_Rocq_HIGMAN/Makefile
@@ -0,0 +1,11 @@
+all: objects theories
+
+objects:
+	coqc -R HIGMAN Rocq.HIGMAN HIGMAN/*.v
+	echo "Load Verbose prova_Rocq_HIGMAN." | ~/V7/bin/coqtop.byte -R HIGMAN Rocq.HIGMAN
+
+theories:
+	./exporttheories.sh
+
+clean:
+	rm -f *.vo HIGMAN/*.vo
diff --git a/helm/EXPORT/export_Rocq_HIGMAN/exporttheories.sh b/helm/EXPORT/export_Rocq_HIGMAN/exporttheories.sh
new file mode 100755
index 000000000..d19281688
--- /dev/null
+++ b/helm/EXPORT/export_Rocq_HIGMAN/exporttheories.sh
@@ -0,0 +1,10 @@
+#!/bin/bash
+
+echo "Exporting theory $1";
+
+for i in HIGMAN/*.v
+ do
+  basename=$(basename $i | sed s/\\.v//)
+  cat $i | ../mktheory.pl "Rocq/HIGMAN/$basename" > \
+   examples/Rocq/HIGMAN/$basename.theory.xml
+ done
diff --git a/helm/EXPORT/export_Rocq_HIGMAN/prova_Rocq_HIGMAN.v b/helm/EXPORT/export_Rocq_HIGMAN/prova_Rocq_HIGMAN.v
new file mode 100644
index 000000000..9abc11a52
--- /dev/null
+++ b/helm/EXPORT/export_Rocq_HIGMAN/prova_Rocq_HIGMAN.v
@@ -0,0 +1,5 @@
+Require Export Xml.
+
+Require Higman.
+
+Print XML Module Disk "examples" Higman.
-- 
2.39.2