dc_error Module Reference

Functions/Subroutines
integer function, public	errorcode ()
subroutine, public	geterrormessage (msg)
subroutine, public	storeerror (number, where, err, cause_c, cause_i)

Variables
integer, parameter, public	dc_noerr = 0
integer, parameter, public	gt_efake = -100
integer, parameter, public	gt_enomoredims = -101
integer, parameter, public	gt_edimnodim = -102
integer, parameter, public	gt_edimmultidim = -103
integer, parameter, public	gt_edimotherdim = -104
integer, parameter, public	gt_ebaddimname = -105
integer, parameter, public	gt_enotvar = -106
integer, parameter, public	gt_enomem = -107
integer, parameter, public	gt_eotherfile = -108
integer, parameter, public	gt_eargsizemismatch = -109
integer, parameter, public	gt_enomatchdim = -110
integer, parameter, public	gt_elimited = -111
integer, parameter, public	gt_ebadvar = -112
integer, parameter, public	gt_echarshort = -113
integer, parameter, public	gt_enounlimitdim = -114
integer, parameter, public	gt_ebadattrname = -115
integer, parameter, public	gt_ebadhistory = -116
integer, parameter, public	gt_ebadallocatesize = -117
integer, parameter, public	gt_erankmismatch = -118
integer, parameter, public	gt_enoturl = -119
integer, parameter, public	gt_ebadgt4commagraphy = -120
integer, parameter, public	gr_enotgr = -300
integer, parameter, public	dc_enotinit = -400
integer, parameter, public	dc_ealreadyinit = -401
integer, parameter, public	dc_ebadunit = -402
integer, parameter, public	dc_ebadcaltype = -403
integer, parameter, public	dc_ebadtimezone = -404
integer, parameter, public	dc_efilenameempty = -405
integer, parameter, public	dc_ebadfileopmode = -406
integer, parameter, public	dc_enounitnum = -407
integer, parameter, public	dc_enofileexist = -408
integer, parameter, public	dc_enofileread = -409
integer, parameter, public	dc_enofilewrite = -410
integer, parameter, public	dc_enegative = -411
integer, parameter, public	dc_earglack = -412
integer, parameter, public	dc_enoassoc = -413
integer, parameter, public	dc_enoentry = -414
integer, parameter, public	dc_enodimtime = -415
integer, parameter, public	dc_edimtime = -416
integer, parameter, public	dc_etoolargetime = -417
integer, parameter, public	dc_ebaddate = -418
integer, parameter, public	dc_einconsistcaldate = -419
integer, parameter, public	hst_enotindefine = -500
integer, parameter, public	hst_eindefine = -501
integer, parameter, public	hst_eintfile = -502
integer, parameter, public	hst_ebadname = -503
integer, parameter, public	hst_enottermgthist = -504
integer, parameter, public	hst_enodependtime = -505
integer, parameter, public	hst_ebadvarname = -506
integer, parameter, public	hst_enotimedim = -507
integer, parameter, public	hst_enoaxisname = -508
integer, parameter, public	hst_evarinuse = -509
integer, parameter, public	hst_ealreadyregvarfix = -510
integer, parameter, public	hst_ebadslice = -511
integer, parameter, public	hst_ebadnewfileint = -512
integer, parameter, public	hst_emaxdimsdepended = -513
integer, parameter, public	hst_eindivisible = -514
integer, parameter, public	hst_ebadterminus = -515
integer, parameter, public	hst_ebadorigin = -516
integer, parameter, public	hst_empinoaxisdata = -517
integer, parameter, public	usr_errno = -1000

Function/Subroutine Documentation

errorcode()

integer function, public dc_error::errorcode

(

)

Definition at line 620 of file dc_error.f90.

    !
    ! 現在設定されているエラーコードを返します。
    !
    ! Return an error code specified currently.
    !
    result = errno

geterrormessage()

subroutine, public dc_error::geterrormessage

(

character(len = *), intent(out)

msg

)

Definition at line 629 of file dc_error.f90.

