<?xml version="1.0" encoding="UTF-8"?>
<hdevelop file_version="1.1" halcon_version="13.0">
<procedure name="mvtec_string_to_tuple">
<interface>
<ic>
<par name="InputString" base_type="ctrl" dimension="0"/>
</ic>
<oc>
<par name="TupleOut" base_type="ctrl" dimension="0"/>
</oc>
</interface>
<body>
<c> * Copyright (c) MVTec Software GmbH.  All rights reserved.</c>
<c> *</c>
<c> * All use of this software is subject to the terms of the revised BSD</c>
<c> * license.  You should have received a copy of this license along</c>
<c> * with this source code in a file named "license.txt."</c>
<c></c>
<l>strOut := InputString</l>
<l>tuple_regexp_replace (strOut, '\\[', '', strOut)</l>
<l>tuple_regexp_replace (strOut, '\\]', '', strOut)</l>
<l>tuple_split (strOut, ',', Substrings)</l>
<l>TupleOut := number(Substrings)</l>
<l>return ()</l>
</body>
<docu id="mvtec_string_to_tuple">
<chapters lang="de_DE">
<item>Tupel</item>
<item>String-Operationen</item>
</chapters>
<example lang="de_DE">StringTuple := '[291.827,203.603,396.382,264.289,442.173,185.397,337.618,124.711]'
mvtec_string_tuple_to_tuple (StringTuple, Tuple)</example>
<library lang="de_DE">MVTec Internal Procedures</library>
<short lang="de_DE">Convert a string tuple to a tuple</short>
<parameters>
<parameter id="InputString">
<sem_type>string</sem_type>
</parameter>
<parameter id="TupleOut">
<default_type>integer</default_type>
<sem_type>number</sem_type>
<type_list>
<item>integer</item>
<item>real</item>
</type_list>
</parameter>
</parameters>
</docu>
</procedure>
</hdevelop>
