FUNCTION: THM_LSP_REMOVE_SPINTONE, t, x, per, SpinPoly=SpinPoly, $ nsmooth=nsmooth, talk=talk NOT FOR GENERAL USE. CALLED BY THM_EFI... ONLY FOR ISOLATED PARTICLE OR WAVE BURSTS NOT FOR ENTIRE ORBIT. PURPOSE: GETS RID OF SPIN TONE AND OFFSET ON MEDIUM SIZE STRETCHES INPUT: t -NEEDED. Time array. x -NEEDED. Data array. per -NEEDED. Spin period. NOTE: input per/2 for 2nd harmonic, etc. KEYWORDS: -DEFAULT ACTION. If neither nsmooth or SpinPoly are set, sin and cos fits over entire period are used. nsmooth -OPTIONAL. If set, it takes precedence. It uses qfit and "median smooth" sin and cos over nsmooth points. SpinPoly -OPTIONAL. If set (and nsmooth not set), it uses qfit and polyfits sin and cos over nsmooth points. talk -OPTIONAL. Plots diagnostics. fail -OPTIONAL. If the removing fails, fail = 1. Otherwise fail = 0. OUTPUT: TPLOT STORE HISTORY: INITIAL VERSION: REE 99-03-25 (ff_remove_spintone) Space Scienes Lab, UCBerkeley MODIFICATION HISTORY: 08-10-31 Modified for THEMIS by REE University of Colorado 2011-05-20: Added the keyword FAIL. Jianbao Tao (JBT), CU/LASP.