!
! B -> D* l nu decay
!
exec lecture_fig_setup b_dstar_lnu 9.5 6 1 1 0.2 0.2
set font -1001
set font title -1004
set title off
!
exec lecture_fig_copy 'B -> D^*! l [n] Decay' 0
!
set tick all off
!
exec lecture_fig_plot 0
draw arrow 1 red = pl -4
1 3
5 3
draw arrow 1 blue = pl -4
5 3
9 2
draw line 2 green = pl
5 3
7.0 4.5
draw arrow 1 red = pl -4
7.0 4.5
9.0 5.5
draw arrow 1 magenta = pl -4
9.0 3.7
7.0 4.5
draw arrow 1 black = pl -4
5 1.5
1 1.5
draw arrow 1 black = pl -4
9 0.5
5 1.5
comment 1
  new 'b' 2 2.4 0.4 = c pl = red
  new 'c' 8 1.8 0.4 = c pl = blue
  new 'W^[-]!' 6.3 4.00 0.4 = c pl = green
  new 'e^[-]!' 9 4.9 0.4 = c pl = red
  new '[n]&^_!?e!' 9 3.2 0.4 = c pl = magenta
  new 'B' 0.2 1.9 0.6 = l pl = blue
  new 'D^*!' 8.2 1.0 0.6 = l pl = blue
end
!
@9 hard epost
@9 close