References dc_ealreadyinit, dc_earglack, dc_ebadcaltype, dc_ebaddate, dc_ebadfileopmode, dc_ebadtimezone, dc_ebadunit, dc_edimtime, dc_efilenameempty, dc_einconsistcaldate, dc_enegative, dc_enoassoc, dc_enodimtime, dc_enoentry, dc_enofileexist, dc_enofileread, dc_enofilewrite, dc_enotinit, dc_enounitnum, dc_etoolargetime, gr_enotgr, gt_eargsizemismatch, gt_ebadallocatesize, gt_ebadattrname, gt_ebaddimname, gt_ebadgt4commagraphy, gt_ebadvar, gt_echarshort, gt_edimmultidim, gt_edimnodim, gt_edimotherdim, gt_efake, gt_elimited, gt_enomatchdim, gt_enomem, gt_enomoredims, gt_enoturl, gt_enotvar, gt_enounlimitdim, gt_eotherfile, gt_erankmismatch, hst_ealreadyregvarfix, hst_ebadname, hst_ebadnewfileint, hst_ebadorigin, hst_ebadslice, hst_ebadterminus, hst_ebadvarname, hst_eindefine, hst_eindivisible, hst_eintfile, hst_emaxdimsdepended, hst_empinoaxisdata, hst_enoaxisname, hst_enodependtime, hst_enotimedim, hst_enotindefine, hst_enottermgthist, hst_evarinuse, and usr_errno.

    !
    ! 現在設定されているエラーコードから対応するメッセージを返します。
    !
    ! Return messages corresponding to an error code specified currently.
    !
    use netcdf, only: nf90_strerror
    character(len = *), intent(out):: msg
    character(len = STRING):: message
    character(len = 20):: errno_c
    character(len = 20):: cause_int_c
  continue
    select case(errno)
    case(gt_efake)
      msg = ' function not implemented'
      !
      ! -101 以下: データ構造のエラー
      ! -101 or less: Error of data structure
      !
    case(gt_enomoredims)
      write(message, "(': dimension number', i4, ' is out of range')") cause_int
      msg = trim(message)
    case(gt_ebaddimname)
      msg = '(' // trim(cause_string) // '): unknown dimension name'
    case(gt_enotvar)
      msg = ' variable not opened'
    case(gt_enomem)
      msg = ' allocate/deallocate error'
    case(gt_edimnodim)
      msg = ' dimension variable has no dimension'
    case(gt_edimmultidim)
      msg = ' dimension variable has many dimensions'
    case(gt_edimotherdim)
      msg = ' dimension variable has another dimension'
    case(gt_eotherfile)
      msg = ' specified dimensional variable not on the same file'
    case(gt_eargsizemismatch)
      msg = ' arguments (' // trim(cause_string) //') array size mismatch'
    case(gt_enomatchdim)
      msg = ' dimension matching failed'
    case(gt_elimited)
      msg = ' variable already limited'
    case(gt_ebadvar)
      msg = ' variable type not supported'
    case(gt_echarshort)
      msg = ' character length not enough'
    case(gt_enounlimitdim)
      msg = ' NC_UNLIMITED dimension is not found'
    case(gt_ebadattrname)
      msg = ' invalid attribute name'
    case(gt_ebadallocatesize)
      msg = ' invalid allocated size'
    case(gt_erankmismatch)
      msg = ' rank of data and argument are mismatch (' // trim(cause_string) // ')'
    case(gt_enoturl)
      msg = ' URL (' // trim(cause_string) // ') is not found'
    case(gt_ebadgt4commagraphy)
      msg = ' (' // trim(cause_string) // ') is not gtool4 comma-graphy (ex. "time=100.0,x=10:20,y=^1:^5")'
      !
      ! -300 以下: GrADS 入出力のエラー
      ! -300 or less: Error of GrADS I/O
      !
    case(gr_enotgr)
      msg = ' invalid GrADS file'
      !
      ! -400 以下: DC ユーティリティのエラー
      ! -400 or less: Error of DC utilities
      !
    case(dc_enotinit)
      msg = ' object (' // trim(cause_string) // ') is not initialized'
    case(dc_ealreadyinit)
      msg = ' object (' // trim(cause_string) // ') is already initialized'
    case(dc_ebadunit)
      msg = ' unit (' // trim(cause_string) // ') is invalid'
    case(dc_ebadcaltype)
      write(message, '(" calendar type (", i4, ") is invalid")') cause_int
      msg = trim(message)
    case(dc_ebadtimezone)
      msg = ' time zone (' // trim(cause_string) // ') is invalid'
    case(dc_efilenameempty)
      msg = ' filename is empty'
    case(dc_ebadfileopmode)
      msg = ' file open mode (' // trim(cause_string) // ') is invalid'
    case(dc_enounitnum)
      msg = ' available unit number is not found within (' // trim(cause_string) // ')'
    case(dc_enofileexist)
      msg = ' file (' // trim(cause_string) // ') is not found'
    case(dc_enofileread)
      msg = ' file (' // trim(cause_string) // ') is not readable'
    case(dc_enofilewrite)
      msg = ' file (' // trim(cause_string) // ') is not writable'
    case(dc_enegative)
      msg = ' negative value is invalid for (' // trim(cause_string) // ')'
    case(dc_earglack)
      msg = ' lack of arguments (' // trim(cause_string) // ')'
    case(dc_enoassoc)
      msg = ' argument (' // trim(cause_string) // ') is not associated'
    case(dc_enoentry)
      msg = ' entry of (' // trim(cause_string) // ') is not found'
    case(dc_enodimtime)
      msg = ' dimensional time can not be converted into nondimensional time'
    case(dc_edimtime)
      msg = ' nondimensional time can not be converted into dimensional time'
    case(dc_etoolargetime)
      msg = ' number is too large for time'
    case(dc_ebaddate)
      msg = ' invalid expression of date'
    case(dc_einconsistcaldate)
      msg = ' calendar and date are inconsistent'
      !
      ! -500 以下: データ入出力層のエラー
      ! -500 or less: Error of data I/O layer
      !
    case(hst_enotindefine)
      msg = ' operation (' // trim(cause_string) // ') not allowed in data mode'
    case(hst_eindefine)
      msg = ' operation (' // trim(cause_string) // ') not allowed in define mode'
    case(hst_eintfile)
      msg = ' different intervals are applied to a file (' // trim(cause_string) // ')'
    case(hst_ebadname)
      msg = ' name (' // trim(cause_string) // ') is invalid'
    case(hst_enottermgthist)
      msg = ' GT_HISTORY correspond to (' // trim(cause_string) // ') is not terminated'
    case(hst_enodependtime)
      msg = ' (' // trim(cause_string) // ') does not depend on time'
    case(hst_ebadvarname)
      msg = ' variable name (' // trim(cause_string) // ') is invalid'
    case(hst_enotimedim)
      msg = ' time dimension is not found'
    case(hst_enoaxisname)
      msg = ' axis or weight (' // trim(cause_string) // ') is not found'
    case(hst_evarinuse)
      msg = ' variable name (' // trim(cause_string) // ') is already used'
    case(hst_ealreadyregvarfix)
      msg = ' already register of variables is fixed by (' // trim(cause_string) // ')'
    case(hst_ebadslice)
      msg = ' slice options are invalid (' // trim(cause_string) // ')'
    case(hst_ebadnewfileint)
      msg = ' invalid newfile interval (' // trim(cause_string) // ')'
    case(hst_emaxdimsdepended)
      write(message, '("(", i4, ")")') cause_int
      msg = trim(message)
      msg = ' variable (' // trim(cause_string) // ') depends on ' // trim(message) // ' dimensions'
    case(hst_eindivisible)
      msg = ' (' // trim(cause_string) // ') can not be divided'
    case(hst_ebadterminus)
      msg = ' terminus options are invalid (' // trim(cause_string) // ')'
    case(hst_ebadorigin)
      msg = ' origin options are invalid (' // trim(cause_string) // ')'
    case(hst_empinoaxisdata)
      msg = ' data of axis (' // trim(cause_string) // ') for MPI is lack'

      !
      !
      ! -1000 以下: ユーザー定義
      ! -1000 or less: User-defined error
      !
    case(:usr_errno)
      if (len(trim(adjustl(cause_string))) < 1) then
        cause_string = 'Unknown error'
      end if
      if (cause_int_valid) then
        write(cause_int_c, "(i8)") cause_int
        msg = trim(cause_string) // ' (' // trim(adjustl(cause_int_c)) // ')'
      else
        msg = trim(cause_string)
      end if
    case default
      goto 999
    end select
    write(errno_c, "(i8)") errno
    msg =  '*** ERROR (Code ' // trim(adjustl(errno_c))  // &
      & ') [' // trim(cause_location) // '] ***  ' // &
      & trim(msg)
    return

