for f in P.*
do
	banner $f
	vi $f < vi.in
done