/* --------------------------------------------------
 * Abstract Grammar for the integer list problem
 */

#ifndef _ListGA
#define _ListGA

typedef struct sList
{
  int flag;
  union {
    struct {
      } p0;
    struct {
      int n;
      struct sList *l;
      } p1;
  } u;
} *List;


#define P0 2001
#define P1 2002

List cons_P0();
List cons_P1(int n, List l);

#endif