git-svn-id: svn://scm.gforge.inria.fr/svnroot/paradiseo@40 331e1502-861f-0410-8da2-ba01fb791d7f
93 lines
6.2 KiB
HTML
93 lines
6.2 KiB
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
|
|
<html><head><meta http-equiv="Content-Type" content="text/html;charset=iso-8859-1">
|
|
<title>EO: eoSymCrossover.cpp Source File</title>
|
|
<link href="doxygen.css" rel="stylesheet" type="text/css">
|
|
</head><body>
|
|
<!-- Generated by Doxygen 1.3.9.1 -->
|
|
<div class="qindex"> <form class="search" action="search.php" method="get">
|
|
<a class="qindex" href="main.html">Main Page</a> | <a class="qindex" href="modules.html">Modules</a> | <a class="qindex" href="namespaces.html">Namespace List</a> | <a class="qindex" href="hierarchy.html">Class Hierarchy</a> | <a class="qindex" href="classes.html">Alphabetical List</a> | <a class="qindex" href="annotated.html">Class List</a> | <a class="qindex" href="files.html">File List</a> | <a class="qindex" href="namespacemembers.html">Namespace Members</a> | <a class="qindex" href="functions.html">Class Members</a> | <a class="qindex" href="pages.html">Related Pages</a> | <span class="search"><u>S</u>earch for <input class="search" type="text" name="query" value="" size="20" accesskey="s"/></span></form></div>
|
|
<div class="nav">
|
|
<a class="el" href="dir_000007.html">contrib</a> / <a class="el" href="dir_000008.html">mathsym</a> / <a class="el" href="dir_000018.html">eo_interface</a></div>
|
|
<h1>eoSymCrossover.cpp</h1><div class="fragment"><pre class="fragment">00001 <span class="comment">/* </span>
|
|
00002 <span class="comment"> * Copyright (C) 2005 Maarten Keijzer</span>
|
|
00003 <span class="comment"> *</span>
|
|
00004 <span class="comment"> * This program is free software; you can redistribute it and/or modify</span>
|
|
00005 <span class="comment"> * it under the terms of version 2 of the GNU General Public License as </span>
|
|
00006 <span class="comment"> * published by the Free Software Foundation. </span>
|
|
00007 <span class="comment"> *</span>
|
|
00008 <span class="comment"> * This program is distributed in the hope that it will be useful,</span>
|
|
00009 <span class="comment"> * but WITHOUT ANY WARRANTY; without even the implied warranty of</span>
|
|
00010 <span class="comment"> * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the</span>
|
|
00011 <span class="comment"> * GNU General Public License for more details.</span>
|
|
00012 <span class="comment"> *</span>
|
|
00013 <span class="comment"> * You should have received a copy of the GNU General Public License</span>
|
|
00014 <span class="comment"> * along with this program; if not, write to the Free Software</span>
|
|
00015 <span class="comment"> * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA</span>
|
|
00016 <span class="comment"> */</span>
|
|
00017
|
|
00018
|
|
00019 <span class="preprocessor">#include <Sym.h></span>
|
|
00020 <span class="preprocessor">#include <NodeSelector.h></span>
|
|
00021
|
|
00022 <span class="preprocessor">#include <eoSymCrossover.h></span>
|
|
00023 <span class="preprocessor">#include <utils/eoRNG.h></span>
|
|
00024
|
|
00025 <span class="keywordtype">bool</span> subtree_quad(Sym& a, Sym& b, <a class="code" href="class_node_selector.html">NodeSelector</a>& select) {
|
|
00026 NodeSelector::NodeSelection sel_a = select.<a class="code" href="class_node_selector.html#a1">select_node</a>(a);
|
|
00027 NodeSelector::NodeSelection sel_b = select.<a class="code" href="class_node_selector.html#a1">select_node</a>(b);
|
|
00028
|
|
00029 Sym aprime = insert_subtree(a, sel_a.idx(), sel_b.subtree() );
|
|
00030 Sym bprime = insert_subtree(b, sel_b.idx(), sel_a.subtree() );
|
|
00031
|
|
00032 a = aprime;
|
|
00033 b = bprime;
|
|
00034 <span class="keywordflow">return</span> <span class="keyword">true</span>;
|
|
00035 }
|
|
00036
|
|
00037 <span class="keywordtype">bool</span> subtree_bin(Sym& a, <span class="keyword">const</span> Sym& b, <a class="code" href="class_node_selector.html">NodeSelector</a>& select) {
|
|
00038 NodeSelector::NodeSelection sel_a = select.<a class="code" href="class_node_selector.html#a1">select_node</a>(a);
|
|
00039 NodeSelector::NodeSelection sel_b = select.<a class="code" href="class_node_selector.html#a1">select_node</a>(b);
|
|
00040
|
|
00041 a = insert_subtree(a, sel_a.idx(), sel_b.subtree());
|
|
00042
|
|
00043 <span class="keywordflow">return</span> <span class="keyword">true</span>;
|
|
00044 }
|
|
00045
|
|
00046 Sym homologous_binimpl(Sym a, Sym b) {
|
|
00047
|
|
00048 <span class="keywordflow">if</span>(a == b) { <span class="keywordflow">return</span> a; } <span class="comment">// no point </span>
|
|
00049
|
|
00050 <span class="keywordtype">bool</span> use_a = rng.<a class="code" href="classeo_rng.html#a5">random</a>(2);
|
|
00051
|
|
00052 token_t head = (use_a? a : b).token();
|
|
00053 SymVec args = use_a?a.args() : b.args();
|
|
00054
|
|
00055 <span class="keyword">const</span> SymVec& a_args = a.args();
|
|
00056 <span class="keyword">const</span> SymVec& b_args = b.args();
|
|
00057 <span class="keywordtype">unsigned</span> mn = std::min(a_args.size(), b_args.size());
|
|
00058
|
|
00059 <span class="keywordtype">bool</span> changed = !use_a;
|
|
00060
|
|
00061 <span class="keywordflow">for</span> (<span class="keywordtype">unsigned</span> i = 0; i < mn; ++i) {
|
|
00062 args[i] = homologous_binimpl(a_args[i], b_args[i]);
|
|
00063 <span class="keywordflow">if</span> (args[i] != a_args[i]) {
|
|
00064 changed = <span class="keyword">true</span>;
|
|
00065 }
|
|
00066 }
|
|
00067
|
|
00068 <span class="keywordflow">return</span> changed? Sym(head, args) : a;
|
|
00069 }
|
|
00070
|
|
00071 <span class="keywordtype">bool</span> homologous_bin(Sym& a, <span class="keyword">const</span> Sym& b) {
|
|
00072 <span class="keywordflow">if</span> (a==b) <span class="keywordflow">return</span> <span class="keyword">false</span>;
|
|
00073 Sym org = a;
|
|
00074 a = homologous_binimpl(a,b);
|
|
00075 <span class="keywordflow">return</span> org != a;
|
|
00076 }
|
|
00077
|
|
00078
|
|
</pre></div><hr size="1"><address style="align: right;"><small>Generated on Thu Oct 19 05:06:38 2006 for EO by
|
|
<a href="http://www.doxygen.org/index.html">
|
|
<img src="doxygen.png" alt="doxygen" align="middle" border="0"></a> 1.3.9.1 </small></address>
|
|
</body>
|
|
</html>
|