double-4

Vocabulary

math.vectors.simd.cords

Definition

USING: math.vectors.simd ;

IN: math.vectors.simd.cords

TUPLE: double-4
    { head double-2 read-only initial: double-2{ 0.0 0.0 } }
    { tail double-2 read-only initial: double-2{ 0.0 0.0 } } ;
    final

Methods

USING: math.vectors.simd.cords prettyprint.custom ;

M: double-4 >pprint-sequence ;


USING: classes generic kernel math.vectors.simd.cords sequences
;

M: double-4 like
    over \ double-4 instance?
    [ drop ] [ M\ double-4 like (call-next-method) ] if ;


USING: gml.types math.vectors math.vectors.simd.cords ;

M: double-4 mask-vec3d
    longlong-4{ -1 -1 -1 0 } double-4-cast vbitand ; inline


USING: kernel math.vectors.simd math.vectors.simd.cords
sequences ;

M: double-4 new-sequence
    2drop 2 double-2 new new-sequence
    2 double-2 new new-sequence \ double-4 boa ;


USING: math.vectors.simd.cords prettyprint.custom ;

M: double-4 pprint* pprint-object ;


USING: kernel math.vectors.simd.cords prettyprint.custom ;

M: double-4 pprint-delims drop \ double-4{ \ } ;


USING: arrays gml.viewer math.vectors.simd.cords ;

M: double-4 selected-vectors 1array ;


USING: gml.printer io.styles kernel math.vectors.simd.cords ;

M: double-4 write-gml
    dup vertex-style [ 3 write-vector ] with-style ;