hoc (programming language)

<h2 id="examples">Examples</h2>
<p>The following is a simple example of an interactive calculator session in hoc; highlighted text represents hoc's output:
</p>
 1+2*3
     7
 angle=PI/3
 r=sin(angle)
 r
     0.866025
 r*2
     1.73205

<p>And a simple example of functions and flow control:
</p>
 func atan2(){
         if ($1>0){
                 return atan($2/$1)
         } else if ($1<0){
                 return atan($2/$1)+PI
         } else if ($2>0){
                 return PI/2
         } else if ($2<0){
                 return -PI/2
         } else {
                 print "atan2 domain error"
                 return 0
         }
 }
 
 atan2(2,3)
     0.982794
 atan2(0,0)
 atan2 domain error
     0.0

<ul><li>Kernighan, Brian W.; Pike, Rob (1984). <i><a href="/facts/The_Unix_Programming_Environment/pMaISgqN">The Unix Programming Environment</a></i>. Prentice Hall. <a href="/facts/ISBN_(identifier)/15AdSPa9">ISBN</a> 0-13-937681-X.</li></ul>
<h2 id="external-links">External links</h2>
<ul><li><a href="https://9p.io/magic/man2html/1/hoc">hoc(1)</a> – <a href="/facts/Plan_9_from_Bell_Labs/pQjPlS7w">Plan 9</a> Programmer's Manual, Volume 1</li></ul>
<h3>hoc implementations and versions</h3>
<ul><li>AT&T versions:
<ul><li><a href="https://web.archive.org/web/20000816174822/http://cm.bell-labs.com/who/bwk/unixprogenv.tar.gz">The original code from the Unix Programming Environment book</a>, including hoc.</li>
<li><a href="https://web.archive.org/web/19991011232359/http://netlib.bell-labs.com/~bwk/hoc.sh">Source code of hoc</a> from Bell Labs, released as <a href="/facts/Free_software/IaoVtJXn">free software</a>. This is the Research Unix version, slightly improved over the one in the book.</li>
<li><a href="https://9p.io/sources/plan9/sys/src/cmd/hoc/">Plan9 version of hoc</a> released under the <a href="/facts/MIT_License/8llAQtlk">MIT License</a>. This version is slightly different from the Research Unix version, with the most notable difference being that numbered function arguments ($1, $2, etc., as in the Unix shell) were replaced by named arguments (as in C). See also Plan 9's <a href="https://9p.io/magic/man2html/1/hoc">hoc manual</a>.</li></ul></li>
<li>Other versions:
<ul><li><a href="http://www.math.utah.edu/pub/hoc/">an extended version of hoc</a> by Nelson H. F. Beebe.</li>
<li><a href="http://nadav.harel.org.il/homepage/hoc/">an extended version of hoc</a> by Nadav Y. Har'El.</li>
<li><a href="http://www.linuxjournal.com/?q=article/5810">an extended version of hoc</a> by Jack Dennon.</li>
<li><a href="http://www.neuron.yale.edu/neuron/static/docs/refman/hoc.html">an extended version of hoc</a> by Michael Hines, John W. Moore, and Ted Carnevale.</li></ul></li></ul>

hoc (programming language) open-in-new

hoc (programming language)