www.pudn.com > cghost.rar > ALDLE0.C

 
  #include "stdio.h" 
  #include "aldle.c" 
  main() 
  { int i; 
    static double a[5][5]={ {5.0,7.0,6.0,5.0,1.0}, 
           {7.0,10.0,8.0,7.0,2.0},{6.0,8.0,10.0,9.0,3.0}, 
           {5.0,7.0,9.0,10.0,4.0},{1.0,2.0,3.0,4.0,5.0}}; 
    static double c[5][2]={ {24.0,96.0},{34.0,136.0}, 
           {36.0,144.0},{35.0,140.0},{15.0,60.0}}; 
    if (aldle(a,5,2,c)>0) 
      for (i=0; i<=4; i++) 
        printf("x(%d)=%13.7e,   %13.7e\n",i,c[i][0],c[i][1]); 
  }