Isabelle_DOF
/
Isabelle_DOF
1
0
Fork 2
Code Issues 1 Pull Requests Releases Wiki Activity

Fix typo
ci/woodpecker/push/build Pipeline failed Details

This commit is contained in:
Nicolas Méric 2023-11-24 18:12:50 +01:00
parent 443d63f3b5
commit e78a114879
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Isabelle_DOF/ontologies/scholarly_paper/scholarly_paper.thy
View File

@ -629,7 +629,7 @@ fun check ctxt cidS mon_id pos_opt =
fun get_level_raw oid = ISA_core.compute_attr_access ctxt "level" oid NONE @{here};
fun get_level oid = dest_option (snd o HOLogic.dest_number) (get_level_raw (oid));
fun check_level_hd a = case (get_level (snd a)) of
NONE => error("Invariant violation: leading section" ^ snd a ^
NONE => error("Invariant violation: leading section " ^ snd a ^
" must have lowest level")
| SOME X => X
fun check_group_elem level_hd a = case (get_level (snd a)) of