﻿<?xml version="1.0" encoding="utf-8" standalone="yes"?>
<?application progid="SMath Studio" version="0.90"?>
<regions>
  <settings>
    <editable>true</editable>
    <shortcut>RK5adapt</shortcut>
    <metadata lang="eng">
      <title>Runge-Kutta fifth order adaptive step</title>
      <description>Runge-Kutta fifth order method vith adaptive step for solving system of first order ODE - initial value problem</description>
    </metadata>
    <calculation>
      <precision>2</precision>
      <fractions>decimal</fractions>
      <recalculation>true</recalculation>
    </calculation>
    <dependences>
      <assembly name="SMath Studio" version="0.90" guid="a37cba83-b69c-4c71-9992-55ff666763bd" />
      <assembly name="Special Functions" version="1.2.3926.27956" guid="2814e667-4e12-48b1-8d51-194e480eabc5" />
    </dependences>
  </settings>
  <region id="0" left="0" top="0" width="310" height="48" color="#0000ff" background-color="#ffffff" font-size="12">
    <text lang="rus">
      <p bold="true">Метод Рунге-Кутта пятого порядкас автоматическим выбором шага</p>
    </text>
    <text lang="ind">
      <p bold="true">Metode Runge-Kutta orde limadengan langkah adaptif</p>
    </text>
    <text lang="eng">
      <p bold="true">Fifth-order Runge–Kutta methodwith adaptive step</p>
    </text>
  </region>
  <region id="1" left="0" top="63" width="607" height="570" color="#000000" background-color="#ffffff" font-size="10">
    <math fraction-type="none" optimize="1">
      <input>
        <e type="operand">t1</e>
        <e type="operand">T</e>
        <e type="operand">h</e>
        <e type="operand">x</e>
        <e type="operand">ε</e>
        <e type="operand">2</e>
        <e type="function" args="1">f</e>
        <e type="function" args="6">RK5adapt</e>
        <e type="operand" style="string">t1-Start Point of indep.var.</e>
        <e type="operand" style="string">T-Segment length</e>
        <e type="operand" style="string">h-step value</e>
        <e type="operand" style="string">x-vector of initial values dep.var</e>
        <e type="operand" style="string">ε - precission</e>
        <e type="operand">j</e>
        <e type="operand">t1</e>
        <e type="operand">h</e>
        <e type="operator" args="2">+</e>
        <e type="operator" args="2">←</e>
        <e type="operand">j</e>
        <e type="operand">T</e>
        <e type="operand">t1</e>
        <e type="operator" args="2">+</e>
        <e type="operand">h</e>
        <e type="operator" args="2">+</e>
        <e type="operator" args="2">≤</e>
        <e type="operand">j</e>
        <e type="operand">j</e>
        <e type="operand">h</e>
        <e type="operator" args="2">+</e>
        <e type="operator" args="2">←</e>
        <e type="operand">tx</e>
        <e type="operand">x</e>
        <e type="operand">x</e>
        <e type="function" preserve="true" args="1">cols</e>
        <e type="function" preserve="true" args="2">col</e>
        <e type="operator" args="2">←</e>
        <e type="operand">k1</e>
        <e type="operand">h</e>
        <e type="operand">3</e>
        <e type="operator" args="2">/</e>
        <e type="operand">j</e>
        <e type="operand">tx</e>
        <e type="function" args="2">f</e>
        <e type="function" preserve="true" args="1">eval</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">←</e>
        <e type="operand">k2</e>
        <e type="operand">h</e>
        <e type="operand">3</e>
        <e type="operator" args="2">/</e>
        <e type="operand">j</e>
        <e type="operand">h</e>
        <e type="operand">3</e>
        <e type="operator" args="2">/</e>
        <e type="operator" args="2">+</e>
        <e type="operand">tx</e>
        <e type="operand">k1</e>
        <e type="operator" args="2">+</e>
        <e type="function" args="2">f</e>
        <e type="function" preserve="true" args="1">eval</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">←</e>
        <e type="operand">k3</e>
        <e type="operand">h</e>
        <e type="operand">3</e>
        <e type="operator" args="2">/</e>
        <e type="operand">j</e>
        <e type="operand">h</e>
        <e type="operand">3</e>
        <e type="operator" args="2">/</e>
        <e type="operator" args="2">+</e>
        <e type="operand">tx</e>
        <e type="operand">k1</e>
        <e type="operand">k2</e>
        <e type="operator" args="2">+</e>
        <e type="operand">2</e>
        <e type="operator" args="2">/</e>
        <e type="operator" args="2">+</e>
        <e type="function" args="2">f</e>
        <e type="function" preserve="true" args="1">eval</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">←</e>
        <e type="operand">k4</e>
        <e type="operand">h</e>
        <e type="operand">3</e>
        <e type="operator" args="2">/</e>
        <e type="operand">j</e>
        <e type="operand">h</e>
        <e type="operand">2</e>
        <e type="operator" args="2">/</e>
        <e type="operator" args="2">+</e>
        <e type="operand">tx</e>
        <e type="operand">3</e>
        <e type="operand">k1</e>
        <e type="operator" args="2">*</e>
        <e type="operand">9</e>
        <e type="operand">k3</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">+</e>
        <e type="operand">8</e>
        <e type="operator" args="2">/</e>
        <e type="operator" args="2">+</e>
        <e type="function" args="2">f</e>
        <e type="function" preserve="true" args="1">eval</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">←</e>
        <e type="operand">k5</e>
        <e type="operand">h</e>
        <e type="operand">3</e>
        <e type="operator" args="2">/</e>
        <e type="operand">j</e>
        <e type="operand">h</e>
        <e type="operator" args="2">+</e>
        <e type="operand">tx</e>
        <e type="operand">3</e>
        <e type="operand">k1</e>
        <e type="operator" args="2">*</e>
        <e type="operand">9</e>
        <e type="operand">k3</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">-</e>
        <e type="operand">2</e>
        <e type="operator" args="2">/</e>
        <e type="operator" args="2">+</e>
        <e type="operand">6</e>
        <e type="operand">k4</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">+</e>
        <e type="function" args="2">f</e>
        <e type="function" preserve="true" args="1">eval</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">←</e>
        <e type="operand">δ</e>
        <e type="operand">k1</e>
        <e type="operand">9</e>
        <e type="operand">2</e>
        <e type="operator" args="2">/</e>
        <e type="operand">k3</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">-</e>
        <e type="operand">4</e>
        <e type="operand">k4</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">+</e>
        <e type="operand">1</e>
        <e type="operand">2</e>
        <e type="operator" args="2">/</e>
        <e type="operand">k5</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">-</e>
        <e type="operator" args="2">←</e>
        <e type="operand">δ</e>
        <e type="function" preserve="true" args="1">min</e>
        <e type="function" preserve="true" args="1">abs</e>
        <e type="operand">5</e>
        <e type="operand">ε</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">≤</e>
        <e type="bracket">(</e>
        <e type="operand">δ</e>
        <e type="function" preserve="true" args="1">max</e>
        <e type="function" preserve="true" args="1">abs</e>
        <e type="operand">5</e>
        <e type="operand">ε</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">≤</e>
        <e type="bracket">(</e>
        <e type="operator" args="2">&amp;</e>
        <e type="operand">x</e>
        <e type="operand">x</e>
        <e type="operand">tx</e>
        <e type="operand">1</e>
        <e type="operand">2</e>
        <e type="operator" args="2">/</e>
        <e type="operand">k1</e>
        <e type="operand">4</e>
        <e type="operand">k4</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">+</e>
        <e type="operand">k5</e>
        <e type="operator" args="2">+</e>
        <e type="bracket">(</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">+</e>
        <e type="function" preserve="true" args="2">augment</e>
        <e type="operator" args="2">←</e>
        <e type="operand">steps</e>
        <e type="operand">1</e>
        <e type="operand">x</e>
        <e type="function" preserve="true" args="1">cols</e>
        <e type="function" preserve="true" args="3">el</e>
        <e type="operand">j</e>
        <e type="operator" args="2">←</e>
        <e type="operand">h</e>
        <e type="operand">h</e>
        <e type="operand">2</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">←</e>
        <e type="operand">3</e>
        <e type="operand">1</e>
        <e type="function" preserve="true" args="5">line</e>
        <e type="operand">j</e>
        <e type="operand">j</e>
        <e type="operand">h</e>
        <e type="operator" args="2">-</e>
        <e type="operator" args="2">←</e>
        <e type="operand">h</e>
        <e type="operand">h</e>
        <e type="operand">2</e>
        <e type="operator" args="2">/</e>
        <e type="operator" args="2">←</e>
        <e type="operand">2</e>
        <e type="operand">1</e>
        <e type="function" preserve="true" args="4">line</e>
        <e type="function" preserve="true" args="3">if</e>
        <e type="operand">8</e>
        <e type="operand">1</e>
        <e type="function" preserve="true" args="10">line</e>
        <e type="function" preserve="true" args="4">for</e>
        <e type="operand">result</e>
        <e type="operand">steps</e>
        <e type="operand">x</e>
        <e type="function" preserve="true" args="2">stack</e>
        <e type="function" preserve="true" args="1">transpose</e>
        <e type="operator" args="2">←</e>
        <e type="operand">7</e>
        <e type="operand">1</e>
        <e type="function" preserve="true" args="9">line</e>
        <e type="operator" args="2">←</e>
      </input>
    </math>
  </region>
</regions>