--- gforth/float.fs	1995/01/19 17:48:01	1.11
+++ gforth/float.fs	1995/01/24 17:31:20	1.12
@@ -86,7 +86,7 @@
 1e0 fasin 2e0 f* fconstant pi
 
 : f2*  2e0 f* ;
-: f2/  2e0 f/ ;
+: f2/  .5e0 f* ;
 : 1/f  1e0 fswap f/ ;