999 continue
    if (len(cause_string) > 0) then
      message = nf90_strerror(errno)
      write(errno_c, "(i8)") errno
      msg =  '*** ERROR (Code ' // trim(adjustl(errno_c)) // &
        & ') [' // trim(cause_location)             // &
        & '('   // trim(cause_string) // ')] ***  ' // &
        & trim(message)
    else if (cause_int_valid) then
      message = nf90_strerror(errno)
      write(errno_c, "(i8)") errno
      write(cause_int_c, "(i8)") cause_int
      msg =  '*** ERROR (Code ' // trim(adjustl(errno_c)) // &
        & ') [' // trim(cause_location)             // &
        & '('   // trim(adjustl(cause_int_c)) // ')] ***  ' // &
        & trim(message)
    else
      message = nf90_strerror(errno)
      write(errno_c, "(i8)") errno
      msg =  '*** ERROR (Code ' // trim(adjustl(errno_c))  // &
        & ') [' // trim(cause_location) // '] ***  ' // &
        & trim(message)
    endif

storeerror()

subroutine, public dc_error::storeerror	(	integer, intent(in)	number,
		character(len = *), intent(in)	where,
		logical, intent(out), optional	err,
		character(len = *), intent(in), optional	cause_c,
		integer, intent(in), optional	cause_i
	)

