Xenharmonic Wiki

Basic abstract temperament translation code: Difference between revisions

← Older editNewer edit →
VisualWikitext
Wikispaces>genewardsmith
**Imported revision 237496955 - Original comment: **
Wikispaces>spt3125
**Imported revision 505938090 - Original comment: **
Line 1: Line 1:
<h2>IMPORTED REVISION FROM WIKISPACES</h2>
<h2>IMPORTED REVISION FROM WIKISPACES</h2>
This is an imported revision from Wikispaces. The revision metadata is included below for reference:<br>
This is an imported revision from Wikispaces. The revision metadata is included below for reference:<br>
: This revision was by author [[User:genewardsmith|genewardsmith]] and made on <tt>2011-06-18 21:05:50 UTC</tt>.<br>
: This revision was by author [[User:spt3125|spt3125]] and made on <tt>2014-05-01 22:30:57 UTC</tt>.<br>
: The original revision id was <tt>237496955</tt>.<br>
: The original revision id was <tt>505938090</tt>.<br>
: The revision comment was: <tt></tt><br>
: The revision comment was: <tt></tt><br>
The revision contents are below, presented both in the original Wikispaces Wikitext format, and in HTML exactly as Wikispaces rendered it.<br>
The revision contents are below, presented both in the original Wikispaces Wikitext format, and in HTML exactly as Wikispaces rendered it.<br>
<h4>Original Wikitext content:</h4>
<h4>Original Wikitext content:</h4>
<div style="width:100%; max-height:400pt; overflow:auto; background-color:#f8f9fa; border: 1px solid #eaecf0; padding:0em"><pre style="margin:0px;border:none;background:none;word-wrap:break-word;white-space: pre-wrap ! important" class="old-revision-html">
<div style="width:100%; max-height:400pt; overflow:auto; background-color:#f8f9fa; border: 1px solid #eaecf0; padding:0em"><pre style="margin:0px;border:none;background:none;word-wrap:break-word;white-space: pre-wrap ! important" class="old-revision-html">(code language: [[http://en.wikipedia.org/wiki/Maple_%28software%29|Maple]])
 
----
 
 
ech := proc(l)
ech := proc(l)
# reduced row echelon form of listlist l
# reduced row echelon form of listlist l
Line 13: Line 17:
convert(LinearAlgebra[ReducedRowEchelonForm](M), listlist) end:
convert(LinearAlgebra[ReducedRowEchelonForm](M), listlist) end:


relpar := proc(u, v)
relpar := proc(u, v)
# relative parity of two permutations
# relative parity of two permutations
local t;
local t;
Line 127: Line 131:
N := Matrix(N);
N := Matrix(N);
N := LinearAlgebra[Transpose](N);
N := LinearAlgebra[Transpose](N);
ech(convert(N, listlist)) end:
ech(convert(N, listlist)) end:</pre></div>
</pre></div>
<h4>Original HTML content:</h4>
<h4>Original HTML content:</h4>
<div style="width:100%; max-height:400pt; overflow:auto; background-color:#f8f9fa; border: 1px solid #eaecf0; padding:0em"><pre style="margin:0px;border:none;background:none;word-wrap:break-word;width:200%;white-space: pre-wrap ! important" class="old-revision-html">&lt;html&gt;&lt;head&gt;&lt;title&gt;Basic abstract temperament translation code&lt;/title&gt;&lt;/head&gt;&lt;body&gt;&lt;br /&gt;
<div style="width:100%; max-height:400pt; overflow:auto; background-color:#f8f9fa; border: 1px solid #eaecf0; padding:0em"><pre style="margin:0px;border:none;background:none;word-wrap:break-word;width:200%;white-space: pre-wrap ! important" class="old-revision-html">&lt;html&gt;&lt;head&gt;&lt;title&gt;Basic abstract temperament translation code&lt;/title&gt;&lt;/head&gt;&lt;body&gt;(code language: &lt;a class="wiki_link_ext" href="http://en.wikipedia.org/wiki/Maple_%28software%29" rel="nofollow"&gt;Maple&lt;/a&gt;)&lt;br /&gt;
&lt;br /&gt;
&lt;hr /&gt;
&lt;br /&gt;
&lt;br /&gt;
ech := proc(l)&lt;br /&gt;
ech := proc(l)&lt;br /&gt;
&lt;ol&gt;&lt;li&gt;reduced row echelon form of listlist l&lt;/li&gt;&lt;/ol&gt;local M;&lt;br /&gt;
&lt;ol&gt;&lt;li&gt;reduced row echelon form of listlist l&lt;/li&gt;&lt;/ol&gt;local M;&lt;br /&gt;
Line 136: Line 143:
convert(LinearAlgebra[ReducedRowEchelonForm](M), listlist) end:&lt;br /&gt;
convert(LinearAlgebra[ReducedRowEchelonForm](M), listlist) end:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
relpar := proc(u, v)&lt;br /&gt;
relpar := proc(u, v)&lt;br /&gt;
&lt;ol&gt;&lt;li&gt;relative parity of two permutations&lt;/li&gt;&lt;/ol&gt;local t;&lt;br /&gt;
&lt;ol&gt;&lt;li&gt;relative parity of two permutations&lt;/li&gt;&lt;/ol&gt;local t;&lt;br /&gt;
t := table('antisymmetric');&lt;br /&gt;
t := table('antisymmetric');&lt;br /&gt;
Retrieved from "https://en.xen.wiki/w/Basic_abstract_temperament_translation_code"