From 41e48677e3f27ba5fb962e8247d85b0f0f069757 Mon Sep 17 00:00:00 2001
From: torset
Date: Fri, 30 Jan 2009 16:04:01 +0000
Subject: Change precision of the printed numbers

---
 src/string/disp/ddispa.c | 2 +-
 src/string/disp/ddisps.c | 2 +-
 src/string/disp/zdispa.c | 2 +-
 src/string/disp/zdisps.c | 2 +-
 4 files changed, 4 insertions(+), 4 deletions(-)

(limited to 'src')

diff --git a/src/string/disp/ddispa.c b/src/string/disp/ddispa.c
index 59a73755..5e6bb84e 100644
--- a/src/string/disp/ddispa.c
+++ b/src/string/disp/ddispa.c
@@ -16,7 +16,7 @@ double ddispa (double* in, int rows, int columns){
 	int i = 0,j = 0;
 	
 	for (i = 0; i < rows; ++i) {
-		for (j=0;j<columns;j++) printf ("  %f  ", in[i+j*rows]);
+		for (j=0;j<columns;j++) printf ("  %1.20f  ", in[i+j*rows]);
 		printf("\n");
 	}
 	return 0;
diff --git a/src/string/disp/ddisps.c b/src/string/disp/ddisps.c
index e13ce95f..d1b4ef80 100644
--- a/src/string/disp/ddisps.c
+++ b/src/string/disp/ddisps.c
@@ -13,6 +13,6 @@
 #include "disp.h"
 
 double ddisps (double in) {	
-	printf ("  %f  \n", in);
+	printf ("  %1.20f  \n", in);
 	return 0;
 }
diff --git a/src/string/disp/zdispa.c b/src/string/disp/zdispa.c
index 731fac6f..5d085d32 100644
--- a/src/string/disp/zdispa.c
+++ b/src/string/disp/zdispa.c
@@ -16,7 +16,7 @@ double zdispa (doubleComplex* in, int rows, int columns){
 	int i = 0,j = 0;
 	
 	for (i = 0; i < rows; ++i) {
-		for (j=0;j<columns;j++) printf("  %f + %fi  " ,zreals(in[i+j*rows]) ,zimags(in[i+j*rows])); 
+		for (j=0;j<columns;j++) printf("  %1.20f + %1.20fi  " ,zreals(in[i+j*rows]) ,zimags(in[i+j*rows])); 
 		printf("\n");
 	}
 	return 0;
diff --git a/src/string/disp/zdisps.c b/src/string/disp/zdisps.c
index 7b952dad..c4ec137f 100644
--- a/src/string/disp/zdisps.c
+++ b/src/string/disp/zdisps.c
@@ -14,6 +14,6 @@
 
 double zdisps (doubleComplex in) {	
 
-  printf("  %f + %fi  \n" ,zreals(in) ,zimags(in)); 
+  printf("  %1.20f + %1.20fi  \n" ,zreals(in) ,zimags(in)); 
   return 0;
 }
-- 
cgit