File |
Line number |
Procedure |
Code |
./pkg/bulk_force/bulkf_fields_load.F |
101 |
BULKF_FIELDS_LOAD |
_RS vwind0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/bulk_force/bulkf_fields_load.F |
141 |
BULKF_FIELDS_LOAD |
CALL LEF_ZERO( vwind0,myThid ) |
./pkg/bulk_force/bulkf_fields_load.F |
154 |
BULKF_FIELDS_LOAD |
CALL LEF_ZERO( vwind0,myThid ) |
./pkg/bulk_force/bulkf_fields_load.F |
242 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( VWindFile,vwind0,intime0, |
./pkg/bulk_force/bulkf_fields_load.F |
334 |
BULKF_FIELDS_LOAD |
_EXCH_XY_R4(vwind0, myThid ) |
./pkg/bulk_force/bulkf_fields_load.F |
388 |
BULKF_FIELDS_LOAD |
VWIND(i,j,bi,bj) = bWght*vwind0(i,j,bi,bj) |
./pkg/bulk_force/bulkf_fields_load.F |
80 |
BULKF_FIELDS_LOAD |
& flw0, uwind0, vwind0, runoff0, |
./pkg/exf/exf_init.F |
49 |
EXF_INIT |
& vwindconst, vwind, vwind0, vwind1, mythid ) |
./pkg/exf/exf_getffields.F |
114 |
EXF_GETFFIELDS |
& vwind, vwind0, vwind1, vwindmask, |
./pkg/exf/exf_getffields.F |
99 |
EXF_GETFFIELDS |
& exf_inscal_vwind, vwind, vwind0, vwind1, vwindmask, |
./pkg/exf/exf_fields.h |
155 |
NO PROCEDURE |
common /exfl_vwind_r/ vwind0, vwind1 |
./pkg/exf/exf_fields.h |
156 |
NO PROCEDURE |
_RL vwind0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
./pkg/seaice/SEAICE_FFIELDS.h |
85 |
NO PROCEDURE |
COMMON /SEAICE_TDFIELDS/ uwind0, uwind1, vwind0, vwind1, |
./pkg/seaice/SEAICE_FFIELDS.h |
91 |
NO PROCEDURE |
_RS vwind0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/seaice_get_forcing.F |
100 |
SEAICE_GET_FORCING |
CALL INIT_ARRAY_RS( vwind0 , initValue, myThid ) |
./pkg/seaice/seaice_get_forcing.F |
147 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,vwind0,iRec ,myIter,myThid ) |
./pkg/seaice/seaice_get_forcing.F |
211 |
SEAICE_GET_FORCING |
CALL EXCH_UV_XY_RS(uwind0, vwind0, .TRUE., myThid) |
./pkg/seaice/seaice_get_forcing.F |
256 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,vwind0,iRec,myIter,myThid ) |
./pkg/seaice/seaice_get_forcing.F |
263 |
SEAICE_GET_FORCING |
CALL EXCH_UV_XY_RS(uwind0, vwind0, .TRUE., myThid) |
./pkg/seaice/seaice_get_forcing.F |
421 |
SEAICE_GET_FORCING |
vwind(i,j,bi,bj) = bWghtWind * vwind0(i,j,bi,bj) + |
./pkg/seaice/seaice_get_forcing.F |
434 |
SEAICE_GET_FORCING |
vwind(i,j,bi,bj) = aWghtWind * vwind0(i,j,bi,bj) + |