/* setscale.aml 12/17/93
/* This aml determines the maximum scale that can be specified for a plot and
/* still come off the calcomp plotter as a single plot.  ( i.e., it
/* calculates the maximum scale for a plot to be 34.5 inches wide along the
/* y axis.) It would be advisable to rebox the coverage before running the
/* setscale command to be certain that the coverage extent has been
/* minimized.
/* setscale <cover> 




&args cover
&severity &error &ignore
&describe %cover%
&sv ymax := %dsc$ymax%
&sv xmax := %dsc$xmax%
&sv ymin := %dsc$ymin%
&sv xmin := %dsc$xmin%
&sv me := %ymax% - %ymin%
&sv msc := %me% / .8636
&type 'The maximum scale for your plot should be:'
&type [quote %msc%]
&return