Subroutine ANVarPutAttrChar

subroutine ANVarPutAttrChar

        ! Uses
    use an_types, only: AN_VARIABLE, AN_VARIABLE_ENTRY
    use an_vartable, only: vtable_lookup
    use an_file, only: ANFileDefineMode
    use netcdf_f77, only: NF_PUT_ATT_TEXT, NF_NOERR, NF_DEL_ATT,  NF_ENOTINDEFINE, NF_GLOBAL
    use dc_url, only: GT_PLUS
    use dc_error
    use dc_string, only: get_array
    use an_generic, only: put_attr

        ! Calls
    call StoreError
    call get_array
    call put_attr

        ! Variables
    type (AN_VARIABLE), intent(in) :: var
    character (len=*), intent(in) :: name
    character (len=*), intent(in) :: value
    character (len=*), optional, intent(in) :: xtype
    logical, optional, intent(out) :: err
    integer, pointer, dimension (:) :: ip
    real, pointer, dimension (:) :: rp
    double precision, pointer, dimension (:) :: dp
    integer :: stat
    type (an_variable_entry) :: ent

end subroutine ANVarPutAttrChar

Description of Variables

var

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

name

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

value

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

xtype

character (len=*), optional, intent(in) :: xtype

err

logical, optional, intent(out) :: err

ip

integer, pointer, dimension (:) :: ip

rp

real, pointer, dimension (:) :: rp

dp

double precision, pointer, dimension (:) :: dp

stat

integer :: stat

ent

type (an_variable_entry) :: ent