INTERFACE:
subroutine do_residual(finish)DESCRIPTION:
Here, the residual transports and depths are integrated up every time step. At the end of the simulation, the Eulerian residual currents are calculated from:
(94) |
where is the time when the residual calculation begins (to be chosen from namelist) and is the finishing time of the model simulation.
USES:
use variables_2d, only: u,v,res_du,res_u,res_dv,res_v,du,dv IMPLICIT NONEINPUT PARAMETERS:
integer, intent(in) :: finishREVISION HISTORY:
Original author(s): Karsten Bolding & Hans Burchard