parents : (string -> string list)
#new_theory `my-theory`;; () : void #parents `my-theory`;; [`HOL`] : string list #parents `HOL`;; [`tydefs`; `sum`; `one`; `BASIC-HOL`] : string list #parents `tydefs`;; [`ltree`; `BASIC-HOL`] : string list #parents `string`;; evaluation failed parents -- string is not an ancestorHowever, loading the string library creates several additional ancestor theories:
#load_library `string`;; Loading library `string` ... Updating search path .Updating help search path .Declaring theory string a new parent Theory string loaded ...... Library `string` loaded. () : void #parents `string`;; [`ascii`; `HOL`] : string list #parents `my-theory`;; [`string`; `HOL`] : string list