dc_scaledsec::int Interface Reference

Private Member Functions

type(dc_scaled_sec) function dcscaledsec_int_s (sclsec)
 

Detailed Description

Definition at line 176 of file dc_scaledsec.f90.

Member Function/Subroutine Documentation

◆ dcscaledsec_int_s()

type(dc_scaled_sec) function dc_scaledsec::int::dcscaledsec_int_s ( type(dc_scaled_sec), intent(in)  sclsec)
private

Definition at line 1907 of file dc_scaledsec.f90.

1907  !
1908  ! DC_SCALED_SEC 型変数の整数値 (小数点以下切捨て) を返す.
1909  !
1910  ! Return an integer value (fractional parts are truncated) of a "DC_SCALED_SEC" variable
1911  !
1912  implicit none
1913  type(dc_scaled_sec), intent(in):: sclsec
1914  integer:: i
1915  continue
1916  result = sclsec
1917  do i = -1, imin, -1
1918  result % sec_ary(i) = 0
1919  end do

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