control_spmd

INTERFACE:

   subroutine control_spmd()

DESCRIPTION:

Distribute namelist data all processors. All program i/o is funnelled through the master processor. Processor 0 either reads restart/history data from the disk and distributes it to all processors, or collects data from all processors and writes it to disk.

USES:

 #if (defined CASA)
     use CASAMod,    only : lnpp, lalloc, q10, spunup
 #endif
     use spmdMod,    only : mpicom, MPI_CHARACTER, MPI_INTEGER, MPI_LOGICAL, MPI_REAL8
     use clm_varctl, only : single_column, scmlat, scmlon, rpntfil

ARGUMENTS:

     implicit none

REVISION HISTORY:

   Created by Mariana Vertenstein

LOCAL VARIABLES: