NewScene , false

set oRoot = ActiveSceneRoot

set oCube = oRoot.AddGeometry("Cube","MeshSurface")

set oMaterial = oCube.AddMaterial("Phong", siBranch)

set oLibrary = oMaterial.Library

Application.LogMessage oLibrary.FullName

' This example should log something like:

' INFO : Sources.Materials.DefaultLib