Definition at line 830 of file dc_error.f90.

References sysdep::abortprogram(), dc_noerr, geterrormessage(), and dc_types::string.

    !
    !== 典型的ライブラリ手続のために作られたエラー処理サブルーチン
    !== Error handling subroutine for typical procedures of library
    !
    ! 必要な引数は2つであり、第1引数 *number* には整数型のエラーコード、
    ! 第2引数 *where* には文字型でエラーの発生した手続名を与えます。
    ! デフォルトでは以下の形式の文字列が標準出力に表示されてプログラム
    ! は終了します。 エラーメッセージ error_message
    ! はエラーコードから自動的に決まります。
    ! 対応表がエラーコード一覧にあるので参照してください。
    !
    ! Number of necessary arguments is two. Give integer error code
    ! to first argument *number*, and procedure name where the error
    ! occurs to second argument *where*. By default, like a following
    ! string is displayed to standard output, and the program aborts
    ! Error message <error_message> is determined by error code automatically.
    ! See error code list.
    !
    !
    !     *** ERROR (Code number) [where] ***  error_message
    !
    !     *** ERROR (Code number) [where(cause_c)] ***  error_message
    !
    ! なお、gtool5 のライブラリ外からユーザがエラー処理用ツール
    ! として StoreError を用いることを想定し、<b><tt>USR_ERRNO</tt></b>
    ! 番より小さい
    ! エラーコードは空けてあります。<b><tt>USR_ERRNO</tt></b>
    ! より小さい値をエラーコードに与えると,
    ! StoreError は以下の形式の文字列を標準出力に出力してプログラムを
    ! 終了させます。より安易に使えるメッセージ出力およびエラー発生の
    ! ためのモジュールとして *dc_message* も用意してあるので
    ! そちらも参照してください。
    !
    ! In addition, for usage that users call StoreError as an error
    ! handling tool from the outside of gtool5 library,
    ! error codes smaller than <b><tt>USR_ERRNO</tt></b> is saved.
    ! When error codes smaller than <b><tt>USR_ERRNO</tt></b> is given,
    ! StoreError displays like a following string to standard output,
    ! and stops the program.
    ! *dc_message* module is prepared too. This module can be used
    ! more easily for message output and rise of error.
    !
    !
    !     *** ERROR (Code number) [where] ***  cause_c
    !
    !     *** ERROR (Code number) [where] ***  cause_c (cause_i)
    !
    !--
    !== 開発者向け解説
    !
    ! エラー番号 number を errno に格納する。同時に付随的情報
    ! where, cause_i を cause_location, cause_string,
    ! cause_int に格納する。
    ! err が与えられている場合、err は number が DC_NOERR の場合だけ偽になる。
    ! number が DC_NOERR ならば即復帰する。
    ! err が与えられていなければエラーメッセージを装置 * に出力して
    ! プログラムを終了する。
    !++

    integer,            intent(in)            :: number
                              ! エラーコード。
                              ! Error code
    character(len = *), intent(in)            :: where
                              ! エラー発生個所。
                              ! Place where error occurs
    logical,            intent(out), optional :: err
                              ! 例外処理用フラグ。
                              ! デフォルトでは、*number* に非エラーコード
                              ! 以外の値が与えられた場合、エラーメッセージを
                              ! 表示してプログラムは強制終了します。
                              ! 引数 *err* が与えられる場合、
                              ! プログラムは強制終了せず、代わりに
                              ! *err* に .true. が代入されます。
                              !
                              ! Exception handling flag.
                              ! By default, when error code (excluding
                              ! non error code) is given to *number*,
                              ! the program display error message and aborts.
                              ! If this *err* argument is given,
                              ! .true. is substituted to *err* and
                              ! the program does not abort.
    character(len = *), intent(in),  optional :: cause_c
                              ! 文字型メッセージ。
                              ! Character message
    integer,            intent(in),  optional :: cause_i
                              ! 整数型メッセージ。
                              ! Integer message
  continue
    if (present(err)) then
      err = (number /= dc_noerr)
      return
    endif
    if (number == dc_noerr) return
    errno = number
    cause_location = where
    if (present(cause_c)) then
      cause_string = trim(cause_c)
    else
      cause_string = ""
    endif
    if (present(cause_i)) then
      cause_int = cause_i
      cause_int_valid = .true.
    else
      cause_int_valid = .false.
    end if
    call dumperror

