====== Level 1 Headline ====== 'GSAS background function 2 - GSAS manual page 129 'cosine Fourier series 'NOTE Topas will not currently display the function on the fit page, the coefficients must be exported and plotted externally 'P. Whitfield macro Bkg_GSAS_f2(bk1, b1v, bk2, b2v, bk3, b3v, bk4, b4v, bk5, b5v, bk6, b6v, bk7, b7v, bk8, b8v, bk9, b9v, bk10, b10v, bk11, b11v, bk12, b12v) { prm bk1 b1v prm bk2 b2v prm bk3 b3v prm bk4 b4v prm bk5 b5v prm bk6 b6v prm bk7 b7v prm bk8 b8v prm bk9 b9v prm bk10 b10v prm bk11 b11v prm bk12 b12v fit_obj = bk1 + bk2 Cos(X Deg) + bk3 Cos(X Deg * 2) + bk4 Cos(X Deg * 3) + bk5 Cos(X Deg * 4) + bk6 Cos(X Deg * 5) + bk7 Cos(X Deg * 6) + bk8 Cos(X Deg * 7) + bk9 Cos(X Deg * 8) + bk10 Cos(X Deg * 9) + bk11 Cos(X Deg * 10) + bk12 Cos(X Deg * 11) ; }