#include <exec/types.h>
 #include <proto/Tool.h>
 #include <proto/exec.h>
 #include <string.h>
 #include <stdio.h>
 #include <stdlib.h>
 
 struct Library *ToolBase;
 
 VOID main()
  {
   DOUBLE a;
   char Buffer[50],B2[50];
   
   ToolBase=OpenLibrary("tool.library",0);
   if(ToolBase==NULL)return;
   
   strcpy(Buffer,"1234567890");
   left(B2,Buffer,3);
   printf("3L  >%s<\n",B2);
   right(B2,Buffer,3);
   printf("3R  >%s<\n",B2);
   mid(B2,Buffer,3,2);
   printf("32M >%s<\n",B2);
   
   left(B2,Buffer,3);
   printf("3L  >%s<\n",B2);
   right(B2,Buffer,3);
   printf("3R  >%s<\n",B2);
   mid(B2,Buffer,3,2);
   printf("32M >%s<\n",B2);
   
   strcpy(Buffer,"1");
   UmwStoF(&a,Buffer);
   printf(">%s< -> >%lf<\n",Buffer,a);
   
   a=5.234;
   UmwFtoS(Buffer,&a,4);
   printf(">%lf< -> >%s<\n",a,Buffer);
   
   a=-0.628319;
   UmwFtoS(Buffer,&a,4);
   printf(">%lf< -> >%s<\n",a,Buffer);
   
   CloseLibrary(ToolBase);
  }