Option Explicit
'Script written by Russell Loveridge
'Script copyrighted by <RAL: lapa.epfl.ch>

Call Main()
Sub Main()

	Dim strObject
		strObject = AddSphere(Array(0,0,0), 10)

End Sub