!--------------------------------------------------------------- ! ! Diagram with two panes ! !--------------------------------------------------------------- ! size 29.5 21 set lwidth 0.035 boxhor=15. boxver=22. vshift=0. hshift=1.5 sizem=0.5 labh=0.6 sub zkcircle circle 0.33*sizem fill grey20 ! circle 0.33*sizem fill red end sub define marker zcircle zkcircle ms=0.03 llll=0.05 ircol$="dodgerblue" !ircol$="royalblue" !ircol$="steelblue" sub zcross1 p1 p2 mss=1*ms ! set color red set lwidth llll rmove -mss -mss rline 2*mss +2*mss rmove -2*mss 0 rline 2*mss -2*mss end sub define marker zcr1 zcross1 sub zcross2 p1 p2 mss=2*ms ! set color red set lwidth llll rmove -mss -mss rline 2*mss +2*mss rmove -2*mss 0 rline 2*mss -2*mss end sub define marker zcr2 zcross2 sub zcross3 p1 p2 mss=3*ms ! set color red set lwidth llll rmove -mss -mss rline 2*mss +2*mss rmove -2*mss 0 rline 2*mss -2*mss end sub define marker zcr3 zcross3 sub zcross4 p1 p2 mss=4*ms ! set color red set lwidth llll rmove -mss -mss rline 2*mss +2*mss rmove -2*mss 0 rline 2*mss -2*mss end sub define marker zcr4 zcross4 sub zcross5 p1 p2 mss=5*ms ! set color red set lwidth llll rmove -mss -mss rline 2*mss +2*mss rmove -2*mss 0 rline 2*mss -2*mss end sub define marker zcr5 zcross5 sub zcross6 p1 p2 mss=6*ms ! set color red set lwidth llll rmove -mss -mss rline 2*mss +2*mss rmove -2*mss 0 rline 2*mss -2*mss end sub define marker zcr6 zcross6 sub zcross7 p1 p2 mss=7*ms ! set color red set lwidth llll rmove -mss -mss rline 2*mss +2*mss rmove -2*mss 0 rline 2*mss -2*mss end sub define marker zcr7 zcross7 col$="red" ! col$="black" mmmm=0.8 mmm=1.6 llll=0.05 set alabelscale 1. !------------------------------------------------------------------------------- ! Edit the quantum number range below as necessary !------------------------------------------------------------------------------- maxj=130 mink=-0.5 maxk=36.5 !------------------------------------------------------------------------------- ! Edit the major and minor ticks as necessary !------------------------------------------------------------------------------- xbtick=5 xstick=1 ybtick=20 ystick=5 !=============================================================================== ! ! LEFT ! !=============================================================================== ! amove hshift vshift begin graph nobox size boxhor boxver xaxis min mink max maxk dticks xbtick dsubticks xstick lwidth 0.04 xtitle "{\it K_a}\ ^{\prime\prime}" font texcmr hei 0.9 dist 0.5 xlabels hei labh font texcmr xticks length 0.3 xsubticks length 0.15 ! x2ticks off ! yaxis min 0.0 max maxj dticks ybtick dsubticks ystick lwidth 0.04 ytitle "{\it J}\ ^{\prime\prime}" font texcmr hei 0.9 dist 0.5 ylabels hei labh font texcmr yticks length 0.3 ysubticks length 0.15 ! yplaces -10 0 10 20 30 ! ynames "{\tt-}10" "0" "10" "20" "30" ! ! ! v=0 ! ! data ac_1_00.out d10=c6,c5 data ac_2_00.out d9=c6,c5 data ac_3_00.out d8=c6,c5 data ac_4_00.out d7=c6,c5 data ac_5_00.out d6=c6,c5 data ac_6_00.out d5=c6,c5 data ac_7_00.out d4=c6,c5 d10 marker wcircle msize 0.1*mmmm color black lwidth llll d9 marker wcircle msize 0.2*mmmm color black lwidth llll d8 marker wcircle msize 0.3*mmmm color black lwidth llll d7 marker wcircle msize 0.4*mmmm color col$ lwidth llll d6 marker wcircle msize 0.5*mmmm color col$ lwidth llll d5 marker wcircle msize 0.6*mmmm color col$ lwidth llll d4 marker wcircle msize 0.7*mmmm color col$ lwidth llll data acir_1_00.out d20=c6,c5 data acir_2_00.out d19=c6,c5 data acir_3_00.out d18=c6,c5 data acir_4_00.out d17=c6,c5 data acir_5_00.out d16=c6,c5 data acir_6_00.out d15=c6,c5 data acir_7_00.out d14=c6,c5 let d30 = x+0.5, d20 let d29 = x+0.5, d19 let d28 = x+0.5, d18 let d27 = x+0.5, d17 let d26 = x+0.5, d16 let d25 = x+0.5, d15 let d24 = x+0.5, d14 d30 marker zcr1 msize 0.1*mmmm color ircol$ lwidth llll d29 marker zcr2 msize 0.2*mmmm color ircol$ lwidth llll d28 marker zcr3 msize 0.3*mmmm color ircol$ lwidth llll d27 marker zcr4 msize 0.4*mmmm color col$ lwidth llll d26 marker zcr5 msize 0.5*mmmm color col$ lwidth llll d25 marker zcr6 msize 0.6*mmmm color col$ lwidth llll d24 marker zcr7 msize 0.7*mmmm color col$ lwidth llll ! d30 marker wcircle msize 0.1*mmmm color ircol$ lwidth llll ! d29 marker wcircle msize 0.2*mmmm color ircol$ lwidth llll ! d28 marker wcircle msize 0.3*mmmm color ircol$ lwidth llll ! d27 marker wcircle msize 0.4*mmmm color col$ lwidth llll ! d26 marker wcircle msize 0.5*mmmm color col$ lwidth llll ! d25 marker wcircle msize 0.6*mmmm color col$ lwidth llll ! d24 marker wcircle msize 0.7*mmmm color col$ lwidth llll let d11 = x from 0 to 51 step 1 d11 lstyle 1 color grey10 lwidth 0.07 ! end graph !=============================================================================== ! ! RIGHT ! !=============================================================================== ! amove hshift+boxhor*0.7+0.4 vshift begin graph nobox size boxhor boxver xaxis min mink max maxk dticks xbtick dsubticks xstick lwidth 0.04 xtitle "{\it K_a}\ ^{\prime\prime}" font texcmr hei 0.9 dist 0.5 xlabels hei labh font texcmr xticks length 0.3 xsubticks length 0.15 ! x2ticks off ! yaxis min 0.0 max maxj dticks ybtick dsubticks ystick lwidth 0.04 ! ytitle "\Delta\nu\,/MHz" font texcmr hei 0.7 dist 0.5 ylabels hei labh dist -boxhor*0.75-0.2 font texcmr yticks length 0.3 ysubticks length 0.15 ! ! v=1 ! ! data ac_1_11.out d10=c6,c5 data ac_2_11.out d9=c6,c5 data ac_3_11.out d8=c6,c5 data ac_4_11.out d7=c6,c5 data ac_5_11.out d6=c6,c5 data ac_6_11.out d5=c6,c5 data ac_7_11.out d4=c6,c5 d10 marker wcircle msize 0.1*mmmm color black lwidth llll d9 marker wcircle msize 0.2*mmmm color black lwidth llll d8 marker wcircle msize 0.3*mmmm color black lwidth llll d7 marker wcircle msize 0.4*mmmm color col$ lwidth llll d6 marker wcircle msize 0.5*mmmm color col$ lwidth llll d5 marker wcircle msize 0.6*mmmm color col$ lwidth llll d4 marker wcircle msize 0.7*mmmm color col$ lwidth llll data acir_1_11.out d20=c6,c5 data acir_2_11.out d19=c6,c5 data acir_3_11.out d18=c6,c5 data acir_4_11.out d17=c6,c5 data acir_5_11.out d16=c6,c5 data acir_6_11.out d15=c6,c5 data acir_7_11.out d14=c6,c5 let d30 = x+0.5, d20 let d29 = x+0.5, d19 let d28 = x+0.5, d18 let d27 = x+0.5, d17 let d26 = x+0.5, d16 let d25 = x+0.5, d15 let d24 = x+0.5, d14 d30 marker zcr1 msize 0.1*mmmm color ircol$ lwidth llll d29 marker zcr2 msize 0.2*mmmm color ircol$ lwidth llll d28 marker zcr3 msize 0.3*mmmm color ircol$ lwidth llll d27 marker zcr4 msize 0.4*mmmm color col$ lwidth llll d26 marker zcr5 msize 0.5*mmmm color col$ lwidth llll d25 marker zcr6 msize 0.6*mmmm color col$ lwidth llll d24 marker zcr7 msize 0.7*mmmm color col$ lwidth llll ! d30 marker wcircle msize 0.1*mmmm color ircol$ lwidth llll ! d29 marker wcircle msize 0.2*mmmm color ircol$ lwidth llll ! d28 marker wcircle msize 0.3*mmmm color ircol$ lwidth llll ! d27 marker wcircle msize 0.4*mmmm color col$ lwidth llll ! d26 marker wcircle msize 0.5*mmmm color col$ lwidth llll ! d25 marker wcircle msize 0.6*mmmm color col$ lwidth llll ! d24 marker wcircle msize 0.7*mmmm color col$ lwidth llll let d11 = x from 0 to 51 step 1 d11 lstyle 1 color grey10 lwidth 0.07 ! ! d15 marker zcircle ! end graph !=============================================================================== ! pane annotations !=============================================================================== ! ! top left v=1 ! amove 11.0 7.5 set hei 0.7 just bl amove 11.0561 3.97228 text 0 \leftarrow\ 0 ! ! top right v=2 ! amove 22.1 7.5 set hei 0.7 amove 22.0345 3.91583 text 1 \leftarrow\ 1 ! set hei 0.6 set font texcmr amove 3.85939 19.4663 text Acrylonitrile: pure rotation ground state and {\setfont{texcmmi} v}_{11}=1 \rightarrow\: microwave \it (obs-calc)/ferror rmove 0 -1 set color blue amove 18.4262 18.8598 text infrared \it (obs-calc)/ferror !===============================================================================