font_identifier := "beamn20";
input musicd20
numeric beammult;
beammult:=1;
input beamngen