*** balanc.f~ Sat Jan 28 00:00:00 1984 --- balanc.f Thu Nov 30 15:35:38 1995 *************** *** 57,63 **** c c ------------------------------------------------------------------ c ! radix = 16.0d0 c b2 = radix * radix k = 1 --- 57,63 ---- c c ------------------------------------------------------------------ c ! radix = 2.0d0 c b2 = radix * radix k = 1 *** cbal.f~ Sat Jan 28 00:00:00 1984 --- cbal.f Thu Nov 30 15:36:01 1995 *************** *** 62,68 **** c c ------------------------------------------------------------------ c ! radix = 16.0d0 c b2 = radix * radix k = 1 --- 62,68 ---- c c ------------------------------------------------------------------ c ! radix = 2.0d0 c b2 = radix * radix k = 1