%N winset %F $MIR/src/subs/win.for
%D Set max unzoomed window matrix
%P pjt
%: plotting, pgplot, user-interaction
%B
        subroutine WinSet( Xhi, Yhi )
        implicit none
        integer Xhi, Yhi

    WinSet sets-up the maximum number of x-windows and y-windows
    allowed in all future calls. This routine must be called before
    calling WinPick or WinPick1
