#!/usr/bin/env bash

# @(#) s1	Demonstrate awk vs bash for fractional addition, fixed-point.

# Utility functions: print-as-echo, print-line-with-visual-space, debug.
pe() { for i;do printf "%s" "$i";done; printf "\n"; }
pl() { pe;pe "-----" ;pe "$*"; }
db() { ( printf " db, ";for i;do printf "%s" "$i";done; printf "\n" ) >&2 ; }
db() { : ; }
C=$HOME/bin/context && [ -f $C ] && . $C

FILE=${1-data1}

pl " Input file $FILE:"
cat $FILE

pl " Results, awk:"
awk '{v+=$1} END{print v}' $FILE

pl " Results, bash (with scaling):"
v2=0
while read line
do
  v1=${line/./}
  pe " Line scaled is :$v1:"
  (( v2+=v1 ))
done <$FILE
v3=${v2%??}
v4=${v2/#$v3/}
pe " total    is :$v2:"
pe " integer  is :$v3:"
pe " fraction is :$v4:"
v5="${v3}.${v4}"
pe " Re-scaled   :$v5:"

exit 0

% ./s1

Environment: LC_ALL = C, LANG = C
(Versions displayed with local utility "version")
OS, ker|rel, machine: Linux, 2.6.26-2-amd64, x86_64
Distribution        : Debian GNU/Linux 5.0.7 (lenny) 
GNU bash 3.2.39

-----
 Input file data1:
490.47
244.61
263.07
131.59
246.81
115.20

-----
 Results, awk:
1491.75

-----
 Results, bash (with scaling):
 Line scaled is :49047:
 Line scaled is :24461:
 Line scaled is :26307:
 Line scaled is :13159:
 Line scaled is :24681:
 Line scaled is :11520:
 total    is :149175:
 integer  is :1491:
 fraction is :75:
 Re-scaled   :1491.75: