dc_scaledsec::sign Interface Reference

Public Member Functions
type(dc_scaled_sec) function	dcscaledsec_sign_si (sclsec, factor)
type(dc_scaled_sec) function	dcscaledsec_sign_sr (sclsec, factor)
type(dc_scaled_sec) function	dcscaledsec_sign_sd (sclsec, factor)
type(dc_scaled_sec) function	dcscaledsec_sign_ss (sclsec1, sclsec2)

Detailed Description

Definition at line 243 of file dc_scaledsec.f90.

Member Function/Subroutine Documentation

dcscaledsec_sign_sd()

type(dc_scaled_sec) function dc_scaledsec::sign::dcscaledsec_sign_sd	(	type(dc_scaled_sec), intent(in)	sclsec,
		real(dp), intent(in)	factor )

Return absolute value of sclsec with sign of double

Parameters

[in]	sclsec	DC_SCALED_SEC variable (value source)
[in]	factor	Double precision real (sign source)

Returns

Absolute value of sclsec with sign of factor

Definition at line 2548 of file dc_scaledsec.f90.

    implicit none
    type(DC_SCALED_SEC), intent(in):: sclsec
    real(DP), intent(in):: factor
    type(DC_SCALED_SEC):: sclsec_work
  continue
    sclsec_work = factor
    result = sign( sclsec, sclsec_work )

dcscaledsec_sign_si()

type(dc_scaled_sec) function dc_scaledsec::sign::dcscaledsec_sign_si	(	type(dc_scaled_sec), intent(in)	sclsec,
		integer, intent(in)	factor )

Return absolute value of sclsec with sign of integer

Parameters

[in]	sclsec	DC_SCALED_SEC variable (value source)
[in]	factor	Integer (sign source)

Returns

Absolute value of sclsec with sign of factor

Definition at line 2498 of file dc_scaledsec.f90.

    implicit none
    type(DC_SCALED_SEC), intent(in):: sclsec
    integer, intent(in):: factor
    type(DC_SCALED_SEC):: sclsec_work
  continue
    sclsec_work = factor
    result = sign( sclsec, sclsec_work )

dcscaledsec_sign_sr()

type(dc_scaled_sec) function dc_scaledsec::sign::dcscaledsec_sign_sr	(	type(dc_scaled_sec), intent(in)	sclsec,
		real, intent(in)	factor )

Return absolute value of sclsec with sign of real

Parameters

[in]	sclsec	DC_SCALED_SEC variable (value source)
[in]	factor	Single precision real (sign source)

Returns

Absolute value of sclsec with sign of factor

Definition at line 2523 of file dc_scaledsec.f90.

    implicit none
    type(DC_SCALED_SEC), intent(in):: sclsec
    real, intent(in):: factor
    type(DC_SCALED_SEC):: sclsec_work
  continue
    sclsec_work = factor
    result = sign( sclsec, sclsec_work )

dcscaledsec_sign_ss()

type(dc_scaled_sec) function dc_scaledsec::sign::dcscaledsec_sign_ss	(	type(dc_scaled_sec), intent(in)	sclsec1,
		type(dc_scaled_sec), intent(in)	sclsec2 )

Return absolute value of sclsec1 with sign of sclsec2

Parameters

[in]	sclsec1	DC_SCALED_SEC variable (value source)
[in]	sclsec2	DC_SCALED_SEC variable (sign source)

Returns

Absolute value of sclsec1 with sign of sclsec2

Definition at line 2475 of file dc_scaledsec.f90.

    implicit none
    type(DC_SCALED_SEC), intent(in):: sclsec1, sclsec2
  continue
    result = sclsec1
    result % flag_negative = sclsec2 % flag_negative

---

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

• dc_utils/dc_scaledsec.f90