check-base-face ( face -- )

Vocabulary

euler.b-rep

Inputs

face

an object

Outputs

None

Definition

USING: accessors kernel sequences ;

IN: euler.b-rep

: check-base-face ( face -- )
    [ check-face ]
    [ dup [ next-ring>> ] follow rest [ check-ring ] with each ]
    bi ;