Subroutine ANVarAttrCopy

subroutine ANVarAttrCopy

        ! Uses
    use an_types, only: AN_VARIABLE, an_variable_entry
    use an_file, only: ANFileDefineMode, inquire
    use an_vartable, only: vtable_lookup
    use netcdf_f77
    use dc_url, only: GT_PLUS
    use dc_error

        ! Calls
    call StoreError
    call inquire

        ! Variables
    type (AN_VARIABLE), intent(in) :: to
    character (len=*), intent(in) :: attrname
    type (AN_VARIABLE), intent(in) :: from
    integer, intent(out) :: stat
    character (len=NF_MAX_NAME) :: nc_aname
    integer :: id_var_from
    integer :: id_var_to
    logical :: myerr
    type (an_variable_entry) :: to_ent
    type (an_variable_entry) :: from_ent

end subroutine ANVarAttrCopy

Description of Variables

to

type (AN_VARIABLE), intent(in) :: to

attrname

character (len=*), intent(in) :: attrname

from

type (AN_VARIABLE), intent(in) :: from

stat

integer, intent(out) :: stat

nc_aname

character (len=NF_MAX_NAME) :: nc_aname

id_var_from

integer :: id_var_from

id_var_to

integer :: id_var_to

myerr

logical :: myerr

to_ent

type (an_variable_entry) :: to_ent

from_ent

type (an_variable_entry) :: from_ent