#
# canola - canon canola 1614p emulator
# Copyright (C) 2011 Peter Miller
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License, version 3, as
# published by the Free Software Foundation.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program. If not, see .
#
; ---------- Card-Pocket-Begin -------------------------------------------
; Title: MS-13: sinh(x)
; Color: green
; Style: blank
; ---------- Card-Pocket-End ---------------------------------------------
;
; http://en.wikipedia.org/wiki/Hyperbolic_function
;
; Calculated using a Taylor series
;
; sinh(x) = sigma((x**(2n+1))/((2n+1)!))
; = x + (x**3)/(3!) + (x**5)/(5!) + (x**7)/(7!) + ...
;
; M14 => x**2
; M13 => series sum
; M12 => factorial denominator
;
SFJ $213
SM13 ; series sum
2
SM12 ; factorial denominator
RM13
*
+=
SM14 ; x**2
FJ $310
RV
*
RM14
/
RM12
+=
1
M12
RV
/
RM12
+=
M13 ; add to series total
1
M12
RV
*
.1
+=
MJ $310
CS
MJ $310
RM13
SRJ