shr_ncread_mod Module


Uses


Interfaces

public interface shr_ncread_varDimSize

  • private subroutine shr_ncread_varDimSizeName(fileName, varName, dimName, ns, rc)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: fileName
    character(len=*), intent(in) :: varName
    character(len=*), intent(in) :: dimName
    integer(kind=SHR_KIND_IN), intent(out) :: ns
    integer(kind=SHR_KIND_IN), intent(out), optional :: rc

  • private subroutine shr_ncread_varDimSizeID(fileName, varName, dnum, ns, rc)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: fileName
    character(len=*), intent(in) :: varName
    integer(kind=SHR_KIND_IN), intent(in) :: dnum
    integer(kind=SHR_KIND_IN), intent(out) :: ns
    integer(kind=SHR_KIND_IN), intent(out), optional :: rc

public interface shr_ncread_dimSize

  • private subroutine shr_ncread_dimSizeName(fileName, dimName, ns, rc)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: fileName
    character(len=*), intent(in) :: dimName
    integer(kind=SHR_KIND_IN), intent(out) :: ns
    integer(kind=SHR_KIND_IN), intent(out), optional :: rc

public interface shr_ncread_tField

  • private subroutine shr_ncread_tField3dR8(fn, tIndex, fldName, fld, dim1, dim2, dim3, tName, fidi, rc)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: fn
    integer(kind=SHR_KIND_IN), intent(in) :: tIndex
    character(len=*), intent(in) :: fldName
    real(kind=SHR_KIND_R8), intent(out) :: fld(:,:,:)
    character(len=*), intent(in), optional :: dim1
    character(len=*), intent(in), optional :: dim2
    character(len=*), intent(in), optional :: dim3
    character(len=*), intent(in), optional :: tName
    integer(kind=SHR_KIND_IN), intent(in), optional :: fidi
    integer(kind=SHR_KIND_IN), intent(out), optional :: rc

  • private subroutine shr_ncread_tField2dR8(fn, tIndex, fldName, fld, dim1, dim2, tName, fidi, rc)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: fn
    integer(kind=SHR_KIND_IN), intent(in) :: tIndex
    character(len=*), intent(in) :: fldName
    real(kind=SHR_KIND_R8), intent(out) :: fld(:,:)
    character(len=*), intent(in), optional :: dim1
    character(len=*), intent(in), optional :: dim2
    character(len=*), intent(in), optional :: tName
    integer(kind=SHR_KIND_IN), intent(in), optional :: fidi
    integer(kind=SHR_KIND_IN), intent(out), optional :: rc

  • private subroutine shr_ncread_tField1dR8(fn, tIndex, fldName, fld, dim1, tName, fidi, rc)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: fn
    integer(kind=SHR_KIND_IN), intent(in) :: tIndex
    character(len=*), intent(in) :: fldName
    real(kind=SHR_KIND_R8), intent(out) :: fld(:)
    character(len=*), intent(in), optional :: dim1
    character(len=*), intent(in), optional :: tName
    integer(kind=SHR_KIND_IN), intent(in), optional :: fidi
    integer(kind=SHR_KIND_IN), intent(out), optional :: rc

  • private subroutine shr_ncread_tField3dIN(fn, tIndex, fldName, fld, dim1, dim2, dim3, tName, fidi, rc)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: fn
    integer(kind=SHR_KIND_IN), intent(in) :: tIndex
    character(len=*), intent(in) :: fldName
    integer(kind=SHR_KIND_IN), intent(out) :: fld(:,:,:)
    character(len=*), intent(in), optional :: dim1
    character(len=*), intent(in), optional :: dim2
    character(len=*), intent(in), optional :: dim3
    character(len=*), intent(in), optional :: tName
    integer(kind=SHR_KIND_IN), intent(in), optional :: fidi
    integer(kind=SHR_KIND_IN), intent(out), optional :: rc

  • private subroutine shr_ncread_tField2dIN(fn, tIndex, fldName, fld, dim1, dim2, tName, fidi, rc)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: fn
    integer(kind=SHR_KIND_IN), intent(in) :: tIndex
    character(len=*), intent(in) :: fldName
    integer(kind=SHR_KIND_IN), intent(out) :: fld(:,:)
    character(len=*), intent(in), optional :: dim1
    character(len=*), intent(in), optional :: dim2
    character(len=*), intent(in), optional :: tName
    integer(kind=SHR_KIND_IN), intent(in), optional :: fidi
    integer(kind=SHR_KIND_IN), intent(out), optional :: rc

  • private subroutine shr_ncread_tField1dIN(fn, tIndex, fldName, fld, dim1, tName, fidi, rc)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: fn
    integer(kind=SHR_KIND_IN), intent(in) :: tIndex
    character(len=*), intent(in) :: fldName
    integer(kind=SHR_KIND_IN), intent(out) :: fld(:)
    character(len=*), intent(in), optional :: dim1
    character(len=*), intent(in), optional :: tName
    integer(kind=SHR_KIND_IN), intent(in), optional :: fidi
    integer(kind=SHR_KIND_IN), intent(out), optional :: rc

