Complex¶
A complex type.
Declaration¶
Syntax¶
Complex(int kind)
Arguments¶
Argument |
Description |
|---|---|
|
the kind, which fixes the storage size and the range or precision; see kinds. |
Return values¶
None. A type is not evaluated.
Description¶
A complex value is a pair of reals of the same kind, so the kind here is the
kind of each part: complex(8) holds two real(8) values.
Examples¶
(Complex
:kind 4
)
It comes from this complete ASR text document:
(TranslationUnit
:symtab (SymbolTable
:id 0
:symbols {
"main" (Program
:symtab (SymbolTable
:id 1
:symbols {
"b" (Variable
:parent_symtab 1
:name "b"
:dependencies []
:intent :Local
:symbolic_value nil
:value nil
:storage :Default
:type (Logical
:kind 4
)
:type_declaration nil
:abi :Source
:access :Public
:presence :Required
:value_attr false
:target_attr false
:contiguous_attr false
:bindc_name nil
:is_volatile false
:is_protected false
:pass_attr :NotMethod
:self_argument nil
:codims []
)
"w" (Variable
:parent_symtab 1
:name "w"
:dependencies []
:intent :Local
:symbolic_value nil
:value nil
:storage :Default
:type (Complex
:kind 4
)
:type_declaration nil
:abi :Source
:access :Public
:presence :Required
:value_attr false
:target_attr false
:contiguous_attr false
:bindc_name nil
:is_volatile false
:is_protected false
:pass_attr :NotMethod
:self_argument nil
:codims []
)
"x" (Variable
:parent_symtab 1
:name "x"
:dependencies []
:intent :Local
:symbolic_value nil
:value nil
:storage :Default
:type (Real
:kind 4
)
:type_declaration nil
:abi :Source
:access :Public
:presence :Required
:value_attr false
:target_attr false
:contiguous_attr false
:bindc_name nil
:is_volatile false
:is_protected false
:pass_attr :NotMethod
:self_argument nil
:codims []
)
"z" (Variable
:parent_symtab 1
:name "z"
:dependencies []
:intent :Local
:symbolic_value nil
:value nil
:storage :Default
:type (Complex
:kind 4
)
:type_declaration nil
:abi :Source
:access :Public
:presence :Required
:value_attr false
:target_attr false
:contiguous_attr false
:bindc_name nil
:is_volatile false
:is_protected false
:pass_attr :NotMethod
:self_argument nil
:codims []
)
}
)
:name "main"
:dependencies []
:body [
(Assignment
:target (Var
:v (SymbolRef 1 "z")
)
:value (ComplexConstant
:re 1.0
:im 2.0
:type (Complex
:kind 4
)
)
:overloaded nil
:realloc_lhs false
:move_allocation false
)
(Assignment
:target (Var
:v (SymbolRef 1 "z")
)
:value (ComplexConstructor
:re (RealConstant
:r 1.0
:type (Real
:kind 4
)
)
:im (Var
:v (SymbolRef 1 "x")
)
:type (Complex
:kind 4
)
:value nil
)
:overloaded nil
:realloc_lhs false
:move_allocation false
)
(Assignment
:target (Var
:v (SymbolRef 1 "w")
)
:value (ComplexBinOp
:left (Var
:v (SymbolRef 1 "z")
)
:op :Mul
:right (ComplexConstant
:re 0.0
:im 1.0
:type (Complex
:kind 4
)
)
:type (Complex
:kind 4
)
:value nil
)
:overloaded nil
:realloc_lhs false
:move_allocation false
)
(Assignment
:target (Var
:v (SymbolRef 1 "w")
)
:value (ComplexUnaryMinus
:arg (Var
:v (SymbolRef 1 "z")
)
:type (Complex
:kind 4
)
:value nil
)
:overloaded nil
:realloc_lhs false
:move_allocation false
)
(Assignment
:target (Var
:v (SymbolRef 1 "x")
)
:value (ComplexRe
:arg (Var
:v (SymbolRef 1 "z")
)
:type (Real
:kind 4
)
:value nil
)
:overloaded nil
:realloc_lhs false
:move_allocation false
)
(Assignment
:target (Var
:v (SymbolRef 1 "x")
)
:value (ComplexIm
:arg (Var
:v (SymbolRef 1 "z")
)
:type (Real
:kind 4
)
:value nil
)
:overloaded nil
:realloc_lhs false
:move_allocation false
)
(Assignment
:target (Var
:v (SymbolRef 1 "b")
)
:value (ComplexCompare
:left (Var
:v (SymbolRef 1 "z")
)
:op :Eq
:right (Var
:v (SymbolRef 1 "w")
)
:type (Logical
:kind 4
)
:value nil
)
:overloaded nil
:realloc_lhs false
:move_allocation false
)
]
)
}
)
:items []
)
See Also¶
Real, ComplexConstant, ComplexRe, kinds