with text_io; use text_io; procedure Driver_for_Quantum_Pieri ( file : in file_type; n,d,q : in natural ); -- DESCRIPTION : -- Counts all curves of degree q that produce d-planes in n-space.