Remove floating point machine

Author: jecisc

src/Math-Core-Process/PMIterativeProcess.class.st

@@ -33,7 +33,9 @@ PMIterativeProcess class >> defaultMaximumIterations [
 { #category : #default }
 PMIterativeProcess class >> defaultPrecision [
 	"Private - Answers the default precision for newly created instances."
-	^PMFloatingPointMachine new defaultNumericalPrecision
+
+	self flag: #todo. "In Pharo 12 the default comparision precision of Float will be improved. When Pharo 12 will be the minimal version of Polymath we can use `Float defaultComparisonPrecision"
+	^ Float machineEpsilon sqrt
 ]
 
 { #category : #initialization }

src/Math-Helpers/PMFloatingPointMachine.class.st

@@ -16,8 +16,6 @@ PMGeneralFunctionFitTest >> setUp [
 	super setUp.
 
 	PMMitchellMooreGenerator reset: 0.
-	"Reset the FloatingPointMachine to make coverage consistent"
-	PMFloatingPointMachine reset.
 	f := [ :x :a :b | (a * x) sin / (b + x squared) ].
 	col := (-4 to: 4 by: 0.1) collect: [ :i | i @ (f cull: i cull: 0.1 cull: 0.4) ]
 ]

src/Math-Tests-FunctionFit/PMGeneralFunctionFitTest.class.st

@@ -9,9 +9,7 @@ PMNumericalMethodsTestCase >> setUp [
 	"Reset the seed of the random numbers (to get consistent results)"
 
 	super setUp.
-	PMMitchellMooreGenerator reset: 0.
-	"Reset the FloatingPointMachine to make coverage consistent"
-	PMFloatingPointMachine reset
+	PMMitchellMooreGenerator reset: 0
 ]
 
 { #category : #'linear algebra' }