Here is the call graph for this function:

Variable Documentation

dc_ealreadyinit

integer, parameter, public dc_error::dc_ealreadyinit = -401

Definition at line 558 of file dc_error.f90.

  integer, parameter, public:: dc_ealreadyinit   = -401

dc_earglack

integer, parameter, public dc_error::dc_earglack = -412

Definition at line 569 of file dc_error.f90.

  integer, parameter, public:: dc_earglack       = -412

dc_ebadcaltype

integer, parameter, public dc_error::dc_ebadcaltype = -403

Definition at line 560 of file dc_error.f90.

  integer, parameter, public:: dc_ebadcaltype    = -403

dc_ebaddate

integer, parameter, public dc_error::dc_ebaddate = -418

Definition at line 575 of file dc_error.f90.

  integer, parameter, public:: dc_ebaddate       = -418

dc_ebadfileopmode

integer, parameter, public dc_error::dc_ebadfileopmode = -406

Definition at line 563 of file dc_error.f90.

  integer, parameter, public:: dc_ebadfileopmode = -406

dc_ebadtimezone

integer, parameter, public dc_error::dc_ebadtimezone = -404

Definition at line 561 of file dc_error.f90.

  integer, parameter, public:: dc_ebadtimezone   = -404

dc_ebadunit

integer, parameter, public dc_error::dc_ebadunit = -402

Definition at line 559 of file dc_error.f90.

  integer, parameter, public:: dc_ebadunit       = -402

dc_edimtime

integer, parameter, public dc_error::dc_edimtime = -416

Definition at line 573 of file dc_error.f90.

  integer, parameter, public:: dc_edimtime       = -416

dc_efilenameempty

integer, parameter, public dc_error::dc_efilenameempty = -405

Definition at line 562 of file dc_error.f90.

  integer, parameter, public:: dc_efilenameempty = -405

dc_einconsistcaldate

integer, parameter, public dc_error::dc_einconsistcaldate = -419

Definition at line 576 of file dc_error.f90.

  integer, parameter, public:: dc_einconsistcaldate = -419

dc_enegative

integer, parameter, public dc_error::dc_enegative = -411

Definition at line 568 of file dc_error.f90.

  integer, parameter, public:: dc_enegative      = -411

dc_enoassoc

integer, parameter, public dc_error::dc_enoassoc = -413

Definition at line 570 of file dc_error.f90.

  integer, parameter, public:: dc_enoassoc       = -413

dc_enodimtime

integer, parameter, public dc_error::dc_enodimtime = -415

Definition at line 572 of file dc_error.f90.

  integer, parameter, public:: dc_enodimtime     = -415

dc_enoentry

integer, parameter, public dc_error::dc_enoentry = -414

Definition at line 571 of file dc_error.f90.

  integer, parameter, public:: dc_enoentry       = -414

dc_enofileexist

integer, parameter, public dc_error::dc_enofileexist = -408

Definition at line 565 of file dc_error.f90.

  integer, parameter, public:: dc_enofileexist   = -408

dc_enofileread

integer, parameter, public dc_error::dc_enofileread = -409

Definition at line 566 of file dc_error.f90.

  integer, parameter, public:: dc_enofileread    = -409

dc_enofilewrite

integer, parameter, public dc_error::dc_enofilewrite = -410

Definition at line 567 of file dc_error.f90.

  integer, parameter, public:: dc_enofilewrite   = -410

dc_enotinit

integer, parameter, public dc_error::dc_enotinit = -400

Definition at line 557 of file dc_error.f90.

  integer, parameter, public:: dc_enotinit       = -400

dc_enounitnum

integer, parameter, public dc_error::dc_enounitnum = -407

Definition at line 564 of file dc_error.f90.

  integer, parameter, public:: dc_enounitnum     = -407

dc_etoolargetime

integer, parameter, public dc_error::dc_etoolargetime = -417

Definition at line 574 of file dc_error.f90.

  integer, parameter, public:: dc_etoolargetime  = -417

dc_noerr

integer, parameter, public dc_error::dc_noerr = 0

Definition at line 509 of file dc_error.f90.

  integer, public, parameter   :: dc_noerr  = 0

gr_enotgr

integer, parameter, public dc_error::gr_enotgr = -300

Definition at line 552 of file dc_error.f90.

  integer, parameter, public:: gr_enotgr = -300

gt_eargsizemismatch

integer, parameter, public dc_error::gt_eargsizemismatch = -109

Definition at line 536 of file dc_error.f90.

  integer, parameter, public:: gt_eargsizemismatch   = -109

gt_ebadallocatesize

integer, parameter, public dc_error::gt_ebadallocatesize = -117

Definition at line 544 of file dc_error.f90.

  integer, parameter, public:: gt_ebadallocatesize   = -117

gt_ebadattrname

integer, parameter, public dc_error::gt_ebadattrname = -115

Definition at line 542 of file dc_error.f90.

  integer, parameter, public:: gt_ebadattrname       = -115

gt_ebaddimname

integer, parameter, public dc_error::gt_ebaddimname = -105

Definition at line 532 of file dc_error.f90.

  integer, parameter, public:: gt_ebaddimname        = -105

gt_ebadgt4commagraphy

integer, parameter, public dc_error::gt_ebadgt4commagraphy = -120

Definition at line 547 of file dc_error.f90.

  integer, parameter, public:: gt_ebadgt4commagraphy = -120

gt_ebadhistory

integer, parameter, public dc_error::gt_ebadhistory = -116

Definition at line 543 of file dc_error.f90.

  integer, parameter, public:: gt_ebadhistory        = -116

gt_ebadvar

integer, parameter, public dc_error::gt_ebadvar = -112

Definition at line 539 of file dc_error.f90.

  integer, parameter, public:: gt_ebadvar            = -112

gt_echarshort

integer, parameter, public dc_error::gt_echarshort = -113

Definition at line 540 of file dc_error.f90.

  integer, parameter, public:: gt_echarshort         = -113

gt_edimmultidim

integer, parameter, public dc_error::gt_edimmultidim = -103

Definition at line 530 of file dc_error.f90.

  integer, parameter, public:: gt_edimmultidim       = -103

gt_edimnodim

integer, parameter, public dc_error::gt_edimnodim = -102

Definition at line 529 of file dc_error.f90.

  integer, parameter, public:: gt_edimnodim          = -102

gt_edimotherdim

integer, parameter, public dc_error::gt_edimotherdim = -104

Definition at line 531 of file dc_error.f90.

  integer, parameter, public:: gt_edimotherdim       = -104

gt_efake

integer, parameter, public dc_error::gt_efake = -100

Definition at line 523 of file dc_error.f90.

  integer, parameter, public:: gt_efake = -100

gt_elimited

integer, parameter, public dc_error::gt_elimited = -111

Definition at line 538 of file dc_error.f90.

  integer, parameter, public:: gt_elimited           = -111

gt_enomatchdim

integer, parameter, public dc_error::gt_enomatchdim = -110

Definition at line 537 of file dc_error.f90.

  integer, parameter, public:: gt_enomatchdim        = -110

gt_enomem

integer, parameter, public dc_error::gt_enomem = -107

Definition at line 534 of file dc_error.f90.

  integer, parameter, public:: gt_enomem             = -107

gt_enomoredims

integer, parameter, public dc_error::gt_enomoredims = -101

Definition at line 528 of file dc_error.f90.

  integer, parameter, public:: gt_enomoredims        = -101

gt_enoturl

integer, parameter, public dc_error::gt_enoturl = -119

Definition at line 546 of file dc_error.f90.

  integer, parameter, public:: gt_enoturl            = -119

gt_enotvar

integer, parameter, public dc_error::gt_enotvar = -106

Definition at line 533 of file dc_error.f90.

  integer, parameter, public:: gt_enotvar            = -106

