restart_coupler

INTERFACE:

   subroutine restart_coupler(nio, flag)

DESCRIPTION:

    Read/write restart data needed for running in flux coupled mode

USES:

     use clm_varctl, only : csm_doflxave

ARGUMENTS:

     implicit none
     integer, intent(in) :: nio             !restart unit
     character(len=*), intent(in) :: flag   !"read" or "write"

REVISION HISTORY:

    02.09.17  Mariana Vertenstein: moved code to be part of ccsm module