src/scratch.incl: parameters needed to be modified are highlighted

 

      PARAMETER( K_MAX=40,IJ_MAX=200,I_SCRATCH = 3*200*200*40)                   SCRATCH.1
      COMMON / SCRATCH_SPACE / NTEMP, SCR(I_SCRATCH)                             SCRATCH.2
C                                                                                SCRATCH.3
      LOGICAL VERBOSE                                                            SCRATCH.4
      DATA VERBOSE /.FALSE./                                                     SCRATCH.5
                                                                                 SCRATCH.6