SUBROUTINE GDADCN (R, a, con, ni, nj, nb)

ARGUMENTS

OUT

R(NI,NJ)  array containing result          real

IN

A(NI,NJ)  array to be operated on          real
CON       constant                         real
NI        x-dimension of array A and R     integer
NJ        y-dimension of array A and R     integer
NB        border rows to omit (see notes)  integer
  (1,NJ)      (NI,NJ)
   +-------------+
   |             | 
   |             |  arrays A and R 
   |             |
   |             |
   |             |
   +-------------+
  (1,1)       (NI,1)

DESCRIPTION

EXAMPLE

NOTES

NB  4-digit integer number which allows at most nine 
    rows on any side of the grid to be skipped.
    NB = d1*1000 + d2*100 +d3*10 + d4
    d1 = columns are skipped from left
    d2 = rows are skipped from bottom
    d3 = columns are skipped from right
    d4 = rows are skipped from top
    ex.:  NB=0000 include all borders (written as 0) 
      NB=1111 omit one row all around the grid 
      NB=2241 indicates that the 2 columns on the left of a, 
        2 rows at the bottom,  4 columns at the right 
        and 1 row at the top are not operated on and the 
        corresponding rows and columns of R are left 
        undefined by the routine     

SEE ALSO