complex-component ( remainder complex -- component ) - Factor Documentation

complex-component ( remainder complex -- component )

Vocabulary
sequences .complex-components .private

Inputs

remainder an object

complex an object

Outputs

component an object

Definition

USING: combinators kernel math ;

IN: sequences.complex-components.private

: complex-component ( remainder complex -- component )
swap { { 0 [ real-part ] } { 1 [ imaginary-part ] } } case ;