Tag Info

New answers tagged

2

No doubt this needs work to make robust: fract[s_String] := ( pow = StringLength[s] - First@First@StringPosition[s, "."]; ToExpression[StringReplace[s, "." -> ""]]/10^pow) $PreRead = If[Head[#] =!= Real, ( # /. s_String :> StringReplace[s, a : ("." ~~ DigitCharacter ...) ~~ "*^" :> a <> " 10^"] /. ...



Top 50 recent answers are included