archetype
val check_json : ParseTree.archetype -> unit