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