NewScene ,false

CreatePrim "Cube", "MeshSurface"

SetSelFilter "Edge"

SelectGeometryComponents "cube.edge[7,8,LAST]"

ApplyOp "SetEdgeCreaseValueOp", "cube.edge[7,8,LAST]", 3, siPersistentOperation

SetValue "cube.polymsh.SetEdgeCreaseValue.CreaseValue", 4.606

for each  edge in selection(0).CreateSubComponent.ComponentCollection

	logmessage "Edge of index : " & edge.index & " as a crease value of " & edge.crease

next