/* main5-1.c 檢驗bo5-1.c的主程序 */
 #include"c1.h"
 typedef int ElemType;
 #include"c5-1.h"
 #include"bo5-1.c"

 void main()
 {
   Array A;
   int i,j,k,*p,dim=3,bound1=3,bound2=4,bound3=2; /* a[3][4][2]數組 */
   ElemType e,*p1;
   InitArray(&A,dim,bound1,bound2,bound3); /* 構造3＊4＊2的3維數組A */
   p=A.bounds;
   printf("A.bounds=");
   for(i=0;i<dim;i++) /* 順序輸出A.bounds */
     printf("%d ",*(p+i));
   p=A.constants;
   printf("\nA.constants=");
   for(i=0;i<dim;i++) /* 順序輸出A.constants */
     printf("%d ",*(p+i));
   printf("\n%d頁%d行%d列矩陣元素如下:\n",bound1,bound2,bound3);
   for(i=0;i<bound1;i++)
   {
     for(j=0;j<bound2;j++)
     {
       for(k=0;k<bound3;k++)
       {
         Assign(&A,i*100+j*10+k,i,j,k); /* 將i*100+j*10+k賦值給A[i][j][k] */
         Value(&e,A,i,j,k); /* 將A[i][j][k]的值賦給e */
         printf("A[%d][%d][%d]=%2d ",i,j,k,e); /* 輸出A[i][j][k] */
       }
       printf("\n");
     }
     printf("\n");
   }
   p1=A.base;
   printf("A.base=\n");
   for(i=0;i<bound1*bound2*bound3;i++) /* 順序輸出A.base */
   {
     printf("%4d",*(p1+i));
     if(i%(bound2*bound3)==bound2*bound3-1)
       printf("\n");
   }
   DestroyArray(&A);
 }