 is [',string(:ilen),']'

     call value_to_string(1.0d0/3.0d0,string,ilen)
     write(*,*) 'The value is [',string(:ilen),']'

  end program demo_value_to_string

Expected output

 The value is [0.75]
 The value is [      0.7500000000]
 The value is [THE VALUE IS .750000000]
 The value is [1234]
 The value is [0.33333333333333331]
</pre><h2><a class="anchor" id="autotoc_md90"></a>
AUTHOR</h2>
<p>John S. Urban </p>
<h2><a class="anchor" id="autotoc_md91"></a>
LICENSE</h2>
<p>Public Domain </p>

<p class="r