Prove IEEE connection without cheats

hol4/Infra/MachineTypeScript.sml

@@ -161,8 +161,6 @@ which simplifies to 2^(e_max) for base 2
 val maxValue_def = Define `
   maxValue (m:mType) = (&(2n ** (maxExponent m))):real`;
 
-(** Using the sign bit, the very same number is representable as a negative number,
-  thus just apply negation here **)
 val minValue_def = Define `
  minValue (m:mType) = inv (&(2n ** (minExponentPos m)))`;