Production of<mml:math xmlns:mml="http://www.w3.org/1998/Math/MathML" display="inline"><mml:mi>ψ</mml:mi><mml:mn/><mml:mo>(</mml:mo><mml:mn>3100</mml:mn><mml:mo>)</mml:mo><mml:mn/></mml:math>and<mml:math xmlns:mml="http://www.w3.org/1998/Math/MathML" display="inline"><mml:mrow><mml:msup><mml:mrow><mml:mi>ψ</mml:mi></mml:mrow><mml:mrow><mml:mo>′</mml:mo></mml:mrow></mml:msup></mml:mrow><mml:mn/><mml:mo>(</mml:mo><mml:mn>3700</mml:mn><mml:mo>)</mml:mo><mml:mn/></mml:math>in<mml:math xmlns:mml="http://www.w3.org/1998/Math/MathML" display="inline"><mml:mi>p</mml:mi></mml:math>-Be Collisions at 400 GeV