エラー処理用モジュール More...

Data Types
interface	dumperror
	手続引用仕様. いずれ差し替えられるように外部関数にしておく。 More...

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
	正のエラー番号は libc システムエラーメッセージのためにあけてある。システム依存性が大きく、非常に大きな数値も用いられるので空き領域を確保するのは困難である。

integer, parameter, public	gt_enomoredims = -101
	-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
	-300 以下: GrADS 入出力のエラー

integer, parameter, public	dc_enotinit = -400
	-400 以下: dc ユーティリティのエラー

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
	-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
	-1000 以下: ユーザー定義

Detailed Description

エラー処理用モジュール

Author: Youhei SASAKI, Eizi TOYODA, Yasuhiro MORIKAWA

Copyright: Copyright (C) GFD Dennou Club, 2000-2026. All rights reserved.
License is BSD-2-Clause. see COPYRIGHT in detail

Function/Subroutine Documentation

◆ errorcode()

integer function, public dc_error::errorcode

現在設定されているエラーコードを返します。

Returns: 現在設定されている整数型エラーコード

Definition at line 606 of file dc_error.f90.

607 result = errno

◆ geterrormessage()

subroutine, public dc_error::geterrormessage ( character(len = *), intent(out) msg )

現在設定されているエラーコードから対応するメッセージを返します。

Parameters

[out] msg 現在のエラーコードに対応するエラーメッセージ文字列

Definition at line 618 of file dc_error.f90.

    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

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.

◆ 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
	)

典型的ライブラリ手続のために作られたエラー処理サブルーチン

必要な引数は2つであり、第1引数 number には整数型のエラーコード、第2引数 where には文字型でエラーの発生した手続名を与えます。デフォルトでは以下の形式の文字列が標準出力に表示されてプログラムは終了します。エラーメッセージ error_message はエラーコードから自動的に決まります。対応表がエラーコード一覧にあるので参照してください。

*** ERROR (Code number) [where] ***  error_message

*** ERROR (Code number) [where(cause_c)] ***  error_message

なお、gtool5 のライブラリ外からユーザがエラー処理用ツールとして StoreError を用いることを想定し、USR_ERRNO 番より小さいエラーコードは空けてあります。USR_ERRNO より小さい値をエラーコードに与えると, StoreError は以下の形式の文字列を標準出力に出力してプログラムを終了させます。より安易に使えるメッセージ出力およびエラー発生のためのモジュールとして dc_message も用意してあるのでそちらも参照してください。

*** ERROR (Code number) [where] ***  cause_c

*** ERROR (Code number) [where] ***  cause_c (cause_i)

Parameters

[in]	number	エラーコード
[in]	where	エラー発生個所
[out]	err	例外処理用フラグ。デフォルトでは、`number` に非エラーコード以外の値が与えられた場合、エラーメッセージを表示してプログラムは強制終了します。引数 `err` が与えられる場合、プログラムは強制終了せず、代わりに `err` に `.true.` が代入されます。
[in]	cause_c	文字型メッセージ
[in]	cause_i	整数型メッセージ

Definition at line 890 of file dc_error.f90.

    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
  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

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

Here is the call graph for this function:

Variable Documentation

◆ dc_ealreadyinit

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

Definition at line 535 of file dc_error.f90.

535 integer, parameter, public:: DC_EALREADYINIT = -401

◆ dc_earglack

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

Definition at line 546 of file dc_error.f90.

546 integer, parameter, public:: DC_EARGLACK = -412

◆ dc_ebadcaltype

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

Definition at line 537 of file dc_error.f90.

537 integer, parameter, public:: DC_EBADCALTYPE = -403

◆ dc_ebaddate

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

Definition at line 552 of file dc_error.f90.

552 integer, parameter, public:: DC_EBADDATE = -418

◆ dc_ebadfileopmode

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

Definition at line 540 of file dc_error.f90.

540 integer, parameter, public:: DC_EBADFILEOPMODE = -406

◆ dc_ebadtimezone

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

Definition at line 538 of file dc_error.f90.

538 integer, parameter, public:: DC_EBADTIMEZONE = -404

◆ dc_ebadunit

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

Definition at line 536 of file dc_error.f90.

536 integer, parameter, public:: DC_EBADUNIT = -402

◆ dc_edimtime

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

Definition at line 550 of file dc_error.f90.

550 integer, parameter, public:: DC_EDIMTIME = -416

◆ dc_efilenameempty

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

