;+
; pro msinfunct, X, A, F, pder
;
; Purpose: Sine Function (reverse) 
; 
; Input: X
;        A: Coef
;
; Output: F
; 
; Initial version: Yi-Jiun Su, AFRL, 2012/11/06
;
;-
pro msinfunct, X, A, F, pder 
  mx = max(X,/NaN)
  bx = -1.*SIN(X*2.*!pi/mx)
  F = A[0]*bx+A[1]
  if N_PARAMS() ge 4 then begin
    cx = -1.*COS(X*2.*!pi/mx)
    pder = [[bx],[A[0]*cx]]
  endif
end