i fail at documentation
parent
1443e66897
commit
c3ca5a8191
|
@ -12,8 +12,8 @@ ABOUT: "sequences.complex-components"
|
|||
HELP: complex-components
|
||||
{ $class-description "Sequence wrapper class that transforms a sequence of " { $link complex } " number values into a sequence of " { $link real } " values, interleaving the real and imaginary parts of the complex values in the original sequence." }
|
||||
{ $examples { $example <"
|
||||
USING: sequences arrays sequences.complex-components ;
|
||||
{ C{ 1.0 -1.0 } -2.0 C{ 3.0 1.0 } } <complex-components> >array
|
||||
USING: prettyprint sequences arrays sequences.complex-components ;
|
||||
{ C{ 1.0 -1.0 } -2.0 C{ 3.0 1.0 } } <complex-components> >array .
|
||||
"> "{ 1.0 -1.0 -2.0 0 3.0 1.0 }" } } ;
|
||||
|
||||
HELP: <complex-components>
|
||||
|
@ -21,12 +21,14 @@ HELP: <complex-components>
|
|||
{ $description "Wraps " { $snippet "sequence" } " in a " { $link complex-components } " wrapper." }
|
||||
{ $examples
|
||||
{ $example <"
|
||||
USING: sequences arrays sequences.complex-components ;
|
||||
{ C{ 1.0 -1.0 } -2.0 C{ 3.0 1.0 } } <complex-components> third
|
||||
USING: prettyprint sequences arrays
|
||||
sequences.complex-components ;
|
||||
{ C{ 1.0 -1.0 } -2.0 C{ 3.0 1.0 } } <complex-components> third .
|
||||
"> "-2.0" }
|
||||
{ $example <"
|
||||
USING: sequences arrays sequences.complex-components ;
|
||||
{ C{ 1.0 -1.0 } -2.0 C{ 3.0 1.0 } } <complex-components> fourth
|
||||
USING: prettyprint sequences arrays
|
||||
sequences.complex-components ;
|
||||
{ C{ 1.0 -1.0 } -2.0 C{ 3.0 1.0 } } <complex-components> fourth .
|
||||
"> "0" }
|
||||
} ;
|
||||
|
||||
|
|
|
@ -5,7 +5,7 @@ IN: sequences.complex-components
|
|||
TUPLE: complex-components seq ;
|
||||
INSTANCE: complex-components sequence
|
||||
|
||||
: <complex-components> ( sequence -- complex-sequence )
|
||||
: <complex-components> ( sequence -- complex-components )
|
||||
complex-components boa ; inline
|
||||
|
||||
<PRIVATE
|
||||
|
|
|
@ -12,18 +12,20 @@ ABOUT: "sequences.complex"
|
|||
HELP: complex-sequence
|
||||
{ $class-description "Sequence wrapper class that transforms a sequence of " { $link real } " number values into a sequence of " { $link complex } " values, treating the underlying sequence as pairs of alternating real and imaginary values." }
|
||||
{ $examples { $example <"
|
||||
USING: specialized-arrays.double sequences.complex
|
||||
USING: prettyprint
|
||||
specialized-arrays.double sequences.complex
|
||||
sequences arrays ;
|
||||
double-array{ 1.0 -1.0 -2.0 2.0 3.0 0.0 } <complex-sequence> >array
|
||||
double-array{ 1.0 -1.0 -2.0 2.0 3.0 0.0 } <complex-sequence> >array .
|
||||
"> "{ C{ 1.0 -1.0 } C{ -2.0 2.0 } C{ 3.0 0.0 } }" } } ;
|
||||
|
||||
HELP: <complex-sequence>
|
||||
{ $values { "sequence" sequence } { "complex-sequence" complex-sequence } }
|
||||
{ $description "Wraps " { $snippet "sequence" } " in a " { $link complex-sequence } "." }
|
||||
{ $examples { $example <"
|
||||
USING: specialized-arrays.double sequences.complex
|
||||
USING: prettyprint
|
||||
specialized-arrays.double sequences.complex
|
||||
sequences arrays ;
|
||||
double-array{ 1.0 -1.0 -2.0 2.0 3.0 0.0 } <complex-sequence> second
|
||||
double-array{ 1.0 -1.0 -2.0 2.0 3.0 0.0 } <complex-sequence> second .
|
||||
"> "C{ -2.0 2.0 }" } } ;
|
||||
|
||||
{ complex-sequence <complex-sequence> } related-words
|
||||
|
|
Loading…
Reference in New Issue