awk/testdir/t.fun4

function f(a, n) {
	for (i=1; i <= n; i++)
		print "	" a[i]
}

{	print
	n = split($0, x)
	f(x, n)
}