%N grimg2 %F $MIR/src/grimg2.f
%D Image of a 2D data array (pixel-primitive devices)
%B
      SUBROUTINE GRIMG2 (A, IDIM, JDIM, I1, I2, J1, J2,
     1                   A1, A2, PA, MININD, MAXIND, MODE)
      INTEGER IDIM, JDIM, I1, I2, J1, J2, MININD, MAXIND, MODE
      REAL    A(IDIM,JDIM)
      REAL    A1, A2
      REAL    PA(6)

 (This routine is called by GRIMG0.)
