gtool5 Fortran 90/95 Library 1.0.0-rc5
日本語
Loading...
Searching...
No Matches
dc_scaledsec::operator(>=) Interface Reference

Public Member Functions

logical function dcscaledsec_ge_ss (sclsec1, sclsec2)
logical function dcscaledsec_ge_si (sclsec, factor)
logical function dcscaledsec_ge_is (factor, sclsec)

Detailed Description

Definition at line 171 of file dc_scaledsec.f90.

Member Function/Subroutine Documentation

◆ dcscaledsec_ge_is()

logical function dc_scaledsec::operator(>=)::dcscaledsec_ge_is ( integer, intent(in) factor,
type(dc_scaled_sec), intent(in) sclsec )

Compare integer with DC_SCALED_SEC (greater or equal)

Parameters
[in]factorInteger value to compare
[in]sclsecDC_SCALED_SEC variable
Returns
.true. if factor >= sclsec, .false. otherwise

Definition at line 1027 of file dc_scaledsec.f90.

1028 implicit none
1029 integer, intent(in):: factor
1030 type(DC_SCALED_SEC), intent(in):: sclsec
1031 continue
1032 result = .not. factor < sclsec

◆ dcscaledsec_ge_si()

logical function dc_scaledsec::operator(>=)::dcscaledsec_ge_si ( type(dc_scaled_sec), intent(in) sclsec,
integer, intent(in) factor )

Compare DC_SCALED_SEC with integer (greater or equal)

Parameters
[in]sclsecDC_SCALED_SEC variable
[in]factorInteger value to compare
Returns
.true. if sclsec >= factor, .false. otherwise

Definition at line 1004 of file dc_scaledsec.f90.

1005 implicit none
1006 type(DC_SCALED_SEC), intent(in):: sclsec
1007 integer, intent(in):: factor
1008 continue
1009 result = .not. sclsec < factor

◆ dcscaledsec_ge_ss()

logical function dc_scaledsec::operator(>=)::dcscaledsec_ge_ss ( type(dc_scaled_sec), intent(in) sclsec1,
type(dc_scaled_sec), intent(in) sclsec2 )

Compare two DC_SCALED_SEC variables (greater or equal)

Parameters
[in]sclsec1First DC_SCALED_SEC variable
[in]sclsec2Second DC_SCALED_SEC variable
Returns
.true. if sclsec1 >= sclsec2, .false. otherwise

Definition at line 982 of file dc_scaledsec.f90.

983 implicit none
984 type(DC_SCALED_SEC), intent(in):: sclsec1, sclsec2
985 continue
986 result = .not. sclsec1 < sclsec2

The documentation for this interface was generated from the following file: