qse/ase/test/awk/unr-001.awk

7 lines
106 B
Awk
Raw Normal View History

2006-11-18 12:22:32 +00:00
# use negnum.data
BEGIN { OFS="\t"; }
{
for (i = 1; i <= NF; i = i + 1) if ($i < 0) $i = -$i;
print;
}