sequence function: op-zip

    description:
        op-zip(seq, seq)
        zip together a sequence of operators and a sequence of objects
        stops at the end of the shorter of the two sequences
            
    examples:
        -- define our for-example operators:
        op1 |*> #=> |op1: > _ |_self>
        op2 |*> #=> |op2: > _ |_self>
        op3 |*> #=> |op3: > _ |_self>
        op4 |*> #=> |op4: > _ |_self>
        
        -- define our sequence of operators:
        op |seq> => |op: op1> . |op: op2> . |op: op3> . |op: op4>
        
        -- define our for-example sequence:
        the |seq> => |a> . |b> . |c> . |d> . |e> . |f>

        -- see the result:
        op-zip(op |seq>, the |seq>)
            |op1: a> . |op2: b> . |op3: c> . |op4: d>
      
    see also:
        n2w in the big-numbers-to-words example
        
    future:
        a version that works for superpositions