Edit File by line

<!doctype html>

[0] Fix | Delete

[1] Fix | Delete

<title>CodeMirror: yacas mode</title>

[2] Fix | Delete

[3] Fix | Delete

[4] Fix | Delete

[5] Fix | Delete

[6] Fix | Delete

[7] Fix | Delete

[8] Fix | Delete

[9] Fix | Delete

[10] Fix | Delete

.CodeMirror {border-top: 1px solid black; border-bottom: 1px solid black;}

[11] Fix | Delete

</style>

[12] Fix | Delete

[13] Fix | Delete

<a href="http://codemirror.net"><h1>CodeMirror</h1><img id=logo src="../../doc/logo.png"></a>

[14] Fix | Delete

[15] Fix | Delete

<ul>

[16] Fix | Delete

[17] Fix | Delete

<li><a href="../../doc/manual.html">Manual</a>

[18] Fix | Delete

[19] Fix | Delete

</ul>

[20] Fix | Delete

<ul>

[21] Fix | Delete

<li><a href="../index.html">Language modes</a>

[22] Fix | Delete

<li><a class=active href="#">yacas</a>

[23] Fix | Delete

</ul>

[24] Fix | Delete

</div>

[25] Fix | Delete

[26] Fix | Delete

[27] Fix | Delete

<h2>yacas mode</h2>

[28] Fix | Delete

[29] Fix | Delete

[30] Fix | Delete

[31] Fix | Delete

// example yacas code

[32] Fix | Delete

Graph(edges_IsList) <-- [

[33] Fix | Delete

Local(v, e, f, t);

[34] Fix | Delete

[35] Fix | Delete

vertices := {};

[36] Fix | Delete

[37] Fix | Delete

ForEach (e, edges) [

[38] Fix | Delete

If (IsList(e), e := Head(e));

[39] Fix | Delete

{f, t} := Tail(Listify(e));

[40] Fix | Delete

[41] Fix | Delete

DestructiveAppend(vertices, f);

[42] Fix | Delete

DestructiveAppend(vertices, t);

[43] Fix | Delete

];

[44] Fix | Delete

[45] Fix | Delete

Graph(RemoveDuplicates(vertices), edges);

[46] Fix | Delete

];

[47] Fix | Delete

[48] Fix | Delete

10 # IsGraph(Graph(vertices_IsList, edges_IsList)) <-- True;

[49] Fix | Delete

20 # IsGraph(_x) <-- False;

[50] Fix | Delete

[51] Fix | Delete

Edges(Graph(vertices_IsList, edges_IsList)) <-- edges;

[52] Fix | Delete

Vertices(Graph(vertices_IsList, edges_IsList)) <-- vertices;

[53] Fix | Delete

[54] Fix | Delete

AdjacencyList(g_IsGraph) <-- [

[55] Fix | Delete

Local(l, vertices, edges, e, op, f, t);

[56] Fix | Delete

[57] Fix | Delete

l := Association'Create();

[58] Fix | Delete

[59] Fix | Delete

vertices := Vertices(g);

[60] Fix | Delete

ForEach (v, vertices)

[61] Fix | Delete

Association'Set(l, v, {});

[62] Fix | Delete

[63] Fix | Delete

edges := Edges(g);

[64] Fix | Delete

[65] Fix | Delete

ForEach(e, edges) [

[66] Fix | Delete

If (IsList(e), e := Head(e));

[67] Fix | Delete

{op, f, t} := Listify(e);

[68] Fix | Delete

DestructiveAppend(Association'Get(l, f), t);

[69] Fix | Delete

If (String(op) = "<->", DestructiveAppend(Association'Get(l, t), f));

[70] Fix | Delete

];

[71] Fix | Delete

[72] Fix | Delete

[73] Fix | Delete

];

[74] Fix | Delete

</textarea>

[75] Fix | Delete

[76] Fix | Delete

[77] Fix | Delete

var yacasEditor = CodeMirror.fromTextArea(document.getElementById('yacasCode'), {

[78] Fix | Delete

mode: 'text/x-yacas',

[79] Fix | Delete

lineNumbers: true,

[80] Fix | Delete

matchBrackets: true

[81] Fix | Delete

});

[82] Fix | Delete

</script>

[83] Fix | Delete

[84] Fix | Delete

<p><strong>MIME types defined:</strong> <code>text/x-yacas</code> (yacas).</p>

[85] Fix | Delete

</article>

[86] Fix | Delete

[87] Fix | Delete