REDROOM

PHP 5.6.40

Path:

Navigation

Breadcrumbs

/ / usr / share / gawk

Create

Create File | Create Folder | Upload Files | Run Command

Preview: round.awk Size: 661 B

//usr/share/gawk/round.awk

# 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
   }
}

Directory Contents

Dirs: 0 × Files: 26

Sort:

Enable drag-to-move

Name	Size	Perms	Modified	Actions
assert.awk	383 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
bits2str.awk	334 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
cliff_rand.awk	307 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
ctime.awk	234 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
ftrans.awk	315 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
getopt.awk	2.15 KB	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
gettime.awk	2.43 KB	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
group.awk	1.72 KB	lrw-r--r--	2022-04-18 15:55:53	Edit Download recursive recursive
have_mpfr.awk	221 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
inplace.awk	1.95 KB	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
intdiv0.awk	462 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
join.awk	378 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
libintl.awk	238 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
noassign.awk	422 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
ord.awk	937 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
passwd.awk	1.17 KB	lrw-r--r--	2022-04-18 15:55:53	Edit Download recursive recursive
processarray.awk	355 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
quicksort.awk	1.01 KB	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
readable.awk	489 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
readfile.awk	267 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
rewind.awk	404 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
round.awk	661 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
shellquote.awk	472 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
strtonum.awk	1.42 KB	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
walkarray.awk	214 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive
zerofile.awk	424 B	lrw-r--r--	2018-02-25 17:17:35	Edit Download recursive recursive