      subroutine fermesauve
      INCLUDE 'Parametres.f'
      if (sauve_graphic) then
        sauve_graphic = .false.
        close(isgr)
        ipostscript = 1
      endif
      end
