File |
Line number |
Procedure |
Code |
./pkg/layers/layers_save.F |
14 |
LAYERS_FILL |
I df, trIdentity, fluxid, |
./pkg/layers/layers_save.F |
58 |
LAYERS_FILL |
CHARACTER*(3) fluxid |
./pkg/layers/layers_save.F |
69 |
LAYERS_FILL |
IF (fluxid.EQ.'SUR') THEN |
./pkg/layers/layers_save.F |
72 |
LAYERS_FILL |
ELSE IF (fluxid.EQ.'DFX') THEN |
./pkg/layers/layers_save.F |
75 |
LAYERS_FILL |
ELSE IF (fluxid.EQ.'DFY') THEN |
./pkg/layers/layers_save.F |
78 |
LAYERS_FILL |
ELSE IF (fluxid.EQ.'DFR') THEN |
./pkg/layers/layers_save.F |
81 |
LAYERS_FILL |
ELSE IF (fluxid.EQ.'AFX') THEN |
./pkg/layers/layers_save.F |
84 |
LAYERS_FILL |
ELSE IF (fluxid.EQ.'AFY') THEN |
./pkg/layers/layers_save.F |
87 |
LAYERS_FILL |
ELSE IF (fluxid.EQ.'AFR') THEN |
./pkg/layers/layers_save.F |
90 |
LAYERS_FILL |
ELSE IF (fluxid.EQ.'TOT') THEN |