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

Call IntIt()
Sub IntIt()
	' this script shows how to make an integer out of a real number.
	' NOTE:  The INT fuction does not "round" the number!
	' It only deletes the fraction after the "non-fraction" number
	' so 1.25 becomes = 1,  2.95 becomes = 2  399.99999999 becomes = 399

	Dim dblnumber, intInteger
	dblnumber = Rhino.GetReal("Input any REAL number - you may want to make it a fraction! ",1.5)
	Rhino.print "The number you entered was: " & dblnumber
	intInteger = Int (dblnumber)
	Rhino.print "The INTEGERIZED version of the number you entered is: " & intInteger
End Sub