/* Ends a plotting session */

#include "plplot.h"
#include "declare.h"

void plend()
{
   PLINT dev, term, gra, level;

   glev(&level);
   if (level == 0) return;
   gdev(&dev,&term,&gra);
   if (gra != 0) pltext();
   plfontrel();
   grtidy();
   slev(0);
}