Definition at line 539 of file dc_error.f90.

539 integer, parameter, public:: DC_EFILENAMEEMPTY = -405

◆ dc_einconsistcaldate

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

Definition at line 553 of file dc_error.f90.

553 integer, parameter, public:: DC_EINCONSISTCALDATE = -419

◆ dc_enegative

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

Definition at line 545 of file dc_error.f90.

545 integer, parameter, public:: DC_ENEGATIVE = -411

◆ dc_enoassoc

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

Definition at line 547 of file dc_error.f90.

547 integer, parameter, public:: DC_ENOASSOC = -413

◆ dc_enodimtime

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

Definition at line 549 of file dc_error.f90.

549 integer, parameter, public:: DC_ENODIMTIME = -415

◆ dc_enoentry

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

Definition at line 548 of file dc_error.f90.

548 integer, parameter, public:: DC_ENOENTRY = -414

◆ dc_enofileexist

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

Definition at line 542 of file dc_error.f90.

542 integer, parameter, public:: DC_ENOFILEEXIST = -408

◆ dc_enofileread

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

Definition at line 543 of file dc_error.f90.

543 integer, parameter, public:: DC_ENOFILEREAD = -409

◆ dc_enofilewrite

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

Definition at line 544 of file dc_error.f90.

544 integer, parameter, public:: DC_ENOFILEWRITE = -410

◆ dc_enotinit

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

-400 以下: dc ユーティリティのエラー

Definition at line 534 of file dc_error.f90.

534 integer, parameter, public:: DC_ENOTINIT = -400

◆ dc_enounitnum

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

Definition at line 541 of file dc_error.f90.

541 integer, parameter, public:: DC_ENOUNITNUM = -407

◆ dc_etoolargetime

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

Definition at line 551 of file dc_error.f90.

551 integer, parameter, public:: DC_ETOOLARGETIME = -417

◆ dc_noerr

dc_error::dc_noerr = 0

エラー等を保持

非エラーコード (エラーなし)

Definition at line 468 of file dc_error.f90.

468 integer, public, parameter :: DC_NOERR = 0

◆ gr_enotgr

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

-300 以下: GrADS 入出力のエラー

Definition at line 530 of file dc_error.f90.

530 integer, parameter, public:: GR_ENOTGR = -300

◆ gt_eargsizemismatch

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

Definition at line 515 of file dc_error.f90.

515 integer, parameter, public:: GT_EARGSIZEMISMATCH = -109

◆ gt_ebadallocatesize

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

Definition at line 523 of file dc_error.f90.

523 integer, parameter, public:: GT_EBADALLOCATESIZE = -117

◆ gt_ebadattrname

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

Definition at line 521 of file dc_error.f90.

521 integer, parameter, public:: GT_EBADATTRNAME = -115

◆ gt_ebaddimname

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

Definition at line 511 of file dc_error.f90.

511 integer, parameter, public:: GT_EBADDIMNAME = -105

◆ gt_ebadgt4commagraphy

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

Definition at line 526 of file dc_error.f90.

526 integer, parameter, public:: GT_EBADGT4COMMAGRAPHY = -120

◆ gt_ebadhistory

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

Definition at line 522 of file dc_error.f90.

522 integer, parameter, public:: GT_EBADHISTORY = -116

◆ gt_ebadvar

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

Definition at line 518 of file dc_error.f90.

518 integer, parameter, public:: GT_EBADVAR = -112

◆ gt_echarshort

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

Definition at line 519 of file dc_error.f90.

519 integer, parameter, public:: GT_ECHARSHORT = -113

◆ gt_edimmultidim

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

Definition at line 509 of file dc_error.f90.

509 integer, parameter, public:: GT_EDIMMULTIDIM = -103

◆ gt_edimnodim

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

Definition at line 508 of file dc_error.f90.

508 integer, parameter, public:: GT_EDIMNODIM = -102

◆ gt_edimotherdim

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

Definition at line 510 of file dc_error.f90.

510 integer, parameter, public:: GT_EDIMOTHERDIM = -104

◆ gt_efake

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

正のエラー番号は libc システムエラーメッセージのためにあけてある。システム依存性が大きく、非常に大きな数値も用いられるので空き領域を確保するのは困難である。

負のエラー番号は netCDF が使っている。少々の拡張も見込んで、 -99 までは使わないで置く。

Definition at line 503 of file dc_error.f90.

503 integer, parameter, public:: GT_EFAKE = -100

◆ gt_elimited

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

