Set the surface velocities to be used from model.

INTERFACE:

    subroutine set_ssuv(uvel,vvel)

DESCRIPTION:

This routine sets the simulated sea surface velocities to be used for the surface flux calculations.

USES:

    IMPLICIT NONE

INPUT PARAMETERS:

    REALTYPE, intent(in)                :: uvel,vvel

REVISION HISTORY:

    Original author(s): Karsten Bolding
    See log for airsea module