c Program to draw 10-inch square, to test plot calibration
      call plots (0,0,0)
      call plot (0.1,0.1,3)
      call plot (0.1,10.1,2)
      call plot (10.1,10.1,2)
      call plot (10.1,0.1,2)
      call plot (0.1,0.1,2)
      call plot (0.0,0.0,999)
      stop
      end