nt/crea 1 Test 6 ' ' 1000 tag tcp ttag cpsi ckstar chi
nt/read 1 jpsikstar.dat
hi/create/1d 101 'B0 at t=0  tcp-ttag' 50 -5.0 5.0
hi/create/1d 102 'B0B at t=0 tcp-ttag' 50 -5.0 5.0
hi/create/1d 111 'B0 at t=0  cpsi' 50 -1.0 1.0
hi/create/1d 112 'B0B at t=0  cpsi' 50 -1.0 1.0
hi/create/1d 113 'B0 at t=0  dt"l#0 cpsi' 50 -1.0 1.0
hi/create/1d 114 'B0B at t=0 dt"l#0 cpsi' 50 -1.0 1.0
hi/create/1d 115 'B0 at t=0  dt"g#0 cpsi' 50 -1.0 1.0
hi/create/1d 116 'B0B at t=0 dt"g#0 cpsi' 50 -1.0 1.0
hi/create/1d 121 'B0 at t=0  ckstar' 50 -1.0 1.0
hi/create/1d 122 'B0B at t=0  ckstar' 50 -1.0 1.0
hi/create/1d 123 'B0 at t=0  dt"l#0 ckstar' 50 -1.0 1.0
hi/create/1d 124 'B0B at t=0 dt"l#0 ckstar' 50 -1.0 1.0
hi/create/1d 125 'B0 at t=0  dt"g#0 ckstar' 50 -1.0 1.0
hi/create/1d 126 'B0B at t=0 dt"g#0 ckstar' 50 -1.0 1.0
hi/create/1d 131 'B0 at t=0  chi' 50 0.0 6.2832
hi/create/1d 132 'B0B at t=0  chi' 50 0.0 6.2832
hi/create/1d 133 'B0 at t=0  dt"l#0 chi' 50 0.0 6.2832
hi/create/1d 134 'B0B at t=0 dt"l#0 chi' 50 0.0 6.2832
hi/create/1d 135 'B0 at t=0  dt"g#0 chi' 50 0.0 6.2832
hi/create/1d 136 'B0B at t=0 dt"g#0 chi' 50 0.0 6.2832
hi/create/2d 141 'B0 at t=0 dt"l#0 chi vs cpsi' 10 0.0 6.2832 10 -1.0 1.0 
hi/create/2d 142 'B0B at t=0 dt"l#0 chi vs cpsi' 10 0.0 6.2832 10 -1.0 1.0 
hi/create/2d 143 'B0 at t=0 dt"g#0 chi vs cpsi' 10 0.0 6.2832 10 -1.0 1.0 
hi/create/2d 144 'B0B at t=0 dt"g#0 chi vs cpsi' 10 0.0 6.2832 10 -1.0 1.0 
hi/create/2d 151 'B0 at t=0 dt"l#0 chi vs ckstar' 10 0.0 6.2832 10 -1.0 1.0 
hi/create/2d 152 'B0B at t=0 dt"l#0 chi vs ckstar' 10 0.0 6.2832 10 -1.0 1.0 
hi/create/2d 153 'B0 at t=0 dt"g#0 chi vs ckstar' 10 0.0 6.2832 10 -1.0 1.0 
hi/create/2d 154 'B0B at t=0 dt"g#0 chi vs ckstar' 10 0.0 6.2832 10 -1.0 1.0 
opt nsta
zon 2 2
nt/proj 101 1.tcp-ttag abs(tag-36.0)<0.5
nt/proj 102 1.tcp-ttag abs(tag-35.0)<0.5
nt/proj 111 1.cpsi abs(tag-36.0)<0.5
nt/proj 112 1.cpsi abs(tag-35.0)<0.5
nt/proj 113 1.cpsi abs(tag-36.0)<0.5.and.(tcp-ttag)<0
nt/proj 114 1.cpsi abs(tag-35.0)<0.5.and.(tcp-ttag)<0
nt/proj 115 1.cpsi abs(tag-36.0)<0.5.and.(tcp-ttag)>0
nt/proj 116 1.cpsi abs(tag-35.0)<0.5.and.(tcp-ttag)>0
nt/proj 121 1.ckstar abs(tag-36.0)<0.5
nt/proj 122 1.ckstar abs(tag-35.0)<0.5
nt/proj 123 1.ckstar abs(tag-36.0)<0.5.and.(tcp-ttag)<0
nt/proj 124 1.ckstar abs(tag-35.0)<0.5.and.(tcp-ttag)<0
nt/proj 125 1.ckstar abs(tag-36.0)<0.5.and.(tcp-ttag)>0
nt/proj 126 1.ckstar abs(tag-35.0)<0.5.and.(tcp-ttag)>0
nt/proj 131 1.chi abs(tag-36.0)<0.5
nt/proj 132 1.chi abs(tag-35.0)<0.5
nt/proj 133 1.chi abs(tag-36.0)<0.5.and.(tcp-ttag)<0
nt/proj 134 1.chi abs(tag-35.0)<0.5.and.(tcp-ttag)<0
nt/proj 135 1.chi abs(tag-36.0)<0.5.and.(tcp-ttag)>0
nt/proj 136 1.chi abs(tag-35.0)<0.5.and.(tcp-ttag)>0
nt/proj 141 1.cpsi%chi abs(tag-36.0)<0.5.and.(tcp-ttag)<0
nt/proj 142 1.cpsi%chi abs(tag-35.0)<0.5.and.(tcp-ttag)<0
nt/proj 143 1.cpsi%chi abs(tag-36.0)<0.5.and.(tcp-ttag)>0
nt/proj 144 1.cpsi%chi abs(tag-35.0)<0.5.and.(tcp-ttag)>0
nt/proj 151 1.ckstar%chi abs(tag-36.0)<0.5.and.(tcp-ttag)<0
nt/proj 152 1.ckstar%chi abs(tag-35.0)<0.5.and.(tcp-ttag)<0
nt/proj 153 1.ckstar%chi abs(tag-36.0)<0.5.and.(tcp-ttag)>0
nt/proj 154 1.ckstar%chi abs(tag-35.0)<0.5.and.(tcp-ttag)>0
Fortran/file 66 jpsikstar.ps
Metafile -66 -111
hi/pl 101
hi/pl 102
hi/pl 111
hi/pl 112
hi/pl 121
hi/pl 122
hi/pl 131
hi/pl 132
hi/pl 113
hi/pl 114
hi/pl 115
hi/pl 116
hi/pl 123
hi/pl 124
hi/pl 125
hi/pl 126
hi/pl 133
hi/pl 134
hi/pl 135
hi/pl 136
hi/pl 141 box
hi/pl 142 box
hi/pl 143 box
hi/pl 144 box
hi/pl 151 box
hi/pl 152 box
hi/pl 153 box
hi/pl 154 box
close 66