| File |
Line number |
Procedure |
Code |
|
./pkg/bulk_force/bulkf_fields_load.F |
140 |
BULKF_FIELDS_LOAD |
solar1(i,j,bi,bj) = 0. _d 0 |
|
./pkg/bulk_force/bulkf_fields_load.F |
213 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( SolarFile,solar1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
296 |
BULKF_FIELDS_LOAD |
_EXCH_XY_R4(solar1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
343 |
BULKF_FIELDS_LOAD |
& +aWght*solar1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
77 |
BULKF_FIELDS_LOAD |
& solar0, solar1, flwdwn0, flwdwn1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
92 |
BULKF_FIELDS_LOAD |
_RS solar1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |