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

Go to the source code of this file.

Functions/Subroutines

logical function dcdatetime_le_tt (time1, time2)
 利用者定義演算子 (<=) のための関数
logical function dcdatetime_le_ff (diff1, diff2)
logical function dcdatetime_le_fi (diff, factor)
logical function dcdatetime_le_if (factor, diff)

Function/Subroutine Documentation

◆ dcdatetime_le_ff()

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

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

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

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

Definition at line 80 of file dcdatetimele.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_le_fi()

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

DC_DIFFTIME と整数の比較 (<=)

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

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

Definition at line 113 of file dcdatetimele.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_le_if()

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

整数と DC_DIFFTIME の比較 (<=)

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

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

Definition at line 147 of file dcdatetimele.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_le_tt()

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

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

Author
Yasuhiro MORIKAWA

このファイルには dc_date_types#DC_DATETIME および dc_date_types#DC_DIFFTIME の小なりイコール比較の実装手続きが含まれています。

2つの DC_DATETIME 変数の比較 (<=)

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

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

Definition at line 47 of file dcdatetimele.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