Fitting an HyperFine Structure

LAS> method hfs hfs-n2hp.dat

 

1 set plot histo

2 set format brief

3 clear

4 clear alpha

5 file in prov.30m

6 find

7 get f

8 modify source TOTO

9 set unit v c

10 method hfs hfs-n2hp.lin

11 minimize

12 set viewport 0.2 0.9 0.4 0.8

13 set mode x 0 30

14 box n o i p

15 spec

16 title

17 pen /c 0 /w 2 /das 2

18 visualize /pen

19 pen /def

20 display 1.5

21 set viewport 0.2 0.9 0.2 0.4

22 box p o i n /unit v upper

23 residual

24 spectr

25 define real rms

26 compute rms RMS ry

27 greg1\draw test 1 -0.5 "\gs = "’nint(rms*100)/100.’" K" 6 0 /box 7