module BuiltinInductive;

builtin string
axiom MyString : Type;

main : Type;
main := MyString;

end;