C =======================================================================
C    This is an example of generating Y(4S) --> B B= event
C    MODEL = 1
C
C        (Variables are defined as CHARCTER*6 strings.)
C+
C           Modified for BELLE setup by R.Itoh, 19-Apr-1995
C                   Asymmetric Collision 3.5GeV(e+) + 7.995GeV(e-)
C                   Model = 1 (e+e- -> VPHO -> BB)
C =======================================================================
LIST
C
NDO     10
NDUMP   5
IRAN    0
C
BMPSQQ   3.5
C BMNGQQ   7.996 - due to crossing angle (09/30/98)
BMNGQQ   7.9965
C BWPSQQ   0.002  - modified to new value using Ozaki-san's info. (11/7/95)
BWPSQQ   0.0025
C BWNGQQ   0.002  - modified to new value using Ozaki-san's info. (11/7/95)
BWNGQQ   0.0054
ENRGMN  10.5601
ENRGMX  10.650
C BSIZQQ	0.0 0.0 0.0  - set sig_x,y,z = (110um, 3um, 6mm)  5/24/96
C BSIZQQ  110.e-6  3.e-6  0.014 - modified z smearing (09/30/98)
C BSIZQQ  110.e-6  3.e-6  0.006 - sig_y 15um using Ozaki-san's info. (03/15/98)
BSIZQQ  110.e-6  15.e-6  0.006
CANGNG 22.e-3
CANGPS  0.0
C
MODEL   1
IFR     1
IFL     0
IMODE   1
BMRAD   F
FLIP    0.0
C
PAR     6=4.0
PAR     7=0.121
PAR     8=0.0
PAR     9=0.3
PAR    11=1.0 
PAR    12=0.7
PAR    18=0.0
C
PUD    0.480 
CMLT1  1.8  2.5  2.0  1.8  3.2 
CMLT2  0.9  0.8  0.5  0.8  0.8
C
C For gsim, we use the default. Fsim users should make their own .ctr file
C LONGLF TRUE
C
LPDG true
END