From b1cd183c10ff0faf7061e95d71e9b05e4a2419d0 Mon Sep 17 00:00:00 2001 From: giraffedata Date: Sat, 9 Jul 2011 23:32:13 +0000 Subject: Fix incorrect sum variance output git-svn-id: http://svn.code.sf.net/p/netpbm/code/trunk@1509 9d0c8265-081b-0410-96cb-a4ca84ce46f8 --- analyzer/pgmtexture.c | 16 +++++++++++----- 1 file changed, 11 insertions(+), 5 deletions(-) (limited to 'analyzer/pgmtexture.c') diff --git a/analyzer/pgmtexture.c b/analyzer/pgmtexture.c index 38eab114..1ad89264 100644 --- a/analyzer/pgmtexture.c +++ b/analyzer/pgmtexture.c @@ -41,6 +41,11 @@ ** ** 05 Oct 05 - Marc Breithecker ** Fix calculation or normalizing constants for d > 1. +** 9 Jul 11 - Francois P. S. Luus supplied fix for sum +** variance calculation (use F6:savg instead of F8:sentropy in +** F7:svar equation). + + */ #include @@ -993,15 +998,16 @@ main (int argc, char *argv[]) { savg[3] = f6_savg (P_matrix135, tones); results (F6, savg); + svar[0] = f7_svar (P_matrix0, tones, savg[0]); + svar[1] = f7_svar (P_matrix45, tones, savg[1]); + svar[2] = f7_svar (P_matrix90, tones, savg[2]); + svar[3] = f7_svar (P_matrix135, tones, savg[3]); + results (F7, svar); + sentropy[0] = f8_sentropy (P_matrix0, tones); sentropy[1] = f8_sentropy (P_matrix45, tones); sentropy[2] = f8_sentropy (P_matrix90, tones); sentropy[3] = f8_sentropy (P_matrix135, tones); - svar[0] = f7_svar (P_matrix0, tones, sentropy[0]); - svar[1] = f7_svar (P_matrix45, tones, sentropy[1]); - svar[2] = f7_svar (P_matrix90, tones, sentropy[2]); - svar[3] = f7_svar (P_matrix135, tones, sentropy[3]); - results (F7, svar); results (F8, sentropy); entropy[0] = f9_entropy (P_matrix0, tones); -- cgit 1.4.1