#!/bin/nawk -f
#  Modify a PostScript file to overprint a NoNabla on the first page
#  Thanks to Ian Walker for the idea of using AWK to hack PostScript
   {print}
$0 == "%%Page: 1 1" {
   print "%%%%% NoNabla Stamp (Begin)"
   print "gsave"
   print "/inch { 72 mul } def"
   print "newpath 0 setlinejoin 0.80 setgray"
   print "2.60 inch 6.50 inch moveto"
   print "6.00 inch 6.50 inch lineto"
   print "4.40 inch 3.70 inch lineto"
   print "2.60 inch 6.50 inch lineto"
   print "0.1 inch 0 inch    rlineto"
   print "1.764 inch -2.744 inch rlineto"
   print "0.1 inch setlinewidth "
   print "stroke newpath"
   print "4.25 inch 5.5 inch 3.0 inch 0 360 arc closepath"
   print "0.5 inch setlinewidth 0.9 setgray stroke newpath"
   print "2.38 inch 7.62 inch moveto"
   print "6.62 inch 3.38 inch lineto stroke"
   print "grestore"
   print "%%%%% NoNabla Stamp (End)"
   }