C
C*********************************************************
C                                           'gridcom'
C
      PARAMETER (    IM=41      ,JM=61   ,KB=16   )
      PARAMETER (    ISKP=2    , JSKP=3      )                      
C
C*********************************************************