| File |
Line number |
Procedure |
Code |
|
./pkg/shap_filt/SHAP_FILT.h |
33 |
NO PROCEDURE |
INTEGER Shap_funct, nShapT, nShapS, nShapUV |
|
./pkg/shap_filt/SHAP_FILT.h |
36 |
NO PROCEDURE |
& Shap_funct, nShapT, nShapS, nShapTrPhys, |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
110 |
SHAP_FILT_APPLY_TS |
IF ( Shap_funct.NE.1 .AND. Shap_funct.NE.4 .AND. |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
121 |
SHAP_FILT_APPLY_TS |
IF ( Shap_funct.NE.1 .AND. Shap_funct.NE.4 |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
131 |
SHAP_FILT_APPLY_TS |
IF (Shap_funct.EQ.1) THEN |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
135 |
SHAP_FILT_APPLY_TS |
ELSEIF (Shap_funct.EQ.2 .OR. Shap_funct.EQ.20 |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
136 |
SHAP_FILT_APPLY_TS |
& .OR. Shap_funct.EQ.21) THEN |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
140 |
SHAP_FILT_APPLY_TS |
ELSEIF (Shap_funct.EQ.4) THEN |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
155 |
SHAP_FILT_APPLY_TS |
IF ( Shap_funct.NE.1 .AND. Shap_funct.NE.4 .AND. |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
166 |
SHAP_FILT_APPLY_TS |
IF ( Shap_funct.NE.1 .AND. Shap_funct.NE.4 |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
86 |
SHAP_FILT_APPLY_TS |
IF (Shap_funct.EQ.1) THEN |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
90 |
SHAP_FILT_APPLY_TS |
ELSEIF (Shap_funct.EQ.2 .OR. Shap_funct.EQ.20 |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
91 |
SHAP_FILT_APPLY_TS |
& .OR. Shap_funct.EQ.21) THEN |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
95 |
SHAP_FILT_APPLY_TS |
ELSEIF (Shap_funct.EQ.4) THEN |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
101 |
SHAP_FILT_APPLY_UV |
ELSEIF (Shap_funct.EQ.21) THEN |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
112 |
SHAP_FILT_APPLY_UV |
IF ( Shap_funct.NE.1 .AND. Shap_funct.NE.4 .AND. |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
125 |
SHAP_FILT_APPLY_UV |
IF ( Shap_funct.NE.1 .AND. Shap_funct.NE.4 |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
85 |
SHAP_FILT_APPLY_UV |
IF (Shap_funct.EQ.1) THEN |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
89 |
SHAP_FILT_APPLY_UV |
ELSEIF (Shap_funct.EQ.2 .OR. Shap_funct.EQ.20) THEN |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
93 |
SHAP_FILT_APPLY_UV |
ELSEIF (Shap_funct.EQ.4) THEN |
|
./pkg/shap_filt/shap_filt_readparms.F |
103 |
SHAP_FILT_READPARMS |
IF ( Shap_funct.EQ.1 .OR. Shap_funct.EQ.4 |
|
./pkg/shap_filt/shap_filt_readparms.F |
104 |
SHAP_FILT_READPARMS |
& .OR. Shap_funct.EQ.21 |
|
./pkg/shap_filt/shap_filt_readparms.F |
108 |
SHAP_FILT_READPARMS |
IF ( Shap_funct.EQ.1 .OR. Shap_funct.EQ.4 |
|
./pkg/shap_filt/shap_filt_readparms.F |
114 |
SHAP_FILT_READPARMS |
CALL WRITE_0D_I( Shap_funct, INDEX_NONE, |
|
./pkg/shap_filt/shap_filt_readparms.F |
137 |
SHAP_FILT_READPARMS |
IF (Shap_funct.EQ.2) THEN |
|
./pkg/shap_filt/shap_filt_readparms.F |
205 |
SHAP_FILT_READPARMS |
IF ( Shap_funct.EQ.1 .OR. Shap_funct.EQ.4 ) THEN |
|
./pkg/shap_filt/shap_filt_readparms.F |
207 |
SHAP_FILT_READPARMS |
& 'does not work with Shap_funct=', Shap_funct |
|
./pkg/shap_filt/shap_filt_readparms.F |
210 |
SHAP_FILT_READPARMS |
ELSEIF ( Shap_funct.EQ.21 .AND. nShapUV.GT.0 |
|
./pkg/shap_filt/shap_filt_readparms.F |
215 |
SHAP_FILT_READPARMS |
WRITE(msgBuf,'(A,I3,A)') ' Shap_funct=', Shap_funct, |
|
./pkg/shap_filt/shap_filt_readparms.F |
43 |
SHAP_FILT_READPARMS |
& Shap_funct, shap_filt_uvStar, shap_filt_TrStagg, |
|
./pkg/shap_filt/shap_filt_readparms.F |
65 |
SHAP_FILT_READPARMS |
Shap_funct = 2 |
|
./pkg/shap_filt/shap_filt_readparms.F |
96 |
SHAP_FILT_READPARMS |
IF (Shap_funct.EQ.20) THEN |