copy_var -

INTERFACE:

     subroutine copy_var(grid_scan,var)
    subroutine copy_var(grid_scan,inf,outf)
    IMPLICIT NONE

DESCRIPTION:

Reads the relevant variables from the NetCDF file. Interpolates to the model grid if necessary. After a call to this routine updated versions of either variables used for calculating stresses and fluxes or directly the stresses/fluxes directly are available to do_meteo. INPUT PARAMETERS:

    integer, intent(in)                 :: grid_scan
    REAL_4B, intent(in)                 :: inf(:,:)

INPUT/OUTPUT PARAMETERS:

OUTPUT PARAMETERS:

    REALTYPE, intent(out)               :: outf(:,:)

REVISION HISTORY:

    See module for log.

LOCAL VARIABLES:

    integer         :: i1,i2,istr,j1,j2,jstr
    integer         :: i,j,err