bigraded-basis. ( seq -- )

Vocabulary

koszul

Inputs

seq

an object

Outputs

None

Definition

USING: io kernel prettyprint sequences ;

IN: koszul

: bigraded-basis. ( seq -- )
    [
        "=== U-degree " write . [
            "  === Z-degree " write pprint ": dimension " write
            dup length . [ "  " write alt. ] each
        ] each-index
    ] each-index ;