Symbol Description Uses
Shap_funct define which Shapiro Filter function is used 38



File Line number Procedure Code
./pkg/shap_filt/shap_filt_readparms.F 164 SHAP_FILT_READPARMS
       IF ( Shap_funct.EQ.1 .OR. Shap_funct.EQ.4 ) THEN
./pkg/shap_filt/shap_filt_readparms.F 166 SHAP_FILT_READPARMS
     &           'does not work with Shap_funct=', Shap_funct
./pkg/shap_filt/shap_filt_readparms.F 169 SHAP_FILT_READPARMS
       ELSEIF ( Shap_funct.EQ.21 .AND. nShapUV.GT.0
./pkg/shap_filt/shap_filt_readparms.F 174 SHAP_FILT_READPARMS
         WRITE(msgBuf,'(A,I3,A)') ' Shap_funct=', Shap_funct,
./pkg/shap_filt/shap_filt_readparms.F 26 SHAP_FILT_READPARMS
     &   Shap_funct, shap_filt_uvStar, shap_filt_TrStagg,
./pkg/shap_filt/shap_filt_readparms.F 53 SHAP_FILT_READPARMS
      Shap_funct = 2
./pkg/shap_filt/shap_filt_readparms.F 83 SHAP_FILT_READPARMS
      CALL WRITE_0D_I( Shap_funct, INDEX_NONE,
./pkg/shap_filt/shap_filt_readparms.F 96 SHAP_FILT_READPARMS
      IF (Shap_funct.EQ.2) THEN
./pkg/shap_filt/SHAP_FILT.h 26 NO PROCEDURE
      INTEGER  Shap_funct, nShapT, nShapS, nShapUV 
./pkg/shap_filt/SHAP_FILT.h 29 NO PROCEDURE
     &         Shap_funct, nShapT, nShapS, nShapTrPhys, 
./pkg/shap_filt/shap_filt_apply_ts.F 103 SHAP_FILT_APPLY_TS
          IF ( Shap_funct.NE.1 .AND. Shap_funct.NE.4 .AND.
./pkg/shap_filt/shap_filt_apply_ts.F 116 SHAP_FILT_APPLY_TS
          IF ( Shap_funct.NE.1 .AND. Shap_funct.NE.4
./pkg/shap_filt/shap_filt_apply_ts.F 126 SHAP_FILT_APPLY_TS
          IF (Shap_funct.EQ.1) THEN
./pkg/shap_filt/shap_filt_apply_ts.F 130 SHAP_FILT_APPLY_TS
          ELSEIF (Shap_funct.EQ.2 .OR. Shap_funct.EQ.21) THEN
./pkg/shap_filt/shap_filt_apply_ts.F 134 SHAP_FILT_APPLY_TS
          ELSEIF (Shap_funct.EQ.4) THEN
./pkg/shap_filt/shap_filt_apply_ts.F 138 SHAP_FILT_APPLY_TS
          ELSEIF (Shap_funct.EQ.20) THEN
./pkg/shap_filt/shap_filt_apply_ts.F 149 SHAP_FILT_APPLY_TS
          IF ( Shap_funct.NE.1 .AND. Shap_funct.NE.4 .AND.
./pkg/shap_filt/shap_filt_apply_ts.F 162 SHAP_FILT_APPLY_TS
          IF ( Shap_funct.NE.1 .AND. Shap_funct.NE.4
./pkg/shap_filt/shap_filt_apply_ts.F 80 SHAP_FILT_APPLY_TS
          IF (Shap_funct.EQ.1) THEN
./pkg/shap_filt/shap_filt_apply_ts.F 84 SHAP_FILT_APPLY_TS
          ELSEIF (Shap_funct.EQ.2 .OR. Shap_funct.EQ.21) THEN
./pkg/shap_filt/shap_filt_apply_ts.F 88 SHAP_FILT_APPLY_TS
          ELSEIF (Shap_funct.EQ.4) THEN
./pkg/shap_filt/shap_filt_apply_ts.F 92 SHAP_FILT_APPLY_TS
          ELSEIF (Shap_funct.EQ.20) THEN
./pkg/shap_filt/shap_filt_apply_uv.F 106 SHAP_FILT_APPLY_UV
          IF ( Shap_funct.NE.1 .AND. Shap_funct.NE.4 .AND.
./pkg/shap_filt/shap_filt_apply_uv.F 121 SHAP_FILT_APPLY_UV
          IF ( Shap_funct.NE.1 .AND. Shap_funct.NE.4
./pkg/shap_filt/shap_filt_apply_uv.F 79 SHAP_FILT_APPLY_UV
          IF (Shap_funct.EQ.1) THEN
./pkg/shap_filt/shap_filt_apply_uv.F 83 SHAP_FILT_APPLY_UV
          ELSEIF (Shap_funct.EQ.2) THEN
./pkg/shap_filt/shap_filt_apply_uv.F 87 SHAP_FILT_APPLY_UV
          ELSEIF (Shap_funct.EQ.4) THEN
./pkg/shap_filt/shap_filt_apply_uv.F 91 SHAP_FILT_APPLY_UV
          ELSEIF (Shap_funct.EQ.20) THEN
./pkg/shap_filt/shap_filt_apply_uv.F 95 SHAP_FILT_APPLY_UV
          ELSEIF (Shap_funct.EQ.21) THEN