V10/cmd/troff/dev202/printfont

# printfont:  print list of fonts in some sensible form

for i in $*
do
	grep $i Database |
	awk '
		BEGIN { FS = "\t+" }
		$2 != "--" { system("print1font " $0) }'
done