#!/bin/csh

set noglob
set com=$0
set prog=$com:t

set p=$argv[1]
shift

if( ! -d $p:q ) then
  echo $prog": No directory $p"
  exit 1
endif

set flnm=$argv[1]
shift

set tf=$argv[1]
((find $p -name $flnm |tee $tf) > /dev/null) >& /dev/null
#find $p -name $argv[1] |tee $tf
if( -z $tf ) then
  rm -f $tf
  exit 1
endif
exit 0
