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