Name	Size	Mode	Actions
assert.awk	382	0644	editdlrm
bits2str.awk	327	0644	editdlrm
cliff_rand.awk	307	0644	editdlrm
ctime.awk	233	0644	editdlrm
ftrans.awk	317	0644	editdlrm
getopt.awk	2241	0644	editdlrm
gettime.awk	2491	0644	editdlrm
group.awk	1810	0644	editdlrm
join.awk	378	0644	editdlrm
libintl.awk	238	0644	editdlrm
nextfile.awk	386	0644	editdlrm
noassign.awk	422	0644	editdlrm
ord.awk	937	0644	editdlrm
passwd.awk	1164	0644	editdlrm
readable.awk	446	0644	editdlrm
rewind.awk	404	0644	editdlrm
round.awk	661	0644	editdlrm
strtonum.awk	1455	0644	editdlrm
zerofile.awk	424	0644	editdlrm

# round.awk --- do normal rounding # # Arnold Robbins, arnold@skeeve.com, Public Domain # August, 1996 function round(x, ival, aval, fraction) { ival = int(x) # integer part, int() truncates # see if fractional part if (ival == x) # no fraction return ival # ensure no decimals if (x < 0) { aval = -x # absolute value ival = int(aval) fraction = aval - ival if (fraction >= .5) return int(x) - 1 # -2.5 --> -3 else return int(x) # -2.3 --> -2 } else { fraction = x - ival if (fraction >= .5) return ival + 1 else return ival } }