NetSolve - C example


   int request,ready;
   double A[100*100],b[100],x[100];
   ...
   ...  
   request =  netslnb('LinearSystem',A,100,100,100,
                             x,100,b); 
   ...
   ...  
   ready =  netslpb(request);  /* Probing */ 
   ...
   ...  
   ready =  netslwt(request);  /* Waiting */ 
   ...
   ...

http://www.netlib.org/utk/people/JackDongarra/