| File |
Line number |
Procedure |
Code |
|
./pkg/bling/bling_airseaflux.F |
146 |
BLING_AIRSEAFLUX |
pisvel(i,j) = 0.337 _d 0 * wind(i,j,bi,bj)**2/3.6 _d 5 |
|
./pkg/bling/bling_airseaflux.F |
147 |
BLING_AIRSEAFLUX |
Kwexch_Pre(i,j) = pisvel(i,j) |
|
./pkg/bling/bling_airseaflux.F |
83 |
BLING_AIRSEAFLUX |
_RL pisvel (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/dic/dic_surfforcing.F |
145 |
DIC_SURFFORCING |
pisvel(i,j)=0.337 _d 0 *wind(i,j,bi,bj)**2/3.6 _d 5 |
|
./pkg/dic/dic_surfforcing.F |
146 |
DIC_SURFFORCING |
Kwexch_Pre(i,j,bi,bj) = pisvel(i,j) |
|
./pkg/dic/dic_surfforcing.F |
55 |
DIC_SURFFORCING |
_RL pisvel(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |