      SUBROUTINE CR5PNS(PRI,GAMMA2,TIME,BAD)
C
C USING 48 SECOND CR-5 EDR RECORD, INTERPOLATE SECONDARY MAG DETAIL (0.96 SEC) 
C DATA POINTS TO PRIMARY MAG DETAIL RATE (0.24 SEC).
C
      INTEGER*2 TIME(6)
C
      REAL*4 PRI(3,2400),GAMMA2(3,600),SEC(3,2400)
C
      INCLUDE 'UNPACK.INC'
C
      DO I=1,2400
C
C STEP INTERPOLATE 0.12 SECOND GS-3 SECONDARY MAG DATA
C
       ISEC = (I-1)/4 + 1
       SEC(1,I) = GAMMA2(1,ISEC)
       SEC(2,I) = GAMMA2(2,ISEC)
       SEC(3,I) = GAMMA2(3,ISEC)
C
      END DO
C
C CALL CR-5 AVERAGING ROUTINES
C
      CALL CR5PRI(PRI,SEC,TIME,BAD)
C
      RETURN
      END
