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