      SUBROUTINE GS3SEC(GAMMA2,SCF,TIME,BAD)
C
C USING 48 SECOND GS-3 EDR RECORD,
C INTERPOLATE SECONDARY MAG DETAIL (0.12 SEC) DATA POINTS
C TO PRIMARY MAG DETAIL RATE (0.06 SEC).
C
      INTEGER*2 TIME(6)
C
      REAL*4 GAMMA(3,800),GAMMA2(3,400),SCF(3,800)
C
      INCLUDE 'UNPACK.INC'
C
      DO I=1,800
C
C STEP INTERPOLATE 0.12 SECOND GS-3 SECONDARY MAG DATA
C
       ISEC = (I-1)/2 + 1
       GAMMA(1,I) = GAMMA2(1,ISEC)
       GAMMA(2,I) = GAMMA2(2,ISEC)
       GAMMA(3,I) = GAMMA2(3,ISEC)
C
      END DO
C
C CALL GS-3 AVERAGING ROUTINES
C
      CALL GS3PRI(GAMMA,SCF,TIME,BAD)
C
      RETURN
      END
