From bcec9491f7d7a122ebf36f5ef4bdd997443b5fe4 Mon Sep 17 00:00:00 2001
From: Jiri Pittner <jiri@pittnerovi.com>
Date: Tue, 5 Jul 2022 21:19:09 +0200
Subject: [PATCH] debugged bitvector mantissa

---
 bitvector.h |  4 ++--
 t.cc        | 14 +++++++++++++-
 2 files changed, 15 insertions(+), 3 deletions(-)

diff --git a/bitvector.h b/bitvector.h
index c088309..34e3aa9 100644
--- a/bitvector.h
+++ b/bitvector.h
@@ -101,10 +101,10 @@ if(x<0||x>=1) laerror("number not normalized in bitvector mantissa");
 bitvector b(nbits);
 b.clear();
 T y= x+x;
-for(int i=0; i<nbits; ++i)
+for(int i=0; i<nbits-1; ++i)
 	{
 	int n= (int) y;
-	if(n&1) b.set(i);
+	if(n&1) b.set(i+1);
 	y += y;
 	}
 return b;
diff --git a/t.cc b/t.cc
index 2e4e7fd..0f0ba9c 100644
--- a/t.cc
+++ b/t.cc
@@ -2585,11 +2585,23 @@ x.concatme(y);
 cout <<x;
 }
 
-if(1)
+if(0)
 {
 double x;
 cin>>x;
 cout <<mantissa(x,20)<<endl;
 }
 
+if(1)
+{
+double  t,t2;
+cin>>t;
+bitvector m = mantissa(t,64);
+cout <<m<<std::endl;
+bitvector_decimal(t2,m);
+cout <<t2;
+
+}
+
+
 }