
#include <stdio.h>

main()
{
int this_object_id = 1;
FILE *fopen(), *fp;

int
    two=2,
    polygon_id,
    vertice_id,
    vlist_id,
    object_polygon_count,
    object_vertice_count,
    object_polygon_vertice_count[41],
    object_vertice_list[41] [30];

double object_vertice_x[41],
       object_vertice_y[41],
       object_vertice_z[41];

  object_polygon_count = 28;
  object_vertice_count = 24;


    object_vertice_x [1] = 3;
    object_vertice_y [1] = 0;
    object_vertice_z [1] = -27;

    object_vertice_x [2] = -3;
    object_vertice_y [2] = 0;
    object_vertice_z [2] = -27;

    object_vertice_x [3] = 5;
    object_vertice_y [3] = 5;
    object_vertice_z [3] = 13;

    object_vertice_x [4] = 5;
    object_vertice_y [4] = -5;
    object_vertice_z [4] = 13;

    object_vertice_x [5] = -5;
    object_vertice_y [5] = -5;
    object_vertice_z [5] = 13;

    object_vertice_x [6] = -5;
    object_vertice_y [6] = 5;
    object_vertice_z [6] = 13;

    object_vertice_x [7] = 0;
    object_vertice_y [7] = 0;
    object_vertice_z [7] = 28;

    object_vertice_x [8] = 0;
    object_vertice_y [8] = 0;
    object_vertice_z [8] = 10;

    object_vertice_x [9] = 30;
    object_vertice_y [9] = 8;
    object_vertice_z [9] = 5;

    object_vertice_x [10] = 30;
    object_vertice_y [10] = 16;
    object_vertice_z [10] = -6;

    object_vertice_x [11] = 30;
    object_vertice_y [11] = 12;
    object_vertice_z [11] = -6;

    object_vertice_x [12] = 65;
    object_vertice_y [12] = 8;
    object_vertice_z [12] = 11;

    object_vertice_x [13] = -30;
    object_vertice_y [13] = 8;
    object_vertice_z [13] = 5;

    object_vertice_x [14] = -30;
    object_vertice_y [14] = 16;
    object_vertice_z [14] = -6;

    object_vertice_x [15] = -30;
    object_vertice_y [15] = 12;
    object_vertice_z [15] = -6;

    object_vertice_x [16] = -65;
    object_vertice_y [16] = 8;
    object_vertice_z [16] = 11;

    object_vertice_x [17] = 0;
    object_vertice_y [17] = 0;
    object_vertice_z [17] = -1;

    object_vertice_x [18] = 15;
    object_vertice_y [18] = 8;
    object_vertice_z [18] = 2;

    object_vertice_x [19] = 15;
    object_vertice_y [19] = 6;
    object_vertice_z [19] = 2;

    object_vertice_x [20] = 30;
    object_vertice_y [20] = 14;
    object_vertice_z [20] = -6;

    object_vertice_x [21] = -15;
    object_vertice_y [21] = 8;
    object_vertice_z [21] = 2;

    object_vertice_x [22] = -15;
    object_vertice_y [22] = 6;
    object_vertice_z [22] = 2;

    object_vertice_x [23] = -30;
    object_vertice_y [23] = 14;
    object_vertice_z [23] = -6;

    object_vertice_x [24] = 0;
    object_vertice_y [24] = 0;
    object_vertice_z [24] = -9;

/*
    object_vertice_x [25] = ;
    object_vertice_y [25] = ;
    object_vertice_z [25] = ;

    object_vertice_x [26] = ;
    object_vertice_y [26] = ;
    object_vertice_z [26] = ;

    object_vertice_x [27] = ;
    object_vertice_y [27] = ;
    object_vertice_z [27] = ;

    object_vertice_x [28] = ;
    object_vertice_y [28] = ;
    object_vertice_z [28] = ;

    object_vertice_x [29] = ;
    object_vertice_y [29] = ;
    object_vertice_z [29] = ;

    object_vertice_x [30] = ;
    object_vertice_y [30] = ;
    object_vertice_z [30] = ;

    object_vertice_x [31] = ;
    object_vertice_y [31] = ;
    object_vertice_z [31] = ;

    object_vertice_x [32] = ;
    object_vertice_y [32] = ;
    object_vertice_z [32] = ;

    object_vertice_x [33] = ;
    object_vertice_y [33] = ;
    object_vertice_z [33] = ;

    object_vertice_x [34] = ;
    object_vertice_y [34] = ;
    object_vertice_z [34] = ;

    object_vertice_x [35] = ;
    object_vertice_y [35] = ;
    object_vertice_z [35] = ;

    object_vertice_x [36] = ;
    object_vertice_y [36] = ;
    object_vertice_z [36] = ;

    object_vertice_x [37] = ;
    object_vertice_y [37] = ;
    object_vertice_z [37] = ;

    object_vertice_x [38] = ;
    object_vertice_y [38] = ;
    object_vertice_z [38] = ;

    object_vertice_x [39] = ;
    object_vertice_y [39] = ;
    object_vertice_z [39] = ;

    object_vertice_x [40] = ;
    object_vertice_y [40] = ;
    object_vertice_z [40] = ;
*/


      object_polygon_vertice_count [1] = 5;
      object_vertice_list [1] [1] = 1;
      object_vertice_list [1] [2] = 2;
      object_vertice_list [1] [3] = 6;
      object_vertice_list [1] [4] = 3;
      object_vertice_list [1] [5] = 1;

      object_polygon_vertice_count [2] = 5;
      object_vertice_list [2] [1] = 1;
      object_vertice_list [2] [2] = 4;
      object_vertice_list [2] [3] = 5;
      object_vertice_list [2] [4] = 2;
      object_vertice_list [2] [5] = 1;

      object_polygon_vertice_count [3] = 4;
      object_vertice_list [3] [1] = 1;
      object_vertice_list [3] [2] = 3;
      object_vertice_list [3] [3] = 4;
      object_vertice_list [3] [4] = 1;

      object_polygon_vertice_count [4] = 4;
      object_vertice_list [4] [1] = 6;
      object_vertice_list [4] [2] = 2;
      object_vertice_list [4] [3] = 5;
      object_vertice_list [4] [4] = 6;

      object_polygon_vertice_count [5] = 4;
      object_vertice_list [5] [1] = 6;
      object_vertice_list [5] [2] = 7;
      object_vertice_list [5] [3] = 3;
      object_vertice_list [5] [4] = 6;

      object_polygon_vertice_count [6] = 4;
      object_vertice_list [6] [1] = 3;
      object_vertice_list [6] [2] = 7;
      object_vertice_list [6] [3] = 4;
      object_vertice_list [6] [4] = 3;

      object_polygon_vertice_count [7] = 4;
      object_vertice_list [7] [1] = 4;
      object_vertice_list [7] [2] = 7;
      object_vertice_list [7] [3] = 5;
      object_vertice_list [7] [4] = 4;

      object_polygon_vertice_count [8] = 4;
      object_vertice_list [8] [1] = 6;
      object_vertice_list [8] [2] = 5;
      object_vertice_list [8] [3] = 7;
      object_vertice_list [8] [4] = 6;

      object_polygon_vertice_count [9] = 4;
      object_vertice_list [9] [1] = 8;
      object_vertice_list [9] [2] = 9;
      object_vertice_list [9] [3] = 10;
      object_vertice_list [9] [4] = 8;

      object_polygon_vertice_count [10] = 4;
      object_vertice_list [10] [1] = 9;
      object_vertice_list [10] [2] = 8;
      object_vertice_list [10] [3] = 11;
      object_vertice_list [10] [4] = 9;

      object_polygon_vertice_count [11] = 4;
      object_vertice_list [11] [1] = 9;
      object_vertice_list [11] [2] = 12;
      object_vertice_list [11] [3] = 10;
      object_vertice_list [11] [4] = 9;

      object_polygon_vertice_count [12] = 4;
      object_vertice_list [12] [1] = 12;
      object_vertice_list [12] [2] = 9;
      object_vertice_list [12] [3] = 11;
      object_vertice_list [12] [4] = 12;

      object_polygon_vertice_count [13] = 4;
      object_vertice_list [13] [1] = 10;
      object_vertice_list [13] [2] = 12;
      object_vertice_list [13] [3] = 11;
      object_vertice_list [13] [4] = 10;

      object_polygon_vertice_count [14] = 4;
      object_vertice_list [14] [1] = 13;
      object_vertice_list [14] [2] = 8;
      object_vertice_list [14] [3] = 14;
      object_vertice_list [14] [4] = 13;

      object_polygon_vertice_count [15] = 4;
      object_vertice_list [15] [1] = 8;
      object_vertice_list [15] [2] = 13;
      object_vertice_list [15] [3] = 15;
      object_vertice_list [15] [4] = 8;

      object_polygon_vertice_count [16] = 4;
      object_vertice_list [16] [1] = 16;
      object_vertice_list [16] [2] = 13;
      object_vertice_list [16] [3] = 14;
      object_vertice_list [16] [4] = 16;

      object_polygon_vertice_count [17] = 4;
      object_vertice_list [17] [1] = 16;
      object_vertice_list [17] [2] = 15;
      object_vertice_list [17] [3] = 13;
      object_vertice_list [17] [4] = 16;

      object_polygon_vertice_count [18] = 4;
      object_vertice_list [18] [1] = 16;
      object_vertice_list [18] [2] = 14;
      object_vertice_list [18] [3] = 15;
      object_vertice_list [18] [4] = 16;

      object_polygon_vertice_count [19] = 4;
      object_vertice_list [19] [1] = 17;
      object_vertice_list [19] [2] = 18;
      object_vertice_list [19] [3] = 20;
      object_vertice_list [19] [4] = 17;

      object_polygon_vertice_count [20] = 4;
      object_vertice_list [20] [1] = 17;
      object_vertice_list [20] [2] = 20;
      object_vertice_list [20] [3] = 19;
      object_vertice_list [20] [4] = 17;

      object_polygon_vertice_count [21] = 4;
      object_vertice_list [21] [1] = 23;
      object_vertice_list [21] [2] = 21;
      object_vertice_list [21] [3] = 17;
      object_vertice_list [21] [4] = 23;

      object_polygon_vertice_count [22] = 4;
      object_vertice_list [22] [1] = 17;
      object_vertice_list [22] [2] = 22;
      object_vertice_list [22] [3] = 23;
      object_vertice_list [22] [4] = 17;

      object_polygon_vertice_count [23] = 4;
      object_vertice_list [23] [1] = 8;
      object_vertice_list [23] [2] = 18;
      object_vertice_list [23] [3] = 24;
      object_vertice_list [23] [4] = 8;

      object_polygon_vertice_count [24] = 4;
      object_vertice_list [24] [1] = 8;
      object_vertice_list [24] [2] = 24;
      object_vertice_list [24] [3] = 19;
      object_vertice_list [24] [4] = 8;

      object_polygon_vertice_count [25] = 4;
      object_vertice_list [25] [1] = 24;
      object_vertice_list [25] [2] = 18;
      object_vertice_list [25] [3] = 19;
      object_vertice_list [25] [4] = 24;

      object_polygon_vertice_count [26] = 4;
      object_vertice_list [26] [1] = 21;
      object_vertice_list [26] [2] = 8;
      object_vertice_list [26] [3] = 24;
      object_vertice_list [26] [4] = 21;

      object_polygon_vertice_count [27] = 4;
      object_vertice_list [27] [1] = 8;
      object_vertice_list [27] [2] = 22;
      object_vertice_list [27] [3] = 24;
      object_vertice_list [27] [4] = 8;

      object_polygon_vertice_count [28] = 4;
      object_vertice_list [28] [1] = 24;
      object_vertice_list [28] [2] = 22;
      object_vertice_list [28] [3] = 21;
      object_vertice_list [28] [4] = 24;

/*
      object_polygon_vertice_count [28] = 5;
      object_vertice_list [28] [1] = 33;
      object_vertice_list [28] [2] = 32;
      object_vertice_list [28] [3] = 35;
      object_vertice_list [28] [4] = 34;
      object_vertice_list [28] [5] = 33;
*/


      fp = fopen("bird.obj","w");
 
          /* see the new object count (1) */
          fprintf(fp,"1 %d %d %d %d",
                  this_object_id,
                  two,             
                  object_polygon_count,
                  object_vertice_count);

      for (vertice_id=1L;
           vertice_id <= object_vertice_count; vertice_id++)
            {
            fprintf(fp," %f %f %f",
                    object_vertice_x [vertice_id],
                    object_vertice_y [vertice_id],
                    object_vertice_z [vertice_id]);
            }
      for (polygon_id=1L;
           polygon_id <= object_polygon_count; polygon_id++)
              {
              fprintf(fp," %d",
              object_polygon_vertice_count [polygon_id]);

      for (vlist_id=1L;
       vlist_id <= object_polygon_vertice_count [polygon_id];
        vlist_id++)
                {
                fprintf(fp," %d",
                object_vertice_list [polygon_id] [vlist_id]);
                }
              }
      fclose(fp);
      printf("bbird.obj written\n");
}

