WRKSCR.H

*WRKSCR   
C         
C     IF THE SIZE (NRC) OF THE WORKSHEET (RC) OR THE SIZE (NS) OF THE 
C       SCRATCH AREA (A) IS CHANGED, THEN   
C         DIMENSION 12500 OR THE DIMENSION 13500 MUST BE CHANGED.
C         
CCCCC COMMON /WRKSCR/ A(13500), RC(12500), NRC, NS, NS2     
CCCCC COMMON /WRKSCR/ A(46100), RC(45100), NRC, NS, NS2     
      COMMON /WRKSCR/ A(251000), RC(250000), NRC, NS, NS2     
C