Functions

public function shr_ncread_varExists(fileName, varName)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: fileName
character(len=*), intent(in) :: varName

Return Value logical


Subroutines

public subroutine shr_ncread_varDimNum(fileName, varName, ns, rc)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: fileName
character(len=*), intent(in) :: varName
integer(kind=SHR_KIND_IN), intent(out) :: ns
integer(kind=SHR_KIND_IN), intent(out), optional :: rc

public subroutine shr_ncread_varDimSizes(fileName, varName, n1, n2, n3, n4, n5, n6, rc)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: fileName
character(len=*), intent(in) :: varName
integer(kind=SHR_KIND_IN), intent(out), optional :: n1
integer(kind=SHR_KIND_IN), intent(out), optional :: n2
integer(kind=SHR_KIND_IN), intent(out), optional :: n3
integer(kind=SHR_KIND_IN), intent(out), optional :: n4
integer(kind=SHR_KIND_IN), intent(out), optional :: n5
integer(kind=SHR_KIND_IN), intent(out), optional :: n6
integer(kind=SHR_KIND_IN), intent(out), optional :: rc

public subroutine shr_ncread_domain(fn, lonName, lon, latName, lat, maskName, mask, areaName, area, fracName, frac, rc)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: fn
character(len=*), intent(in) :: lonName
real(kind=SHR_KIND_R8), intent(out) :: lon(:,:)
character(len=*), intent(in) :: latName
real(kind=SHR_KIND_R8), intent(out) :: lat(:,:)
character(len=*), intent(in), optional :: maskName
integer(kind=SHR_KIND_IN), intent(out), optional :: mask(:,:)
character(len=*), intent(in), optional :: areaName
real(kind=SHR_KIND_R8), intent(out), optional :: area(:,:)
character(len=*), intent(in), optional :: fracName
real(kind=SHR_KIND_R8), intent(out), optional :: frac(:,:)
integer(kind=SHR_KIND_IN), intent(out), optional :: rc

public subroutine shr_ncread_field4dG(fn, fldName, rfld, ifld, dim1, dim1i, dim2, dim2i, dim3, dim3i, dim4, dim4i, dim5, dim5i, dim6, dim6i, fidi, rc)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: fn
character(len=*), intent(in) :: fldName
real(kind=SHR_KIND_R8), intent(out), optional :: rfld(:,:,:,:)
integer(kind=SHR_KIND_IN), intent(out), optional :: ifld(:,:,:,:)
character(len=*), intent(in), optional :: dim1
integer(kind=SHR_KIND_IN), intent(in), optional :: dim1i
character(len=*), intent(in), optional :: dim2
integer(kind=SHR_KIND_IN), intent(in), optional :: dim2i
character(len=*), intent(in), optional :: dim3
integer(kind=SHR_KIND_IN), intent(in), optional :: dim3i
character(len=*), intent(in), optional :: dim4
integer(kind=SHR_KIND_IN), intent(in), optional :: dim4i
character(len=*), intent(in), optional :: dim5
integer(kind=SHR_KIND_IN), intent(in), optional :: dim5i
character(len=*), intent(in), optional :: dim6
integer(kind=SHR_KIND_IN), intent(in), optional :: dim6i
integer(kind=SHR_KIND_IN), intent(in), optional :: fidi
integer(kind=SHR_KIND_IN), intent(out), optional :: rc

public subroutine shr_ncread_open(fileName, fid, rCode)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: fileName
integer(kind=SHR_KIND_IN), intent(out) :: fid
integer(kind=SHR_KIND_IN), intent(out) :: rCode

public subroutine shr_ncread_close(fid, rCode)

Arguments

Type IntentOptional Attributes Name
integer(kind=SHR_KIND_IN), intent(in) :: fid
integer(kind=SHR_KIND_IN), intent(out) :: rCode

public subroutine shr_ncread_handleErr(rCode, str)

Arguments

Type IntentOptional Attributes Name
integer(kind=SHR_KIND_IN), intent(in) :: rCode
character(len=*), intent(in) :: str

public subroutine shr_ncread_setAbort(flag)

Arguments

Type IntentOptional Attributes Name
logical, intent(in) :: flag

public subroutine shr_ncread_setDebug(iflag)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: iflag