.....',(array(ii),ii=1,inums)
     end subroutine reportit
 end program demo_string_to_values
</pre><p>Expected output </p><pre class="fragment">string_to_values:
input string............. 10 20e3;3.45 -400.3e-2;1234; 5678
number of values found...           6
values...................   10.0000000  20000.0000  3.45000005  -4.00299978  1234.00000  5678.00000
string_to_values:
input string............. 10 20e3;3.45 -400.3e-2;1234; 5678
number of values found...           3
values...................   10.0000