Changeset 8021


Ignore:
Timestamp:
06/17/19 21:22:27 (6 months ago)
Author:
paulf
Message:

upped MAXSTA to 30000 as per NCSN request

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/seismic_processing/hyp2000/common.inc

    r8018 r8021  
    299299C     INTEGER*4 JCEXP, JFEXP ,JXEXP            !LONGER LENGTH REQUIRED 
    300300      INTEGER    MAXSTA 
    301       PARAMETER (MAXSTA=26000)  !MAX NO. OF STATIONS STORED IN LOOKUP TABLE 
     301      PARAMETER (MAXSTA=30000)  !MAX NO. OF STATIONS STORED IN LOOKUP TABLE 
    302302      INTEGER    JSTA 
    303303      COMMON /D/ JSTA           !NUMBER OF STATIONS ACTUALLY READ INTO TABLE 
Note: See TracChangeset for help on using the changeset viewer.