clean_rivers

INTERFACE:

    subroutine clean_rivers
DESCRIPTION:

This routine closes the river handling by writing the integrated river run-off for each river to standard output. USES:

    IMPLICIT NONE
LOCAL VARIABLES:
    integer                   :: i,j,n
    REALTYPE                  :: tot=_ZERO_