<?xml version='1.0' encoding='iso-8859-1' ?>
<!--
- Copyright (C) 2006-2013 CEA/DEN, EDF R&D
+ Copyright (C) 2006-2016 CEA/DEN, EDF R&D
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
- version 2.1 of the License.
+ version 2.1 of the License, or (at your option) any later version.
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
-->
<proc name="proc">
- <property name="DefaultStudyID" value="1"/>
<type name="string" kind="string"/>
<struct name="Engines/dataref">
<member name="ref" type="string"/>
<outport name="select" type="int"/>
</inline>
<inline name="n2">
- <script><code><![CDATA[print p1]]></code></script>
+ <script><code><![CDATA[print(p1)]]></code></script>
<inport name="p1" type="double"/>
<outport name="p1" type="double"/>
</inline>
<switch name="b1">
<default>
<inline name="n2">
- <script><code><![CDATA[print p1]]></code></script>
+ <script><code><![CDATA[print(p1)]]></code></script>
<inport name="p1" type="double"/>
<outport name="p1" type="double"/>
</inline>
</default>
<case id="1">
<inline name="n2">
- <script><code><![CDATA[print p1]]></code></script>
+ <script><code><![CDATA[print(p1)]]></code></script>
<inport name="p1" type="double"/>
<outport name="p1" type="double"/>
</inline>
</default>
<case id="1">
<inline name="n2">
- <script><code><![CDATA[print p1
+ <script><code><![CDATA[print(p1)
p1=p1+20
condition=p1 < 40. ]]></code></script>
<inport name="p1" type="double"/>