gt_enounlimitdim

integer, parameter, public dc_error::gt_enounlimitdim = -114

Definition at line 541 of file dc_error.f90.

  integer, parameter, public:: gt_enounlimitdim      = -114

gt_eotherfile

integer, parameter, public dc_error::gt_eotherfile = -108

Definition at line 535 of file dc_error.f90.

  integer, parameter, public:: gt_eotherfile         = -108

gt_erankmismatch

integer, parameter, public dc_error::gt_erankmismatch = -118

Definition at line 545 of file dc_error.f90.

  integer, parameter, public:: gt_erankmismatch      = -118

hst_ealreadyregvarfix

integer, parameter, public dc_error::hst_ealreadyregvarfix = -510

Definition at line 591 of file dc_error.f90.

  integer, parameter, public:: hst_ealreadyregvarfix = -510

hst_ebadname

integer, parameter, public dc_error::hst_ebadname = -503

Definition at line 584 of file dc_error.f90.

  integer, parameter, public:: hst_ebadname          = -503

hst_ebadnewfileint

integer, parameter, public dc_error::hst_ebadnewfileint = -512

Definition at line 593 of file dc_error.f90.

  integer, parameter, public:: hst_ebadnewfileint    = -512

hst_ebadorigin

integer, parameter, public dc_error::hst_ebadorigin = -516

Definition at line 597 of file dc_error.f90.

  integer, parameter, public:: hst_ebadorigin        = -516

hst_ebadslice

integer, parameter, public dc_error::hst_ebadslice = -511

Definition at line 592 of file dc_error.f90.

  integer, parameter, public:: hst_ebadslice         = -511

hst_ebadterminus

integer, parameter, public dc_error::hst_ebadterminus = -515

Definition at line 596 of file dc_error.f90.

  integer, parameter, public:: hst_ebadterminus      = -515

hst_ebadvarname

integer, parameter, public dc_error::hst_ebadvarname = -506

Definition at line 587 of file dc_error.f90.

  integer, parameter, public:: hst_ebadvarname       = -506

hst_eindefine

integer, parameter, public dc_error::hst_eindefine = -501

Definition at line 582 of file dc_error.f90.

  integer, parameter, public:: hst_eindefine         = -501

hst_eindivisible

integer, parameter, public dc_error::hst_eindivisible = -514

Definition at line 595 of file dc_error.f90.

  integer, parameter, public:: hst_eindivisible      = -514

hst_eintfile

integer, parameter, public dc_error::hst_eintfile = -502

Definition at line 583 of file dc_error.f90.

  integer, parameter, public:: hst_eintfile          = -502

hst_emaxdimsdepended

integer, parameter, public dc_error::hst_emaxdimsdepended = -513

Definition at line 594 of file dc_error.f90.

  integer, parameter, public:: hst_emaxdimsdepended  = -513

hst_empinoaxisdata

integer, parameter, public dc_error::hst_empinoaxisdata = -517

Definition at line 598 of file dc_error.f90.

  integer, parameter, public:: hst_empinoaxisdata    = -517

hst_enoaxisname

integer, parameter, public dc_error::hst_enoaxisname = -508

Definition at line 589 of file dc_error.f90.

  integer, parameter, public:: hst_enoaxisname       = -508

hst_enodependtime

integer, parameter, public dc_error::hst_enodependtime = -505

Definition at line 586 of file dc_error.f90.

  integer, parameter, public:: hst_enodependtime     = -505

hst_enotimedim

integer, parameter, public dc_error::hst_enotimedim = -507

Definition at line 588 of file dc_error.f90.

  integer, parameter, public:: hst_enotimedim        = -507

hst_enotindefine

integer, parameter, public dc_error::hst_enotindefine = -500

Definition at line 581 of file dc_error.f90.

  integer, parameter, public:: hst_enotindefine      = -500

hst_enottermgthist

integer, parameter, public dc_error::hst_enottermgthist = -504

Definition at line 585 of file dc_error.f90.

  integer, parameter, public:: hst_enottermgthist    = -504

hst_evarinuse

integer, parameter, public dc_error::hst_evarinuse = -509

Definition at line 590 of file dc_error.f90.

  integer, parameter, public:: hst_evarinuse         = -509

usr_errno

integer, parameter, public dc_error::usr_errno = -1000

Definition at line 604 of file dc_error.f90.

  integer, parameter, public:: usr_errno = -1000