File |
Line number |
Procedure |
Code |
./verification/tidal_basin_2d/code/external_forcing.F |
52 |
EXTERNAL_FORCING_U |
_RL Coord2longitude,longitud1,longitud2 |
./verification/tidal_basin_2d/code/external_forcing.F |
86 |
EXTERNAL_FORCING_U |
Coord2longitude=1./rSphere |
./verification/tidal_basin_2d/code/external_forcing.F |
88 |
EXTERNAL_FORCING_U |
Coord2longitude=pi/180. |
./verification/tidal_basin_2d/code/external_forcing.F |
94 |
EXTERNAL_FORCING_U |
longitud1=XC(i-1,j,bi,bj)*Coord2longitude |
./verification/tidal_basin_2d/code/external_forcing.F |
95 |
EXTERNAL_FORCING_U |
longitud2=XC(i,j,bi,bj)*Coord2longitude |