; WorldDocumentDiagnostics Example - Extended mode
document=CreateWorldDocument("diagnostics-example","Diagnostics Example")
If document=0 Then RuntimeError WorldDocumentError()
diagnostics=WorldDocumentDiagnostics(document)
Print "Diagnostics: "+JsonCount(diagnostics)
FreeJson diagnostics
FreeWorldDocument document
End