amath/doc/html/ccsc_8c_source.html

134 lines
20 KiB
HTML

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
<meta http-equiv="X-UA-Compatible" content="IE=9"/>
<meta name="generator" content="Doxygen 1.8.11"/>
<title>amath: lib/cplex/ccsc.c Source File</title>
<link href="tabs.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="jquery.js"></script>
<script type="text/javascript" src="dynsections.js"></script>
<link href="navtree.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="resize.js"></script>
<script type="text/javascript" src="navtreedata.js"></script>
<script type="text/javascript" src="navtree.js"></script>
<script type="text/javascript">
$(document).ready(initResizable);
$(window).load(resizeHeight);
</script>
<link href="search/search.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="search/searchdata.js"></script>
<script type="text/javascript" src="search/search.js"></script>
<script type="text/javascript">
$(document).ready(function() { init_search(); });
</script>
<link href="doxygen.css" rel="stylesheet" type="text/css" />
</head>
<body>
<div id="top"><!-- do not remove this div, it is closed by doxygen! -->
<div id="titlearea">
<table cellspacing="0" cellpadding="0">
<tbody>
<tr style="height: 56px;">
<td id="projectalign" style="padding-left: 0.5em;">
<div id="projectname">amath
&#160;<span id="projectnumber">1.6.2</span>
</div>
<div id="projectbrief">Simple command line calculator</div>
</td>
</tr>
</tbody>
</table>
</div>
<!-- end header part -->
<!-- Generated by Doxygen 1.8.11 -->
<script type="text/javascript">
var searchBox = new SearchBox("searchBox", "search",false,'Search');
</script>
<div id="navrow1" class="tabs">
<ul class="tablist">
<li><a href="index.html"><span>Main&#160;Page</span></a></li>
<li><a href="pages.html"><span>Related&#160;Pages</span></a></li>
<li><a href="annotated.html"><span>Classes</span></a></li>
<li class="current"><a href="files.html"><span>Files</span></a></li>
<li>
<div id="MSearchBox" class="MSearchBoxInactive">
<span class="left">
<img id="MSearchSelect" src="search/mag_sel.png"
onmouseover="return searchBox.OnSearchSelectShow()"
onmouseout="return searchBox.OnSearchSelectHide()"
alt=""/>
<input type="text" id="MSearchField" value="Search" accesskey="S"
onfocus="searchBox.OnSearchFieldFocus(true)"
onblur="searchBox.OnSearchFieldFocus(false)"
onkeyup="searchBox.OnSearchFieldChange(event)"/>
</span><span class="right">
<a id="MSearchClose" href="javascript:searchBox.CloseResultsWindow()"><img id="MSearchCloseImg" border="0" src="search/close.png" alt=""/></a>
</span>
</div>
</li>
</ul>
</div>
<div id="navrow2" class="tabs2">
<ul class="tablist">
<li><a href="files.html"><span>File&#160;List</span></a></li>
<li><a href="globals.html"><span>File&#160;Members</span></a></li>
</ul>
</div>
</div><!-- top -->
<div id="side-nav" class="ui-resizable side-nav-resizable">
<div id="nav-tree">
<div id="nav-tree-contents">
<div id="nav-sync" class="sync"></div>
</div>
</div>
<div id="splitbar" style="-moz-user-select:none;"
class="ui-resizable-handle">
</div>
</div>
<script type="text/javascript">
$(document).ready(function(){initNavTree('ccsc_8c_source.html','');});
</script>
<div id="doc-content">
<!-- window showing the filter options -->
<div id="MSearchSelectWindow"
onmouseover="return searchBox.OnSearchSelectShow()"
onmouseout="return searchBox.OnSearchSelectHide()"
onkeydown="return searchBox.OnSearchSelectKey(event)">
</div>
<!-- iframe showing the search results (closed by default) -->
<div id="MSearchResultsWindow">
<iframe src="javascript:void(0)" frameborder="0"
name="MSearchResults" id="MSearchResults">
</iframe>
</div>
<div class="header">
<div class="headertitle">
<div class="title">ccsc.c</div> </div>
</div><!--header-->
<div class="contents">
<a href="ccsc_8c.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno"> 1</span>&#160;<span class="comment">/*</span></div><div class="line"><a name="l00002"></a><span class="lineno"> 2</span>&#160;<span class="comment"> * Copyright (c) 2015-2017 Carsten Sonne Larsen &lt;cs@innolan.dk&gt;</span></div><div class="line"><a name="l00003"></a><span class="lineno"> 3</span>&#160;<span class="comment"> * All rights reserved.</span></div><div class="line"><a name="l00004"></a><span class="lineno"> 4</span>&#160;<span class="comment"> *</span></div><div class="line"><a name="l00005"></a><span class="lineno"> 5</span>&#160;<span class="comment"> * Redistribution and use in source and binary forms, with or without</span></div><div class="line"><a name="l00006"></a><span class="lineno"> 6</span>&#160;<span class="comment"> * modification, are permitted provided that the following conditions</span></div><div class="line"><a name="l00007"></a><span class="lineno"> 7</span>&#160;<span class="comment"> * are met:</span></div><div class="line"><a name="l00008"></a><span class="lineno"> 8</span>&#160;<span class="comment"> * 1. Redistributions of source code must retain the above copyright</span></div><div class="line"><a name="l00009"></a><span class="lineno"> 9</span>&#160;<span class="comment"> * notice, this list of conditions and the following disclaimer.</span></div><div class="line"><a name="l00010"></a><span class="lineno"> 10</span>&#160;<span class="comment"> * 2. Redistributions in binary form must reproduce the above copyright</span></div><div class="line"><a name="l00011"></a><span class="lineno"> 11</span>&#160;<span class="comment"> * notice, this list of conditions and the following disclaimer in the</span></div><div class="line"><a name="l00012"></a><span class="lineno"> 12</span>&#160;<span class="comment"> * documentation and/or other materials provided with the distribution.</span></div><div class="line"><a name="l00013"></a><span class="lineno"> 13</span>&#160;<span class="comment"> *</span></div><div class="line"><a name="l00014"></a><span class="lineno"> 14</span>&#160;<span class="comment"> * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS&#39;&#39; AND ANY EXPRESS OR</span></div><div class="line"><a name="l00015"></a><span class="lineno"> 15</span>&#160;<span class="comment"> * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES</span></div><div class="line"><a name="l00016"></a><span class="lineno"> 16</span>&#160;<span class="comment"> * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.</span></div><div class="line"><a name="l00017"></a><span class="lineno"> 17</span>&#160;<span class="comment"> * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,</span></div><div class="line"><a name="l00018"></a><span class="lineno"> 18</span>&#160;<span class="comment"> * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT</span></div><div class="line"><a name="l00019"></a><span class="lineno"> 19</span>&#160;<span class="comment"> * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,</span></div><div class="line"><a name="l00020"></a><span class="lineno"> 20</span>&#160;<span class="comment"> * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY</span></div><div class="line"><a name="l00021"></a><span class="lineno"> 21</span>&#160;<span class="comment"> * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT</span></div><div class="line"><a name="l00022"></a><span class="lineno"> 22</span>&#160;<span class="comment"> * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF</span></div><div class="line"><a name="l00023"></a><span class="lineno"> 23</span>&#160;<span class="comment"> * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.</span></div><div class="line"><a name="l00024"></a><span class="lineno"> 24</span>&#160;<span class="comment"> *</span></div><div class="line"><a name="l00025"></a><span class="lineno"> 25</span>&#160;<span class="comment"> */</span></div><div class="line"><a name="l00026"></a><span class="lineno"> 26</span>&#160;</div><div class="line"><a name="l00027"></a><span class="lineno"> 27</span>&#160;<span class="preprocessor">#</span><span class="preprocessor">include</span> <a class="code" href="cplex_2prim_8h.html">&quot;prim.h&quot;</a></div><div class="line"><a name="l00028"></a><span class="lineno"> 28</span>&#160;<span class="preprocessor">#</span><span class="preprocessor">include</span> <a class="code" href="math_8h.html" title="Functions in math library for handling real numbers. ">&quot;math.h&quot;</a></div><div class="line"><a name="l00029"></a><span class="lineno"> 29</span>&#160;<span class="preprocessor">#</span><span class="preprocessor">include</span> <a class="code" href="complex_8h.html" title="Functions in math library for handling complex numbers. ">&quot;complex.h&quot;</a></div><div class="line"><a name="l00030"></a><span class="lineno"> 30</span>&#160;</div><div class="line"><a name="l00031"></a><span class="lineno"> 31</span>&#160;<span class="comment">/**</span></div><div class="line"><a name="l00032"></a><span class="lineno"> 32</span>&#160;<span class="comment"> * @brief Cosecant of a complex number</span></div><div class="line"><a name="l00033"></a><span class="lineno"> 33</span>&#160;<span class="comment"> * @details</span></div><div class="line"><a name="l00034"></a><span class="lineno"> 34</span>&#160;<span class="comment"> * Calculated as in Open Office:</span></div><div class="line"><a name="l00035"></a><span class="lineno"> 35</span>&#160;<span class="comment"> * &lt;pre&gt;</span></div><div class="line"><a name="l00036"></a><span class="lineno"> 36</span>&#160;<span class="comment"> * a+bi</span></div><div class="line"><a name="l00037"></a><span class="lineno"> 37</span>&#160;<span class="comment"> * 2.0 * sin(a) * cosh(b)</span></div><div class="line"><a name="l00038"></a><span class="lineno"> 38</span>&#160;<span class="comment"> * real = ------------------------------</span></div><div class="line"><a name="l00039"></a><span class="lineno"> 39</span>&#160;<span class="comment"> * cosh(2.0 * b) - cos(2.0 * a)</span></div><div class="line"><a name="l00040"></a><span class="lineno"> 40</span>&#160;<span class="comment"> *</span></div><div class="line"><a name="l00041"></a><span class="lineno"> 41</span>&#160;<span class="comment"> * -2.0 * cos(a) * sinh(b)</span></div><div class="line"><a name="l00042"></a><span class="lineno"> 42</span>&#160;<span class="comment"> * imag = ------------------------------</span></div><div class="line"><a name="l00043"></a><span class="lineno"> 43</span>&#160;<span class="comment"> * cosh(2.0 * b) - cos(2.0 * a)</span></div><div class="line"><a name="l00044"></a><span class="lineno"> 44</span>&#160;<span class="comment"> * &lt;/pre&gt;</span></div><div class="line"><a name="l00045"></a><span class="lineno"> 45</span>&#160;<span class="comment"> * https://wiki.openoffice.org/wiki/Documentation/How_Tos/Calc:_IMCSC_function</span></div><div class="line"><a name="l00046"></a><span class="lineno"> 46</span>&#160;<span class="comment"> */</span></div><div class="line"><a name="l00047"></a><span class="lineno"><a class="line" href="ccsc_8c.html#a1a06d41ae4e946bed755fe51ffb6ed24"> 47</a></span>&#160;complex <a class="code" href="ccsc_8c.html#a1a06d41ae4e946bed755fe51ffb6ed24">ccsc</a>(complex z)</div><div class="line"><a name="l00048"></a><span class="lineno"> 48</span>&#160;{</div><div class="line"><a name="l00049"></a><span class="lineno"> 49</span>&#160; complex w;</div><div class="line"><a name="l00050"></a><span class="lineno"> 50</span>&#160; <span class="keywordtype">double</span> a, b;</div><div class="line"><a name="l00051"></a><span class="lineno"> 51</span>&#160; <span class="keywordtype">double</span> d;</div><div class="line"><a name="l00052"></a><span class="lineno"> 52</span>&#160;</div><div class="line"><a name="l00053"></a><span class="lineno"> 53</span>&#160; a = <a class="code" href="prim_8c.html#a4a236b24c0197821e3489a35a72079ab">creal</a><a class="code" href="prim_8c.html#a4a236b24c0197821e3489a35a72079ab">(</a>z<a class="code" href="prim_8c.html#a4a236b24c0197821e3489a35a72079ab">)</a>;</div><div class="line"><a name="l00054"></a><span class="lineno"> 54</span>&#160; b = <a class="code" href="prim_8c.html#aa1fe0b9371befabef6c41ba73470774a">cimag</a><a class="code" href="prim_8c.html#aa1fe0b9371befabef6c41ba73470774a">(</a>z<a class="code" href="prim_8c.html#aa1fe0b9371befabef6c41ba73470774a">)</a>;</div><div class="line"><a name="l00055"></a><span class="lineno"> 55</span>&#160; d = <a class="code" href="cosh_8c.html#a3795d3c1f1d30819be56da4e4d67f64b">cosh</a><a class="code" href="cosh_8c.html#a3795d3c1f1d30819be56da4e4d67f64b">(</a>2.0 * b<a class="code" href="cosh_8c.html#a3795d3c1f1d30819be56da4e4d67f64b">)</a> - <a class="code" href="cos_8c.html#a5e7b53a694b3cf0f2d7debd444140fbd">cos</a><a class="code" href="cos_8c.html#a5e7b53a694b3cf0f2d7debd444140fbd">(</a>2.0 * a<a class="code" href="cos_8c.html#a5e7b53a694b3cf0f2d7debd444140fbd">)</a>;</div><div class="line"><a name="l00056"></a><span class="lineno"> 56</span>&#160;</div><div class="line"><a name="l00057"></a><span class="lineno"> 57</span>&#160; <span class="keywordflow">if</span> (d == 0.0) {</div><div class="line"><a name="l00058"></a><span class="lineno"> 58</span>&#160; w = <a class="code" href="prim_8c.html#a980e6e049f7902b05fc9eb5614b07a5c">cpack</a><a class="code" href="prim_8c.html#a980e6e049f7902b05fc9eb5614b07a5c">(</a><a class="code" href="cplex_2prim_8h.html#a5f3d17bf39f78da3422ca52e475d7724">HUGE</a><a class="code" href="prim_8c.html#a980e6e049f7902b05fc9eb5614b07a5c">,</a> <a class="code" href="cplex_2prim_8h.html#a5f3d17bf39f78da3422ca52e475d7724">HUGE</a><a class="code" href="prim_8c.html#a980e6e049f7902b05fc9eb5614b07a5c">)</a>; <span class="comment">// TODO: INF, INF</span></div><div class="line"><a name="l00059"></a><span class="lineno"> 59</span>&#160; } <span class="keywordflow">else</span> {</div><div class="line"><a name="l00060"></a><span class="lineno"> 60</span>&#160; w = <a class="code" href="prim_8c.html#a980e6e049f7902b05fc9eb5614b07a5c">cpack</a><a class="code" href="prim_8c.html#a980e6e049f7902b05fc9eb5614b07a5c">(</a>(2.0 * <a class="code" href="sin_8c.html#aad4af25633b071b0e2cdb8ebd87eca77">sin</a><a class="code" href="sin_8c.html#aad4af25633b071b0e2cdb8ebd87eca77">(</a>a<a class="code" href="sin_8c.html#aad4af25633b071b0e2cdb8ebd87eca77">)</a> * <a class="code" href="cosh_8c.html#a3795d3c1f1d30819be56da4e4d67f64b">cosh</a><a class="code" href="cosh_8c.html#a3795d3c1f1d30819be56da4e4d67f64b">(</a>b<a class="code" href="cosh_8c.html#a3795d3c1f1d30819be56da4e4d67f64b">)</a> / d)<a class="code" href="prim_8c.html#a980e6e049f7902b05fc9eb5614b07a5c">,</a> (-2.0 * <a class="code" href="cos_8c.html#a5e7b53a694b3cf0f2d7debd444140fbd">cos</a><a class="code" href="cos_8c.html#a5e7b53a694b3cf0f2d7debd444140fbd">(</a>a<a class="code" href="cos_8c.html#a5e7b53a694b3cf0f2d7debd444140fbd">)</a> * <a class="code" href="sinh_8c.html#a862012e970c977c482507064e2793b45">sinh</a><a class="code" href="sinh_8c.html#a862012e970c977c482507064e2793b45">(</a>b<a class="code" href="sinh_8c.html#a862012e970c977c482507064e2793b45">)</a> / d)<a class="code" href="prim_8c.html#a980e6e049f7902b05fc9eb5614b07a5c">)</a>;</div><div class="line"><a name="l00061"></a><span class="lineno"> 61</span>&#160; }</div><div class="line"><a name="l00062"></a><span class="lineno"> 62</span>&#160;</div><div class="line"><a name="l00063"></a><span class="lineno"> 63</span>&#160; <span class="keywordflow">return</span> w;</div><div class="line"><a name="l00064"></a><span class="lineno"> 64</span>&#160;}</div><div class="ttc" id="cos_8c_html_a5e7b53a694b3cf0f2d7debd444140fbd"><div class="ttname"><a href="cos_8c.html#a5e7b53a694b3cf0f2d7debd444140fbd">cos</a></div><div class="ttdeci">double cos(double x)</div><div class="ttdoc">Trigonometric cosine function. </div><div class="ttdef"><b>Definition:</b> <a href="cos_8c_source.html#l00087">cos.c:87</a></div></div>
<div class="ttc" id="prim_8c_html_a980e6e049f7902b05fc9eb5614b07a5c"><div class="ttname"><a href="prim_8c.html#a980e6e049f7902b05fc9eb5614b07a5c">cpack</a></div><div class="ttdeci">complex cpack(double x, double y)</div><div class="ttdoc">Pack two real numbers into a complex number. </div><div class="ttdef"><b>Definition:</b> <a href="prim_8c_source.html#l00071">prim.c:71</a></div></div>
<div class="ttc" id="prim_8c_html_aa1fe0b9371befabef6c41ba73470774a"><div class="ttname"><a href="prim_8c.html#aa1fe0b9371befabef6c41ba73470774a">cimag</a></div><div class="ttdeci">double cimag(complex z)</div><div class="ttdoc">Imaginary part of complex number. </div><div class="ttdef"><b>Definition:</b> <a href="prim_8c_source.html#l00047">prim.c:47</a></div></div>
<div class="ttc" id="cplex_2prim_8h_html_a5f3d17bf39f78da3422ca52e475d7724"><div class="ttname"><a href="cplex_2prim_8h.html#a5f3d17bf39f78da3422ca52e475d7724">HUGE</a></div><div class="ttdeci">#define HUGE</div><div class="ttdef"><b>Definition:</b> <a href="cplex_2prim_8h_source.html#l00040">prim.h:40</a></div></div>
<div class="ttc" id="prim_8c_html_a4a236b24c0197821e3489a35a72079ab"><div class="ttname"><a href="prim_8c.html#a4a236b24c0197821e3489a35a72079ab">creal</a></div><div class="ttdeci">double creal(complex z)</div><div class="ttdoc">Real part of complex number. </div><div class="ttdef"><b>Definition:</b> <a href="prim_8c_source.html#l00038">prim.c:38</a></div></div>
<div class="ttc" id="sinh_8c_html_a862012e970c977c482507064e2793b45"><div class="ttname"><a href="sinh_8c.html#a862012e970c977c482507064e2793b45">sinh</a></div><div class="ttdeci">double sinh(double x)</div><div class="ttdoc">Hyperbolic sine function. </div><div class="ttdef"><b>Definition:</b> <a href="sinh_8c_source.html#l00081">sinh.c:81</a></div></div>
<div class="ttc" id="ccsc_8c_html_a1a06d41ae4e946bed755fe51ffb6ed24"><div class="ttname"><a href="ccsc_8c.html#a1a06d41ae4e946bed755fe51ffb6ed24">ccsc</a></div><div class="ttdeci">complex ccsc(complex z)</div><div class="ttdoc">Cosecant of a complex number. </div><div class="ttdef"><b>Definition:</b> <a href="ccsc_8c_source.html#l00047">ccsc.c:47</a></div></div>
<div class="ttc" id="cosh_8c_html_a3795d3c1f1d30819be56da4e4d67f64b"><div class="ttname"><a href="cosh_8c.html#a3795d3c1f1d30819be56da4e4d67f64b">cosh</a></div><div class="ttdeci">double cosh(double x)</div><div class="ttdoc">Hyperbolic cosine function. </div><div class="ttdef"><b>Definition:</b> <a href="cosh_8c_source.html#l00084">cosh.c:84</a></div></div>
<div class="ttc" id="sin_8c_html_aad4af25633b071b0e2cdb8ebd87eca77"><div class="ttname"><a href="sin_8c.html#aad4af25633b071b0e2cdb8ebd87eca77">sin</a></div><div class="ttdeci">double sin(double x)</div><div class="ttdoc">Trigonometric sine function. </div><div class="ttdef"><b>Definition:</b> <a href="sin_8c_source.html#l00087">sin.c:87</a></div></div>
</div><!-- fragment --></div><!-- contents -->
</div><!-- doc-content -->
<!-- start footer part -->
<div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
<ul>
<li class="navelem"><a class="el" href="dir_97aefd0d527b934f1d99a682da8fe6a9.html">lib</a></li><li class="navelem"><a class="el" href="dir_a8e1daca3aca8c066580f50e93d3fce3.html">cplex</a></li><li class="navelem"><a class="el" href="ccsc_8c.html">ccsc.c</a></li>
<li class="footer">Generated by
<a href="http://www.doxygen.org/index.html">
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.11 </li>
</ul>
</div>
</body>
</html>