fitdebug.pic 1.33 KB
Newer Older
1
set rootdir ./CasA/
2 3 4 5 6 7
set source $1

setaxesatt "font=times,bold,20 fixedfontsize"
graphicatt "font=times,bold,20 fixedfontsize grid"

set vecAUTO ( 1H 2H 3H 4H )
8
newwin 2 2 900 900
9 10

foreach x ( $vecAUTO )
11
openppf ${rootdir}fitAllAuto-${source}-${x}.ppf
12 13 14 15

mv dataFit dataFit${x}
mv dataFit_func dataFit_func${x}
nt2d dataFit${x} x0 y ex0 ey 1 ! "marker=fcircle,5 nsta ntit"
16
nt2d dataFit_func${x} x0 y ex0 ey 1 ! "same cpts red thickdashedline nsta ntit"
17 18 19 20
settitle "${source} : ${x}"
setaxelabels "h.a (rad)" "Auto (a.u)" "font=times,bold,20 fixedfontsize"

end
21
w2eps ${source}-autofit.eps
22

Jean-Eric Campagne's avatar
Jean-Eric Campagne committed
23 24 25 26 27 28 29 30 31 32

newwin 2 2 900 900
foreach x ( $vecAUTO )
n/pl dataFit${x}.y%180*x0/M_PI 1 ! "marker=fcircle,5 nsta ntit"
n/pl dataFit_func${x}.y%180*x0/M_PI 1 ! "same cpts red thickdashedline nsta ntit"
settitle "${source} : ${x}"
setaxelabels "h.a (deg)" "Auto (a.u)" "font=times,bold,20 fixedfontsize"
end


33 34
set vecCROSS ( 1H2H 1H3H 1H4H 2H3H 2H4H 3H4H ) 

35
newwin 3 2 1200 900
36 37
foreach x ( $vecCROSS )

38
openppf ${rootdir}fitAllCross-${source}-${x}-RE.ppf
39 40 41
mv dataFit dataFit${x}
mv dataFit_func dataFit_func${x}
nt2d dataFit${x} x0 y ex0 ey 1 ! "marker=fcircle,5 nsta ntit"
42
nt2d dataFit_func${x} x0 y ex0 ey 1 ! "same cpts red thickdashedline nsta ntit"
43 44 45 46
settitle "${source} : ${x}"
setaxelabels "h.a (rad)" "Cross (a.u)" "font=times,bold,20 fixedfontsize"

end
47 48
w2eps ${source}-crossfit.eps