raberm · January 21, 2023 10:49
diff --git a/gistfile1.txt b/gistfile1.txt

 float frexp(float x, out float e)
 {
   e = ceil(log2(x));
   return(x * exp2(-e));
 }

 x = 0.15625;
 x = -118.62500;
 v = Ceiling[Log2[Abs[x]]] - 1
 s = -(Sign[x] - 1)/2; 
 r = Round[(Abs[x]*2^-v - 1)*2^23];
 {s, v + 127, r}

	float frexp(float x, out float e)
	{
	e = ceil(log2(x));
	return(x * exp2(-e));
	}

	x = 0.15625;
	x = -118.62500;
	v = Ceiling[Log2[Abs[x]]] - 1
	s = -(Sign[x] - 1)/2;
	r = Round[(Abs[x]2^-v - 1)2^23];
	{s, v + 127, r}