diff options
| -rw-r--r-- | hypsrc-test/ref/src/Constructors.html | 536 | ||||
| -rw-r--r-- | hypsrc-test/ref/src/Identifiers.html | 800 | ||||
| -rw-r--r-- | hypsrc-test/ref/src/Literals.html | 382 | ||||
| -rw-r--r-- | hypsrc-test/ref/src/Operators.html | 655 | ||||
| -rw-r--r-- | hypsrc-test/ref/src/Records.html | 646 |
5 files changed, 3019 insertions, 0 deletions
diff --git a/hypsrc-test/ref/src/Constructors.html b/hypsrc-test/ref/src/Constructors.html new file mode 100644 index 00000000..713a85f0 --- /dev/null +++ b/hypsrc-test/ref/src/Constructors.html @@ -0,0 +1,536 @@ +<!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 + ><link rel="stylesheet" type="text/css" href="style.css" + /><script type="text/javascript" src="highlight.js" + ></script + ></head + ><body + ><pre + ><span class="hs-keyword" + >module</span + ><span class="" + > </span + ><span class="hs-identifier" + >Constructors</span + ><span class="" + > </span + ><span class="hs-keyword" + >where</span + ><span class="" + > + + +</span + ><span class="hs-keyword" + >data</span + ><span class="" + > </span + ><a name="Foo" + ><a href="Constructors.html#Foo" + ><span class="hs-identifier" + >Foo</span + ></a + ></a + ><span class="" + > + </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a name="Bar" + ><a href="Constructors.html#Bar" + ><span class="hs-identifier" + >Bar</span + ></a + ></a + ><span class="" + > + </span + ><span class="hs-glyph" + >|</span + ><span class="" + > </span + ><a name="Baz" + ><a href="Constructors.html#Baz" + ><span class="hs-identifier" + >Baz</span + ></a + ></a + ><span class="" + > + </span + ><span class="hs-glyph" + >|</span + ><span class="" + > </span + ><a name="Quux" + ><a href="Constructors.html#Quux" + ><span class="hs-identifier" + >Quux</span + ></a + ></a + ><span class="" + > </span + ><a href="Constructors.html#Foo" + ><span class="hs-identifier hs-type" + >Foo</span + ></a + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > + +</span + ><span class="hs-keyword" + >newtype</span + ><span class="" + > </span + ><a name="Norf" + ><a href="Constructors.html#Norf" + ><span class="hs-identifier" + >Norf</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a name="Norf" + ><a href="Constructors.html#Norf" + ><span class="hs-identifier" + >Norf</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="Constructors.html#Foo" + ><span class="hs-identifier hs-type" + >Foo</span + ></a + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="Constructors.html#Foo" + ><span class="hs-identifier hs-type" + >Foo</span + ></a + ><span class="hs-special" + >]</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><a href="Constructors.html#Foo" + ><span class="hs-identifier hs-type" + >Foo</span + ></a + ><span class="hs-special" + >)</span + ><span class="" + > + + +</span + ><span class="hs-identifier" + >bar</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-identifier" + >baz</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-identifier" + >quux</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><a href="Constructors.html#Foo" + ><span class="hs-identifier hs-type" + >Foo</span + ></a + ><span class="" + > +</span + ><a name="bar" + ><a href="Constructors.html#bar" + ><span class="hs-identifier" + >bar</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="Constructors.html#Bar" + ><span class="hs-identifier hs-var" + >Bar</span + ></a + ><span class="" + > +</span + ><a name="baz" + ><a href="Constructors.html#baz" + ><span class="hs-identifier" + >baz</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="Constructors.html#Baz" + ><span class="hs-identifier hs-var" + >Baz</span + ></a + ><span class="" + > +</span + ><a name="quux" + ><a href="Constructors.html#quux" + ><span class="hs-identifier" + >quux</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="Constructors.html#Quux" + ><span class="hs-identifier hs-var" + >Quux</span + ></a + ><span class="" + > </span + ><a href="Constructors.html#quux" + ><span class="hs-identifier hs-var" + >quux</span + ></a + ><span class="" + > </span + ><span class="hs-number" + >0</span + ><span class="" + > + + +</span + ><span class="hs-identifier" + >unfoo</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><a href="Constructors.html#Foo" + ><span class="hs-identifier hs-type" + >Foo</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > +</span + ><a name="unfoo" + ><a href="Constructors.html#unfoo" + ><span class="hs-identifier" + >unfoo</span + ></a + ></a + ><span class="" + > </span + ><a href="Constructors.html#Bar" + ><span class="hs-identifier hs-var" + >Bar</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-number" + >0</span + ><span class="" + > +</span + ><span class="hs-identifier" + >unfoo</span + ><span class="" + > </span + ><a href="Constructors.html#Baz" + ><span class="hs-identifier hs-var" + >Baz</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-number" + >0</span + ><span class="" + > +</span + ><span class="hs-identifier" + >unfoo</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="Constructors.html#Quux" + ><span class="hs-identifier hs-var" + >Quux</span + ></a + ><span class="" + > </span + ><a name="local-1627396015" + ><a href="#local-1627396015" + ><span class="hs-identifier" + >foo</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627396016" + ><a href="#local-1627396016" + ><span class="hs-identifier" + >n</span + ></a + ></a + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-number" + >42</span + ><span class="" + > </span + ><span class="hs-operator hs-var" + >*</span + ><span class="" + > </span + ><a href="#local-1627396016" + ><span class="hs-identifier hs-var" + >n</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >+</span + ><span class="" + > </span + ><a href="Constructors.html#unfoo" + ><span class="hs-identifier hs-var" + >unfoo</span + ></a + ><span class="" + > </span + ><a href="#local-1627396015" + ><span class="hs-identifier hs-var" + >foo</span + ></a + ><span class="" + > + + +</span + ><span class="hs-identifier" + >unnorf</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><a href="Constructors.html#Norf" + ><span class="hs-identifier hs-type" + >Norf</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="Constructors.html#Foo" + ><span class="hs-identifier hs-type" + >Foo</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > +</span + ><a name="unnorf" + ><a href="Constructors.html#unnorf" + ><span class="hs-identifier" + >unnorf</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="Constructors.html#Norf" + ><span class="hs-identifier hs-var" + >Norf</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="Constructors.html#Bar" + ><span class="hs-identifier hs-var" + >Bar</span + ></a + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><a name="local-1627396017" + ><a href="#local-1627396017" + ><span class="hs-identifier" + >xs</span + ></a + ></a + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><a href="Constructors.html#Bar" + ><span class="hs-identifier hs-var" + >Bar</span + ></a + ><span class="hs-special" + >)</span + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627396017" + ><span class="hs-identifier hs-var" + >xs</span + ></a + ><span class="" + > +</span + ><span class="hs-identifier" + >unnorf</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="Constructors.html#Norf" + ><span class="hs-identifier hs-var" + >Norf</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="Constructors.html#Baz" + ><span class="hs-identifier hs-var" + >Baz</span + ></a + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><a name="local-1627396018" + ><a href="#local-1627396018" + ><span class="hs-identifier" + >xs</span + ></a + ></a + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><a href="Constructors.html#Baz" + ><span class="hs-identifier hs-var" + >Baz</span + ></a + ><span class="hs-special" + >)</span + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-identifier hs-var" + >reverse</span + ><span class="" + > </span + ><a href="#local-1627396018" + ><span class="hs-identifier hs-var" + >xs</span + ></a + ><span class="" + > +</span + ><span class="hs-identifier" + >unnorf</span + ><span class="" + > </span + ><span class="hs-identifier" + >_</span + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-identifier hs-var" + >undefined</span + ><span class="" + > +</span + ></pre + ></body + ></html +> diff --git a/hypsrc-test/ref/src/Identifiers.html b/hypsrc-test/ref/src/Identifiers.html new file mode 100644 index 00000000..ee21791f --- /dev/null +++ b/hypsrc-test/ref/src/Identifiers.html @@ -0,0 +1,800 @@ +<!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 + ><link rel="stylesheet" type="text/css" href="style.css" + /><script type="text/javascript" src="highlight.js" + ></script + ></head + ><body + ><pre + ><span class="hs-keyword" + >module</span + ><span class="" + > </span + ><span class="hs-identifier" + >Identifiers</span + ><span class="" + > </span + ><span class="hs-keyword" + >where</span + ><span class="" + > + + +</span + ><span class="hs-identifier" + >foo</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-identifier" + >bar</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-identifier" + >baz</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > +</span + ><a name="foo" + ><a href="Identifiers.html#foo" + ><span class="hs-identifier" + >foo</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391970" + ><a href="#local-1627391970" + ><span class="hs-identifier" + >x</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391971" + ><a href="#local-1627391971" + ><span class="hs-identifier" + >y</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627391970" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >+</span + ><span class="" + > </span + ><a href="#local-1627391970" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >*</span + ><span class="" + > </span + ><a href="Identifiers.html#bar" + ><span class="hs-identifier hs-var" + >bar</span + ></a + ><span class="" + > </span + ><a href="#local-1627391971" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><a href="#local-1627391970" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >*</span + ><span class="" + > </span + ><a href="#local-1627391971" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >+</span + ><span class="" + > </span + ><a href="#local-1627391971" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > +</span + ><a name="bar" + ><a href="Identifiers.html#bar" + ><span class="hs-identifier" + >bar</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391972" + ><a href="#local-1627391972" + ><span class="hs-identifier" + >x</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391973" + ><a href="#local-1627391973" + ><span class="hs-identifier" + >y</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627391973" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >+</span + ><span class="" + > </span + ><a href="#local-1627391972" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >-</span + ><span class="" + > </span + ><a href="Identifiers.html#baz" + ><span class="hs-identifier hs-var" + >baz</span + ></a + ><span class="" + > </span + ><a href="#local-1627391972" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><a href="#local-1627391973" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >-</span + ><span class="" + > </span + ><a href="#local-1627391972" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >+</span + ><span class="" + > </span + ><a href="#local-1627391973" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > +</span + ><a name="baz" + ><a href="Identifiers.html#baz" + ><span class="hs-identifier" + >baz</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391974" + ><a href="#local-1627391974" + ><span class="hs-identifier" + >x</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391975" + ><a href="#local-1627391975" + ><span class="hs-identifier" + >y</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627391974" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >*</span + ><span class="" + > </span + ><a href="#local-1627391975" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >*</span + ><span class="" + > </span + ><a href="#local-1627391975" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >*</span + ><span class="" + > </span + ><a href="#local-1627391975" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >*</span + ><span class="" + > </span + ><a href="#local-1627391974" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > + +</span + ><span class="hs-identifier" + >quux</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > +</span + ><a name="quux" + ><a href="Identifiers.html#quux" + ><span class="hs-identifier" + >quux</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391976" + ><a href="#local-1627391976" + ><span class="hs-identifier" + >x</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="Identifiers.html#foo" + ><span class="hs-identifier hs-var" + >foo</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="Identifiers.html#bar" + ><span class="hs-identifier hs-var" + >bar</span + ></a + ><span class="" + > </span + ><a href="#local-1627391976" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><a href="#local-1627391976" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="Identifiers.html#bar" + ><span class="hs-identifier hs-var" + >bar</span + ></a + ><span class="" + > </span + ><a href="#local-1627391976" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><a href="#local-1627391976" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="hs-special" + >)</span + ><span class="" + > + +</span + ><span class="hs-identifier" + >norf</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > +</span + ><a name="norf" + ><a href="Identifiers.html#norf" + ><span class="hs-identifier" + >norf</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391977" + ><a href="#local-1627391977" + ><span class="hs-identifier" + >x</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391978" + ><a href="#local-1627391978" + ><span class="hs-identifier" + >y</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391979" + ><a href="#local-1627391979" + ><span class="hs-identifier" + >z</span + ></a + ></a + ><span class="" + > + </span + ><span class="hs-glyph" + >|</span + ><span class="" + > </span + ><a href="#local-1627391977" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + ><</span + ><span class="" + > </span + ><span class="hs-number" + >0</span + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="Identifiers.html#quux" + ><span class="hs-identifier hs-var" + >quux</span + ></a + ><span class="" + > </span + ><a href="#local-1627391977" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > + </span + ><span class="hs-glyph" + >|</span + ><span class="" + > </span + ><a href="#local-1627391978" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + ><</span + ><span class="" + > </span + ><span class="hs-number" + >0</span + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="Identifiers.html#quux" + ><span class="hs-identifier hs-var" + >quux</span + ></a + ><span class="" + > </span + ><a href="#local-1627391978" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > + </span + ><span class="hs-glyph" + >|</span + ><span class="" + > </span + ><a href="#local-1627391979" + ><span class="hs-identifier hs-var" + >z</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + ><</span + ><span class="" + > </span + ><span class="hs-number" + >0</span + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="Identifiers.html#quux" + ><span class="hs-identifier hs-var" + >quux</span + ></a + ><span class="" + > </span + ><a href="#local-1627391979" + ><span class="hs-identifier hs-var" + >z</span + ></a + ><span class="" + > + </span + ><span class="hs-glyph" + >|</span + ><span class="" + > </span + ><span class="hs-identifier hs-var" + >otherwise</span + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="Identifiers.html#norf" + ><span class="hs-identifier hs-var" + >norf</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-glyph" + >-</span + ><a href="#local-1627391977" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-glyph" + >-</span + ><a href="#local-1627391978" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-glyph" + >-</span + ><a href="#local-1627391979" + ><span class="hs-identifier hs-var" + >z</span + ></a + ><span class="hs-special" + >)</span + ><span class="" + > + + +</span + ><span class="hs-identifier" + >main</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >IO</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >)</span + ><span class="" + > +</span + ><a name="main" + ><a href="Identifiers.html#main" + ><span class="hs-identifier" + >main</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-keyword" + >do</span + ><span class="" + > + </span + ><span class="hs-identifier hs-var" + >putStrLn</span + ><span class="" + > </span + ><span class="hs-operator hs-var" + >.</span + ><span class="" + > </span + ><span class="hs-identifier hs-var" + >show</span + ><span class="" + > </span + ><span class="hs-operator hs-var" + >$</span + ><span class="" + > </span + ><a href="Identifiers.html#foo" + ><span class="hs-identifier hs-var" + >foo</span + ></a + ><span class="" + > </span + ><a href="#local-1627392781" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><a href="#local-1627392782" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > + </span + ><span class="hs-identifier hs-var" + >putStrLn</span + ><span class="" + > </span + ><span class="hs-operator hs-var" + >.</span + ><span class="" + > </span + ><span class="hs-identifier hs-var" + >show</span + ><span class="" + > </span + ><span class="hs-operator hs-var" + >$</span + ><span class="" + > </span + ><a href="Identifiers.html#quux" + ><span class="hs-identifier hs-var" + >quux</span + ></a + ><span class="" + > </span + ><a href="#local-1627392783" + ><span class="hs-identifier hs-var" + >z</span + ></a + ><span class="" + > + </span + ><span class="hs-keyword" + >where</span + ><span class="" + > + </span + ><a name="local-1627392781" + ><a href="#local-1627392781" + ><span class="hs-identifier" + >x</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-number" + >10</span + ><span class="" + > + </span + ><a name="local-1627392782" + ><a href="#local-1627392782" + ><span class="hs-identifier" + >y</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-number" + >20</span + ><span class="" + > + </span + ><a name="local-1627392783" + ><a href="#local-1627392783" + ><span class="hs-identifier" + >z</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-number" + >30</span + ><span class="" + > +</span + ></pre + ></body + ></html +> diff --git a/hypsrc-test/ref/src/Literals.html b/hypsrc-test/ref/src/Literals.html new file mode 100644 index 00000000..f8549642 --- /dev/null +++ b/hypsrc-test/ref/src/Literals.html @@ -0,0 +1,382 @@ +<!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 + ><link rel="stylesheet" type="text/css" href="style.css" + /><script type="text/javascript" src="highlight.js" + ></script + ></head + ><body + ><pre + ><span class="hs-keyword" + >module</span + ><span class="" + > </span + ><span class="hs-identifier" + >Literals</span + ><span class="" + > </span + ><span class="hs-keyword" + >where</span + ><span class="" + > + + +</span + ><span class="hs-identifier" + >str</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >String</span + ><span class="" + > +</span + ><a name="str" + ><a href="Literals.html#str" + ><span class="hs-identifier" + >str</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-string" + >"str literal"</span + ><span class="" + > + +</span + ><span class="hs-identifier" + >num</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Num</span + ><span class="" + > </span + ><a href="#local-1627395902" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=></span + ><span class="" + > </span + ><a href="#local-1627395902" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="" + > +</span + ><a name="num" + ><a href="Literals.html#num" + ><span class="hs-identifier" + >num</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-number" + >0</span + ><span class="" + > </span + ><span class="hs-operator hs-var" + >+</span + ><span class="" + > </span + ><span class="hs-number" + >1</span + ><span class="" + > </span + ><span class="hs-operator hs-var" + >+</span + ><span class="" + > </span + ><span class="hs-number" + >1010011</span + ><span class="" + > </span + ><span class="hs-operator hs-var" + >*</span + ><span class="" + > </span + ><span class="hs-number" + >41231</span + ><span class="" + > </span + ><span class="hs-operator hs-var" + >+</span + ><span class="" + > </span + ><span class="hs-number" + >12131</span + ><span class="" + > + +</span + ><span class="hs-identifier" + >frac</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Fractional</span + ><span class="" + > </span + ><a href="#local-1627395418" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=></span + ><span class="" + > </span + ><a href="#local-1627395418" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="" + > +</span + ><a name="frac" + ><a href="Literals.html#frac" + ><span class="hs-identifier" + >frac</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-number" + >42.0000001</span + ><span class="" + > + +</span + ><span class="hs-identifier" + >list</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >[</span + ><a href="#local-1627395417" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="hs-special" + >]</span + ><span class="hs-special" + >]</span + ><span class="hs-special" + >]</span + ><span class="" + > +</span + ><a name="list" + ><a href="Literals.html#list" + ><span class="hs-identifier" + >list</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >]</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >]</span + ><span class="hs-special" + >]</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >]</span + ><span class="hs-special" + >]</span + ><span class="hs-special" + >]</span + ><span class="hs-special" + >]</span + ><span class="" + > + +</span + ><span class="hs-identifier" + >pair</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >)</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >)</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >)</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >)</span + ><span class="hs-special" + >)</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >)</span + ><span class="hs-special" + >)</span + ><span class="" + > +</span + ><a name="pair" + ><a href="Literals.html#pair" + ><span class="hs-identifier" + >pair</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >)</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >)</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >)</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >)</span + ><span class="hs-special" + >)</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-special" + >)</span + ><span class="hs-special" + >)</span + ><span class="" + > +</span + ></pre + ></body + ></html +> diff --git a/hypsrc-test/ref/src/Operators.html b/hypsrc-test/ref/src/Operators.html new file mode 100644 index 00000000..04fe4ee4 --- /dev/null +++ b/hypsrc-test/ref/src/Operators.html @@ -0,0 +1,655 @@ +<!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 + ><link rel="stylesheet" type="text/css" href="style.css" + /><script type="text/javascript" src="highlight.js" + ></script + ></head + ><body + ><pre + ><span class="hs-keyword" + >module</span + ><span class="" + > </span + ><span class="hs-identifier" + >Operators</span + ><span class="" + > </span + ><span class="hs-keyword" + >where</span + ><span class="" + > + + +</span + ><span class="hs-special" + >(</span + ><span class="hs-operator" + >+++</span + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="#local-1627393973" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="#local-1627393973" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="#local-1627393973" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > +</span + ><a name="local-1627393974" + ><a href="#local-1627393974" + ><span class="hs-identifier" + >a</span + ></a + ></a + ><span class="" + > </span + ><a name="%2B%2B%2B" + ><a href="Operators.html#%2B%2B%2B" + ><span class="hs-operator" + >+++</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627393975" + ><a href="#local-1627393975" + ><span class="hs-identifier" + >b</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627393974" + ><span class="hs-identifier hs-var" + >a</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >++</span + ><span class="" + > </span + ><a href="#local-1627393975" + ><span class="hs-identifier hs-var" + >b</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >++</span + ><span class="" + > </span + ><a href="#local-1627393974" + ><span class="hs-identifier hs-var" + >a</span + ></a + ><span class="" + > + +</span + ><span class="hs-special" + >(</span + ><span class="hs-operator" + >$$$</span + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="#local-1627393972" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="#local-1627393972" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="#local-1627393972" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > +</span + ><a name="local-1627393976" + ><a href="#local-1627393976" + ><span class="hs-identifier" + >a</span + ></a + ></a + ><span class="" + > </span + ><a name="%24%24%24" + ><a href="Operators.html#%24%24%24" + ><span class="hs-operator" + >$$$</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627393977" + ><a href="#local-1627393977" + ><span class="hs-identifier" + >b</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627393977" + ><span class="hs-identifier hs-var" + >b</span + ></a + ><span class="" + > </span + ><a href="Operators.html#%2B%2B%2B" + ><span class="hs-operator hs-var" + >+++</span + ></a + ><span class="" + > </span + ><a href="#local-1627393976" + ><span class="hs-identifier hs-var" + >a</span + ></a + ><span class="" + > + +</span + ><span class="hs-special" + >(</span + ><span class="hs-operator" + >***</span + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="#local-1627393971" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="#local-1627393971" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="#local-1627393971" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > +</span + ><span class="hs-special" + >(</span + ><a name="%2A%2A%2A" + ><a href="Operators.html#%2A%2A%2A" + ><span class="hs-operator" + >***</span + ></a + ></a + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><a name="local-1627393978" + ><a href="#local-1627393978" + ><span class="hs-identifier" + >a</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >]</span + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627393978" + ><span class="hs-identifier hs-var" + >a</span + ></a + ><span class="" + > +</span + ><span class="hs-special" + >(</span + ><span class="hs-operator" + >***</span + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><a name="local-1627393979" + ><a href="#local-1627393979" + ><span class="hs-identifier" + >a</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><span class="hs-identifier" + >_</span + ><span class="hs-glyph" + >:</span + ><a name="local-1627393980" + ><a href="#local-1627393980" + ><span class="hs-identifier" + >b</span + ></a + ></a + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627393979" + ><span class="hs-identifier hs-var" + >a</span + ></a + ><span class="" + > </span + ><a href="Operators.html#%2B%2B%2B" + ><span class="hs-operator hs-var" + >+++</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="#local-1627393979" + ><span class="hs-identifier hs-var" + >a</span + ></a + ><span class="" + > </span + ><a href="Operators.html#%2A%2A%2A" + ><span class="hs-operator hs-var" + >***</span + ></a + ><span class="" + > </span + ><a href="#local-1627393980" + ><span class="hs-identifier hs-var" + >b</span + ></a + ><span class="hs-special" + >)</span + ><span class="" + > + +</span + ><span class="hs-special" + >(</span + ><span class="hs-operator" + >*/\*</span + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >[</span + ><a href="#local-1627393970" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="hs-special" + >]</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="#local-1627393970" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="#local-1627393970" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > +</span + ><a name="local-1627393981" + ><a href="#local-1627393981" + ><span class="hs-identifier" + >a</span + ></a + ></a + ><span class="" + > </span + ><a name="%2A%2F%5C%2A" + ><a href="Operators.html#%2A%2F%5C%2A" + ><span class="hs-operator" + >*/\*</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627393982" + ><a href="#local-1627393982" + ><span class="hs-identifier" + >b</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-identifier hs-var" + >concatMap</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="Operators.html#%2A%2A%2A" + ><span class="hs-operator hs-var" + >***</span + ></a + ><span class="" + > </span + ><a href="#local-1627393982" + ><span class="hs-identifier hs-var" + >b</span + ></a + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><a href="#local-1627393981" + ><span class="hs-identifier hs-var" + >a</span + ></a + ><span class="" + > + +</span + ><span class="hs-special" + >(</span + ><span class="hs-operator" + >**/\**</span + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >[</span + ><a href="#local-1627393969" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="hs-special" + >]</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >[</span + ><a href="#local-1627393969" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="hs-special" + >]</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><span class="hs-special" + >[</span + ><a href="#local-1627393969" + ><span class="hs-identifier hs-type" + >a</span + ></a + ><span class="hs-special" + >]</span + ><span class="hs-special" + >]</span + ><span class="" + > +</span + ><a name="local-1627394362" + ><a href="#local-1627394362" + ><span class="hs-identifier" + >a</span + ></a + ></a + ><span class="" + > </span + ><a name="%2A%2A%2F%5C%2A%2A" + ><a href="Operators.html#%2A%2A%2F%5C%2A%2A" + ><span class="hs-operator" + >**/\**</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627394363" + ><a href="#local-1627394363" + ><span class="hs-identifier" + >b</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><span class="hs-identifier hs-var" + >zipWith</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="Operators.html#%2A%2F%5C%2A" + ><span class="hs-operator hs-var" + >*/\*</span + ></a + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-special" + >[</span + ><a href="#local-1627394362" + ><span class="hs-identifier hs-var" + >a</span + ></a + ><span class="" + > </span + ><a href="Operators.html#%2B%2B%2B" + ><span class="hs-operator hs-var" + >+++</span + ></a + ><span class="" + > </span + ><a href="#local-1627394363" + ><span class="hs-identifier hs-var" + >b</span + ></a + ><span class="hs-special" + >]</span + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="#local-1627394362" + ><span class="hs-identifier hs-var" + >a</span + ></a + ><span class="" + > </span + ><a href="Operators.html#%24%24%24" + ><span class="hs-operator hs-var" + >$$$</span + ></a + ><span class="" + > </span + ><a href="#local-1627394363" + ><span class="hs-identifier hs-var" + >b</span + ></a + ><span class="hs-special" + >)</span + ><span class="" + > +</span + ></pre + ></body + ></html +> diff --git a/hypsrc-test/ref/src/Records.html b/hypsrc-test/ref/src/Records.html new file mode 100644 index 00000000..b982c5b1 --- /dev/null +++ b/hypsrc-test/ref/src/Records.html @@ -0,0 +1,646 @@ +<!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 + ><link rel="stylesheet" type="text/css" href="style.css" + /><script type="text/javascript" src="highlight.js" + ></script + ></head + ><body + ><pre + ><span class="hs-pragma" + >{-# LANGUAGE NamedFieldPuns #-}</span + ><span class="" + > + +</span + ><span class="hs-keyword" + >module</span + ><span class="" + > </span + ><span class="hs-identifier" + >Records</span + ><span class="" + > </span + ><span class="hs-keyword" + >where</span + ><span class="" + > + + +</span + ><span class="hs-keyword" + >data</span + ><span class="" + > </span + ><a name="Point" + ><a href="Records.html#Point" + ><span class="hs-identifier" + >Point</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a name="Point" + ><a href="Records.html#Point" + ><span class="hs-identifier" + >Point</span + ></a + ></a + ><span class="" + > + </span + ><span class="hs-special" + >{</span + ><span class="" + > </span + ><a name="x" + ><a href="Records.html#x" + ><span class="hs-identifier" + >x</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-glyph" + >!</span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > + </span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><a name="y" + ><a href="Records.html#y" + ><span class="hs-identifier" + >y</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-glyph" + >!</span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > + </span + ><span class="hs-special" + >}</span + ><span class="" + > + + +</span + ><span class="hs-identifier" + >point</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><a href="Records.html#Point" + ><span class="hs-identifier hs-type" + >Point</span + ></a + ><span class="" + > +</span + ><a name="point" + ><a href="Records.html#point" + ><span class="hs-identifier" + >point</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391304" + ><a href="#local-1627391304" + ><span class="hs-identifier" + >x</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391305" + ><a href="#local-1627391305" + ><span class="hs-identifier" + >y</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="Records.html#Point" + ><span class="hs-identifier hs-var" + >Point</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >{</span + ><span class="" + > </span + ><a href="Records.html#x" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627391304" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><a href="Records.html#y" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627391305" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >}</span + ><span class="" + > + + +</span + ><span class="hs-identifier" + >lengthSqr</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><a href="Records.html#Point" + ><span class="hs-identifier hs-type" + >Point</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > +</span + ><a name="lengthSqr" + ><a href="Records.html#lengthSqr" + ><span class="hs-identifier" + >lengthSqr</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="Records.html#Point" + ><span class="hs-identifier hs-var" + >Point</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >{</span + ><span class="" + > </span + ><a href="Records.html#x" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a name="local-1627391306" + ><a href="#local-1627391306" + ><span class="hs-identifier" + >x</span + ></a + ></a + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><a href="Records.html#y" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a name="local-1627391307" + ><a href="#local-1627391307" + ><span class="hs-identifier" + >y</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-special" + >}</span + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627391306" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >*</span + ><span class="" + > </span + ><a href="#local-1627391306" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >+</span + ><span class="" + > </span + ><a href="#local-1627391307" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >*</span + ><span class="" + > </span + ><a href="#local-1627391307" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > + +</span + ><span class="hs-identifier" + >lengthSqr'</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><a href="Records.html#Point" + ><span class="hs-identifier hs-type" + >Point</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > +</span + ><a name="lengthSqr%27" + ><a href="Records.html#lengthSqr%27" + ><span class="hs-identifier" + >lengthSqr'</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-special" + >(</span + ><a href="Records.html#Point" + ><span class="hs-identifier hs-var" + >Point</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >{</span + ><span class="" + > </span + ><a href="Records.html#x" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><a href="Records.html#y" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >}</span + ><span class="hs-special" + >)</span + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627391369" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >*</span + ><span class="" + > </span + ><a href="#local-1627391369" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >+</span + ><span class="" + > </span + ><a href="#local-1627391368" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >*</span + ><span class="" + > </span + ><a href="#local-1627391368" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > + + +</span + ><span class="hs-identifier" + >translateX</span + ><span class="hs-special" + >,</span + ><span class="" + > </span + ><span class="hs-identifier" + >translateY</span + ><span class="" + > </span + ><span class="hs-glyph" + >::</span + ><span class="" + > </span + ><a href="Records.html#Point" + ><span class="hs-identifier hs-type" + >Point</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><span class="hs-identifier hs-type" + >Int</span + ><span class="" + > </span + ><span class="hs-glyph" + >-></span + ><span class="" + > </span + ><a href="Records.html#Point" + ><span class="hs-identifier hs-type" + >Point</span + ></a + ><span class="" + > +</span + ><a name="translateX" + ><a href="Records.html#translateX" + ><span class="hs-identifier" + >translateX</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391370" + ><a href="#local-1627391370" + ><span class="hs-identifier" + >p</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391371" + ><a href="#local-1627391371" + ><span class="hs-identifier" + >d</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627391370" + ><span class="hs-identifier hs-var" + >p</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >{</span + ><span class="" + > </span + ><a href="Records.html#x" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="Records.html#x" + ><span class="hs-identifier hs-var" + >x</span + ></a + ><span class="" + > </span + ><a href="#local-1627391370" + ><span class="hs-identifier hs-var" + >p</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >+</span + ><span class="" + > </span + ><a href="#local-1627391371" + ><span class="hs-identifier hs-var" + >d</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >}</span + ><span class="" + > +</span + ><a name="translateY" + ><a href="Records.html#translateY" + ><span class="hs-identifier" + >translateY</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391372" + ><a href="#local-1627391372" + ><span class="hs-identifier" + >p</span + ></a + ></a + ><span class="" + > </span + ><a name="local-1627391373" + ><a href="#local-1627391373" + ><span class="hs-identifier" + >d</span + ></a + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="#local-1627391372" + ><span class="hs-identifier hs-var" + >p</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >{</span + ><span class="" + > </span + ><a href="Records.html#y" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><span class="hs-glyph" + >=</span + ><span class="" + > </span + ><a href="Records.html#y" + ><span class="hs-identifier hs-var" + >y</span + ></a + ><span class="" + > </span + ><a href="#local-1627391372" + ><span class="hs-identifier hs-var" + >p</span + ></a + ><span class="" + > </span + ><span class="hs-operator hs-var" + >+</span + ><span class="" + > </span + ><a href="#local-1627391373" + ><span class="hs-identifier hs-var" + >d</span + ></a + ><span class="" + > </span + ><span class="hs-special" + >}</span + ><span class="" + > +</span + ></pre + ></body + ></html +> |