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



Karsten Bolding 2012-01-24