awk/testdir/t.fun5

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