qse/ase/cmd/awk/t4.awk
2008-03-21 03:49:53 +00:00

22 lines
237 B
Awk

function main (arg1, arg2, arg3)
{
local i, k, c;
for (i = 0; i < 10; i++)
{
abc[i*2] = i;
}
k = 20;
for (i = 0; i < 100; i++)
{
if (i in abc) j[i] = i;
}
print arg1;
print arg2;
print arg3;
print "end of program";
}