sine.xmds

Script source:
sine.xmds.gz

<?xml version="1.0"?>
<!--Example simulation: coupled two component ODE-->

<!-- $Id: sine_body.part 999 2004-08-03 05:42:47Z cochrane $ -->

<!--  Copyright (C) 2000-2004                                           -->
<!--                                                                    -->
<!--  Code contributed by Greg Collecutt, Joseph Hope and Paul Cochrane -->
<!--                                                                    -->
<!--  This file is part of xmds.                                        -->
<!--                                                                    -->
<!--  This program is free software; you can redistribute it and/or     -->
<!--  modify it under the terms of the GNU General Public License       -->
<!--  as published by the Free Software Foundation; either version 2    -->
<!--  of the License, or (at your option) any later version.            -->
<!--                                                                    -->
<!--  This program is distributed in the hope that it will be useful,   -->
<!--  but WITHOUT ANY WARRANTY; without even the implied warranty of    -->
<!--  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the     -->
<!--  GNU General Public License for more details.                      -->
<!--                                                                    -->
<!--  You should have received a copy of the GNU General Public License -->
<!--  along with this program; if not, write to the Free Software       -->
<!--  Foundation, Inc., 59 Temple Place - Suite 330, Boston,            -->
<!--  MA  02111-1307, USA.                                              -->

<simulation>

  <name>sine</name>

  <author>Unknown Author</author>
  <description>
    Example simulation: coupled two component ODE
  </description>

  <!-- Global system parameters and functionality -->
  <prop_dim>t</prop_dim>

  <!-- Field to be integrated over -->
  <field>
    <samples>1</samples>
    <vector>
      <name>main</name>
      <type>double</type>
      <components>a ap</components>
      <![CDATA[
        a  = 0;
	ap = 1;
      ]]>
    </vector>
  </field>

  <!-- The sequence of integrations to perform -->
  <sequence>
    <integrate>
      <algorithm>SIIP</algorithm>
      <interval>6.28318</interval>
      <lattice>50</lattice>
      <samples>50</samples>
      <![CDATA[
        da_dt = ap;
	dap_dt = -a;
      ]]>
    </integrate>
  </sequence>
  
  <!-- The output to generate -->
  <output format="ascii">
    <group>
      <sampling>
        <moments>s c</moments>
	<![CDATA[
	  s=a;
	  c=ap;
	]]>
      </sampling>
    </group>
  </output>

</simulation>

Generated by GNU enscript 1.6.3.



Introduction | Examples | Downloads | Documentation | Archives | Script Repository | FAQ | News | Links | Contacts