| File |
Line number |
Procedure |
Code |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
101 |
CHEAPAML_INIT_FIXED |
IF (iG.LE.xmw) xmf = 1. _d 0 - (iG-1 )*recipMW |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
102 |
CHEAPAML_INIT_FIXED |
IF (iG.GE.Nx-xmw+1) xmf = 1. _d 0 - (Nx-iG)*recipMW |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
104 |
CHEAPAML_INIT_FIXED |
xmf = 1. _d 0 - (Ny-jG)*recipMW |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
106 |
CHEAPAML_INIT_FIXED |
xmf = 1. _d 0 - (iG-1 )*recipMW *(Ny-jG)*recipMW |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
108 |
CHEAPAML_INIT_FIXED |
xmf = 1. _d 0 - (Nx-iG)*recipMW *(Ny-jG)*recipMW |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
112 |
CHEAPAML_INIT_FIXED |
xmf = 1. _d 0 - (jG-1)*recipMW |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
114 |
CHEAPAML_INIT_FIXED |
xmf = 1. _d 0 - (iG-1 )*recipMW*(jG-1)*recipMW |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
116 |
CHEAPAML_INIT_FIXED |
xmf = 1. _d 0 - (Nx-iG)*recipMW*(jG-1)*recipMW |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
52 |
CHEAPAML_INIT_FIXED |
_RL recipMW |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
90 |
CHEAPAML_INIT_FIXED |
recipMW = ( xmw - 1 ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
91 |
CHEAPAML_INIT_FIXED |
IF ( xmw.NE.1 ) recipMW = 1. _d 0 / recipMW |