#
#
#
#
#
Define dm 0.472e12
Define dgog 0.0
Define magqop 1.0
Define twobeta -0.92
Define gamma 1.2
#
Alias MyB0 B0
#
Decay Upsilon(4S)
1.000  B0 MyB0     VSS;
Enddecay
#
Decay MyB0
1.000   pi+ D*- VERBOSE  SSD_CP dm dgog magqop twobeta 1.0 0.0 0.3 gamma;
Enddecay
#
Decay J/psi
1.00 mu+ mu- VLL;
Enddecay
#
End