Function Description ******************** Name: GAUSS Function: jFit gaussian Parameters: Vo(1) T1(1) Vo(2) T1(2) Mo F Notes ***** The data test1.data is skewed on the left hand side of the first gaussian. It demonstrates how xcrvfit can be used to set data control bars around the data which appears most accurate. The data in test2.data is nmr data where we put range bars at x1=810 and x2=820. A reasonable fit is at Vo(1)=811, T1(1)=2.2, Vo(2)=818, T1(2)=2.1, Mo=1455, F=1.0. C-code for the function *********************** b = (x - Vo(1)) / T1(1); lz1 = (1.0 / (2 * PI * T1(1))) * exp(-0.5 * b * b); c = (x - Vo(2)) / T1(2); lz2 = (1.0 / (2 * PI * T1(2))) * exp(-0.5 * c * c); answer = Mo * (lz1 + F*lz2);