dc_units::operator(+) Interface Reference

Public Member Functions
type(units) function	dcunitsadd (u1, u2)

Detailed Description

Definition at line 107 of file dc_units.f90.

Member Function/Subroutine Documentation

dcunitsadd()

type(units) function dc_units::operator(+)::dcunitsadd	(	type(units), intent(in)	u1,
		type(units), intent(in)	u2 )

2つの UNITS を加算 (次元互換性チェック付き)

加算は両単位が同じ次元を持つ場合のみ有効です. 次元が一致しない場合、resultoffset に "MISMATCH" が設定されます.

Parameters

[in]	u1	1番目の UNITS 変数
[in]	u2	2番目の UNITS 変数

Returns

2つの UNITS の和 (非互換の場合はエラー)

Definition at line 265 of file dc_units.f90.

    type(UNITS), intent(in):: u1, u2
    type(UNITS):: x
    result%offset = u1%offset
    result%nelems = u1%nelems
    result%factor = u1%factor + u2%factor
    x = u1 / u2
    if (x%nelems == 0) then
      nullify(result%name, result%power)   
      return
    endif
    if (all(abs(x%power(1:result%nelems)) < tiny(0.0_dp))) then
      allocate(result%name(result%nelems), result%power(result%nelems))
      result%name = u1%name
      result%power = u1%power
      return
    endif
    result%factor = 0.0
    result%nelems = -1
    result%offset = "MISMATCH"
    nullify(result%name, result%power)   

---

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

• dc_utils/dc_units.f90