[01;34mwith[m Interfaces[31m.[mC[31m;[m
[01;34mpackage[m [01;34mbody[m Libsens[31m.[mData[31m.[mNeural [01;34mis[m
   
   [01;34muse[m Interfaces[31m.[mC[31m;[m
   [01;34mprocedure[m [01;30mTo_Sentence[m[31m([mFrom [31m:[m [01;34min[m Node_Set[31m;[m Index [31m:[m [01;34min[m Word16_Index_Type[31m;[m To [31m:[m [01;34min[m [01;34mout[m Sentence_Type[31m)[m [01;34mis[m
      
   [01;34mbegin[m      
      [31m-----------------------------------[m
      [31m-- Make sentence from neural set.--[m
      [31m-----------------------------------[m
      [01;34mfor[m I [01;34min[m [35m1[m[31m..[mTo'length [01;34mloop[m
	 [01;34mif[m [01;30mFrom[m[31m([mI[31m)[m [31m=[m [35m1.0[m [01;34mthen[m
	    [01;30mTo[m[31m([m[01;30mLong[m[31m([mI[31m)+([mTo[31m'First-1)).Sentence := To(Long(I)+(To'[mFirst[31m-[m[35m1[m[31m)).[mSentence [01;34mor[m [35m2[m[31m**[m[32mInteger[m[31m([mIndex[31m);[m
	 [01;34mend[m [01;34mif[m[31m;[m
      [01;34mend[m [01;34mloop[m[31m;[m
   [01;34mend[m To_Sentence[31m;[m
   
   
   
[01;34mend[m Libsens[31m.[mData[31m.[mNeural[31m;[m
