append-dimensions ( base-c-type type -- c-type )


Vocabulary
alien.fortran.private

Inputs
base-c-typean object
typean object


Outputs
c-typean object


Definition
USING: accessors arrays kernel sequences ;

IN: alien.fortran.private

: append-dimensions ( base-c-type type -- c-type )
dims>> [ product 2array ] when* ;