#!/usr/bin/mumps

#	Usage: file-count.mps < in-file 
#	If accidently started without input file,
#	^C (3) or ^D (4) will halt.

	set i=0

	for  read *a quit:'$test!(a=3)!(a=4)  set i=i+1

	write "count=",i,!
