adjusted unc_g() to guess an unknown uncertainty by setting it to be a power

of ten in the last digit's place;

1 files changed, 2 insertions, 4 deletions

diff --git a/ckt0.awk b/ckt0.awk
index f868904..17d67b9 100644
--- a/ckt0.awk
+++ b/ckt0.awk
@@ -57,10 +57,9 @@ function unc_g(val) {
     # trim punctuation from val
     sub("[eE].*$", "", val)
     gsub("[.+-]", "", val)
-    n_digits = omag_val - (length(val) - 0.0)
-    n_digits *= omag_val - (length(val) - 1.0)
+    omag_unc = sprintf("%.f", omag_val - length(val) + 1.0)
 
-    return sprintf("%.2g", 10.0^(n_digits))
+    return sprintf("%g", 10.0^(omag_unc))
 
 }
 
@@ -225,7 +224,6 @@ BEGIN {
     t_meas[1] += 0.5*t_meas[2]
     if ( t_meas[2] == 0.0 ) {
         t_meas[2] = unc_g(t_meas[1])
-        #t_meas[2] = sqrt(t_meas[2]^2.0 + 1.0^2.0)
     }
     t_meas_str = sigfig(t_meas[1], t_meas[2])