gtool5 Fortran 90/95 ライブラリ 1.0.0-rc5
English
Loading...
Searching...
No Matches
Functions/Subroutines
dcdatetimege.f90 File Reference

Go to the source code of this file.

Functions/Subroutines

logical function dcdatetime_ge_tt (time1, time2)
 利用者定義演算子 (>=) のための関数
 
logical function dcdatetime_ge_ff (diff1, diff2)
 
logical function dcdatetime_ge_fi (diff, factor)
 
logical function dcdatetime_ge_if (factor, diff)
 

Function/Subroutine Documentation

◆ dcdatetime_ge_ff()

logical function dcdatetime_ge_ff ( type(dc_difftime), intent(in)  diff1,
type(dc_difftime), intent(in)  diff2 
)

2つの DC_DIFFTIME 変数の比較 (>=)

2 つの引数の日時差を比較します. 1 つ目の引数に格納される日時差が 2 つ目の引数に格納される日時差 よりも大きい場合かもしくは等しい場合, .true. が返ります.

Parameters
[in]diff1比較する1番目の日時差
[in]diff2比較する2番目の日時差
Returns
diff1 >= diff2 の場合 .true., それ以外は .false.

Definition at line 80 of file dcdatetimege.f90.

81
82 use dc_date_generic, only: operator(<)
84 implicit none
85 type(DC_DIFFTIME), intent(in):: diff1, diff2
86continue
87 result = .not. diff1 < diff2
dc_date より提供される手続の引用仕様宣言
日付・時刻に関する構造データ型と定数

◆ dcdatetime_ge_fi()

logical function dcdatetime_ge_fi ( type(dc_difftime), intent(in)  diff,
integer, intent(in)  factor 
)

DC_DIFFTIME と整数の比較 (>=)

2 つの引数の日時差を比較します. 1 つ目の引数に格納される日時差が 2 つ目の引数に格納される日時差 よりも大きい場合かもしくは等しい場合, .true. が返ります.

Parameters
[in]diff比較する日時差
[in]factor比較する整数値
Returns
diff >= factor の場合 .true., それ以外は .false.

Definition at line 113 of file dcdatetimege.f90.

114
115 use dc_date_generic, only: operator(<)
117 implicit none
118 type(DC_DIFFTIME), intent(in):: diff
119 integer, intent(in):: factor
120continue
121 result = .not. diff < factor

◆ dcdatetime_ge_if()

logical function dcdatetime_ge_if ( integer, intent(in)  factor,
type(dc_difftime), intent(in)  diff 
)

整数と DC_DIFFTIME の比較 (>=)

2 つの引数の日時差を比較します. 1 つ目の引数に格納される日時差が 2 つ目の引数に格納される日時差 よりも大きい場合かもしくは等しい場合, .true. が返ります.

Parameters
[in]factor比較する整数値
[in]diff比較する日時差
Returns
factor >= diff の場合 .true., それ以外は .false.

Definition at line 147 of file dcdatetimege.f90.

148
149 use dc_date_generic, only: operator(<)
151 implicit none
152 integer, intent(in):: factor
153 type(DC_DIFFTIME), intent(in):: diff
154continue
155 result = .not. factor < diff

◆ dcdatetime_ge_tt()

logical function dcdatetime_ge_tt ( type(dc_datetime), intent(in)  time1,
type(dc_datetime), intent(in)  time2 
)

利用者定義演算子 (>=) のための関数

Author
Yasuhiro MORIKAWA

Definition at line 47 of file dcdatetimege.f90.

48
49 use dc_date_generic, only: operator(<)
51 implicit none
52 type(DC_DATETIME), intent(in):: time1, time2
53continue
54 result = .not. time1 < time2