Skip to content

Prove sumTwoAncestors #446

Prove sumTwoAncestors

Prove sumTwoAncestors #446

Workflow file for this run

name: Coq Axiom Check
on:
push:
branches:
- main
paths:
- '**.v'
pull_request:
branches:
- main
jobs:
coq-check:
runs-on: ubuntu-latest
steps:
- name: Checkout repository
uses: actions/checkout@v3
- name: Install coq-prover snap
run: |
sudo snap install coq-prover
- name: Run coq_makefile
run: coq_makefile -f _CoqProject -o Makefile
- name: Run make
run: make
- name: Run coqchk and compare result
run: |
s=$( /snap/coq-prover/current/coq-platform/bin/coqchk -silent --output-context -R theories/ CoqCP -R generated-coq/ Generated $(ls **/*.vo | awk -F'/' '{split($NF, a, "."); print "CoqCP."a[1]}') 2>&1 )
expected=$(cat << 'EOF'
CONTEXT SUMMARY
===============
* Theory: Set is predicative
* Axioms:
Coq.Logic.FunctionalExtensionality.functional_extensionality_dep
* Constants/Inductives relying on type-in-type: <none>
* Constants/Inductives relying on unsafe (co)fixpoints: <none>
* Inductives whose positivity is assumed: <none>
EOF
)
normalize() {
echo "$1" | sed '/^[[:space:]]*$/d'
}
echo "NORMALIZED ACTUAL"
echo "$(normalize "$s")"
echo "NORMALIZED EXPECTED"
echo "$(normalize "$expected")"
if [ "$(normalize "$s")" != "$(normalize "$expected")" ]; then
echo "Error: Context summary does not match the expected result."
exit 1
fi