Definition at line 517 of file dc_error.f90.

517 integer, parameter, public:: GT_ELIMITED = -111

◆ gt_enomatchdim

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

Definition at line 516 of file dc_error.f90.

516 integer, parameter, public:: GT_ENOMATCHDIM = -110

◆ gt_enomem

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

Definition at line 513 of file dc_error.f90.

513 integer, parameter, public:: GT_ENOMEM = -107

◆ gt_enomoredims

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

-101 以下: データ構造のエラー

Definition at line 507 of file dc_error.f90.

507 integer, parameter, public:: GT_ENOMOREDIMS = -101

◆ gt_enoturl

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

Definition at line 525 of file dc_error.f90.

525 integer, parameter, public:: GT_ENOTURL = -119

◆ gt_enotvar

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

Definition at line 512 of file dc_error.f90.

512 integer, parameter, public:: GT_ENOTVAR = -106

◆ gt_enounlimitdim

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

Definition at line 520 of file dc_error.f90.

520 integer, parameter, public:: GT_ENOUNLIMITDIM = -114

◆ gt_eotherfile

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

Definition at line 514 of file dc_error.f90.

514 integer, parameter, public:: GT_EOTHERFILE = -108

◆ gt_erankmismatch

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

Definition at line 524 of file dc_error.f90.

524 integer, parameter, public:: GT_ERANKMISMATCH = -118

◆ hst_ealreadyregvarfix

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

Definition at line 567 of file dc_error.f90.

567 integer, parameter, public:: HST_EALREADYREGVARFIX = -510

◆ hst_ebadname

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

Definition at line 560 of file dc_error.f90.

560 integer, parameter, public:: HST_EBADNAME = -503

◆ hst_ebadnewfileint

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

Definition at line 569 of file dc_error.f90.

569 integer, parameter, public:: HST_EBADNEWFILEINT = -512

◆ hst_ebadorigin

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

Definition at line 573 of file dc_error.f90.

573 integer, parameter, public:: HST_EBADORIGIN = -516

◆ hst_ebadslice

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

Definition at line 568 of file dc_error.f90.

568 integer, parameter, public:: HST_EBADSLICE = -511

◆ hst_ebadterminus

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

Definition at line 572 of file dc_error.f90.

572 integer, parameter, public:: HST_EBADTERMINUS = -515

◆ hst_ebadvarname

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

Definition at line 563 of file dc_error.f90.

563 integer, parameter, public:: HST_EBADVARNAME = -506

◆ hst_eindefine

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

Definition at line 558 of file dc_error.f90.

558 integer, parameter, public:: HST_EINDEFINE = -501

◆ hst_eindivisible

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

Definition at line 571 of file dc_error.f90.

571 integer, parameter, public:: HST_EINDIVISIBLE = -514

◆ hst_eintfile

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

Definition at line 559 of file dc_error.f90.

559 integer, parameter, public:: HST_EINTFILE = -502

◆ hst_emaxdimsdepended

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

Definition at line 570 of file dc_error.f90.

570 integer, parameter, public:: HST_EMAXDIMSDEPENDED = -513

◆ hst_empinoaxisdata

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

Definition at line 574 of file dc_error.f90.

574 integer, parameter, public:: HST_EMPINOAXISDATA = -517

◆ hst_enoaxisname

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

Definition at line 565 of file dc_error.f90.

565 integer, parameter, public:: HST_ENOAXISNAME = -508

◆ hst_enodependtime

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

Definition at line 562 of file dc_error.f90.

562 integer, parameter, public:: HST_ENODEPENDTIME = -505

◆ hst_enotimedim

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

Definition at line 564 of file dc_error.f90.

564 integer, parameter, public:: HST_ENOTIMEDIM = -507

◆ hst_enotindefine

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

-500 以下: データ入出力層のエラー

Definition at line 557 of file dc_error.f90.

557 integer, parameter, public:: HST_ENOTINDEFINE = -500

◆ hst_enottermgthist

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

Definition at line 561 of file dc_error.f90.

561 integer, parameter, public:: HST_ENOTTERMGTHIST = -504

◆ hst_evarinuse

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

Definition at line 566 of file dc_error.f90.

566 integer, parameter, public:: HST_EVARINUSE = -509

◆ usr_errno

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

-1000 以下: ユーザー定義

Definition at line 579 of file dc_error.f90.

579 integer, parameter, public:: USR_ERRNO = -1000

Data Types

Functions/Subroutines

Variables