dc_scaledsec::abs Interface Reference

Public Member Functions
type(dc_scaled_sec) function	dcscaledsec_abs_s (sclsec)

Detailed Description

Definition at line 172 of file dc_scaledsec.f90.

Member Function/Subroutine Documentation

dcscaledsec_abs_s()

type(dc_scaled_sec) function dc_scaledsec::abs::dcscaledsec_abs_s

(

type(dc_scaled_sec), intent(in)

sclsec

)

Definition at line 1890 of file dc_scaledsec.f90.

    !
    ! DC_SCALED_SEC 型変数の絶対値を返す. 
    ! 
    ! Return an absolute value of a "DC_SCALED_SEC" variable
    !
    implicit none
    type(DC_SCALED_SEC), intent(in):: sclsec
 
  continue
    result = sclsec
    if ( result % flag_negative ) result % flag_negative = .false.

---

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

• dc_utils/dc_scaledsec.f90