package groupscheme.demo;
  /**
    * this file is automatically generated by the jscheme->javac compiler Compiler.scm. 
    * Modify at your own risk!
    */
  import jsint.*;
  import java.lang.reflect.*;
  import java.util.*;
  
  
  public class runGREWP extends jsint.Procedure implements jsint.Function,  Runnable {  
      public int whichcode=0;  // corresponds to a numbering of the toplevel procedures of the program
      public int whichtype=0;  // 0 = user defined procedure, 1 = java literal
      public static final int USER_DEF=0, JAVA_LIT=1;
      public Pair frame;
      public DynamicEnvironment dynEnv;

      public runGREWP() {
          super();
          dynEnv=Scheme.INTERACTION_ENVIRONMENT;
      }
      public runGREWP(int t, int n, Pair f) {
          whichtype = t;
          whichcode = n;
          frame = f;
          dynEnv = Scheme.INTERACTION_ENVIRONMENT;
      }
      public runGREWP(int t, int n, Pair f, DynamicEnvironment d) {
          whichtype = t;
          whichcode = n;
          frame = f;
          dynEnv = d;
      }
  
      private Boolean addImport(String s) {
         jsint.Import.addImport(s);
         return Boolean.TRUE;
      }
  
      public void run() {
        this.invoke(null);
      } 
  
      public Object[] makeArgArray(jsint.Pair args) {
         return new Object[]{args};
      }

      public Object apply(Object[] args) {
      return invoke((Pair)args[0]);
      }
  
      public Object apply(Pair args) {
        return invoke(args);
      }
  
      public Object invoke(Pair args)
      {
        return LCO.eval(invoke1(args));
      }
  
    static Object tmp;
  
  
    public static void load() { 
      new runGREWP().init();
    }

    public static void load(String shellArgs[]) {
       Scheme.INTERACTION_ENVIRONMENT.setValue(Symbol.intern("shellArgs"), shellArgs);
       load();
    }

    public static void main(String shellArgs[]) {
       Symbol main = jsint.Symbol.intern("main");
       load(shellArgs);
       if (main.isDefined())
          {
             DynamicEnvironment dynEnv = Scheme.INTERACTION_ENVIRONMENT;
             ((jsint.Procedure) (dynEnv.getValue(main))).apply(new Pair(shellArgs,Pair.EMPTY));
          }
     }

      public Object invoke1(Pair args) {
      if (whichtype == USER_DEF) {
       switch (whichcode) {

         default: System.exit(0); break;
       }}
      else {
       switch (whichcode) {
          case 0: return(_J0(args)); 
          case 1: return(_J1(args)); 
          case 2: return(_J2(args)); 
          case 3: return(_J3(args)); 
          case 4: return(_J4(args)); 
          case 5: return(_J5(args)); 
          case 6: return(_J6(args)); 
          case 7: return(_J7(args)); 
          case 8: return(_J8(args)); 
          case 9: return(_J9(args)); 

         default: System.exit(0); break;
       }}



      return null;
      }


  
   public void init() {
     Pair Args = null;
     dynEnv.setValue(Symbol.intern("this"), this);
     Class _p = Primitive.class; // this loads the primitives
dynEnv.setValue(Symbol.intern("w"), ((jsint.Procedure) _J0/* javax.swing.JFrame. */).apply(new Pair(_C0,
    Pair.EMPTY)));

((jsint.Procedure) _J1/* .add */).apply(new Pair(((jsint.Procedure) _J2/* .getContentPane */).apply(new Pair(dynEnv.getValue((Symbol)w),
    Pair.EMPTY)),
    new Pair(((jsint.Procedure) _J3/* javax.swing.JLabel. */).apply(new Pair(((jsint.Procedure) dynEnv.getValue((Symbol)_33__123__125_)).apply(new Pair(_C1,
    new Pair(((jsint.Procedure) _J4/* java.util.Date. */).apply(Pair.EMPTY),
    new Pair(_C2,
    Pair.EMPTY)))),
    Pair.EMPTY)),
    Pair.EMPTY)));

((jsint.Procedure) _J5/* .pack */).apply(new Pair(dynEnv.getValue((Symbol)w),
    Pair.EMPTY));

((jsint.Procedure) _J6/* .show */).apply(new Pair(dynEnv.getValue((Symbol)w),
    Pair.EMPTY));

((jsint.Procedure) _J7/* jsint.Scheme.environmentImport */).apply(new Pair(_C3,
    new Pair(_C4,
    Pair.EMPTY)));

((jsint.Procedure) _J8/* .hide */).apply(new Pair(dynEnv.getValue((Symbol)w),
    Pair.EMPTY));

((jsint.Procedure) _J9/* java.lang.Thread.sleep */).apply(new Pair(((jsint.Procedure) dynEnv.getValue((Symbol)_42_)).apply(new Pair(_C5,
    new Pair(_C6,
    new Pair(_C6,
    new Pair(_C7,
    new Pair(_C8,
    new Pair(_C9,
    Pair.EMPTY))))))),
    Pair.EMPTY));

  
   }

 // definitions of global variables 
public static Object w = Symbol.intern("w");


 // definitions of Scheme variables defined externally
   static Object _33__123__125_= Symbol.intern("!{}");

   static Object _42_= Symbol.intern("*");


 // definitions of quoted terms 
   static Object _C0="GREWP";

   static Object _C1="<html><body style=\"font:bold 30pt Helvetica,sans-serif\">\n  Initializing GREWP client.<br>\n  ";

   static Object _C2=" \n  Please wait ......";

   static Object _C3="groupscheme/demo/GREWP.scm";

   static Object _C4="GREWP:";

   static Object _C5=new      Long(1000);

   static Object _C6=new   Integer(60);

   static Object _C7=new   Integer(24);

   static Object _C8=new   Integer(366);

   static Object _C9=new   Integer(100);


 // definitions of embedded lambdas 

 // definitions of java literals

static boolean [][] _moreApplicable__J0/* javax.swing.JFrame. */ = new boolean[][]{ 
{true,false,false,false},
{false,true,false,false},
{false,false,true,false},
{false,false,false,true}

};

public static javax.swing.JFrame _J0/* javax.swing.JFrame. */(Pair args){
int numargs = args.length();
javax.swing.JFrame 
    tmp=null;  // return type, for methods
    int b= -1; // index of best matching method/constructor

if ((numargs== 0)
        &&
       ((b== -1) || (_moreApplicable__J0/* javax.swing.JFrame. */[ 0][b]))
        &&
       (true)) 
       { b = 0;}
   
    if ((numargs== 1)
        &&
       ((b== -1) || (_moreApplicable__J0/* javax.swing.JFrame. */[ 1][b]))
        &&
       ((args.nth(0) instanceof java.awt.GraphicsConfiguration))) 
       { b = 1;}
   
    if ((numargs== 1)
        &&
       ((b== -1) || (_moreApplicable__J0/* javax.swing.JFrame. */[ 2][b]))
        &&
       ((args.nth(0) instanceof java.lang.String))) 
       { b = 2;}
   
    if ((numargs== 2)
        &&
       ((b== -1) || (_moreApplicable__J0/* javax.swing.JFrame. */[ 3][b]))
        &&
       ((args.nth(0) instanceof java.lang.String) &&
        (args.nth(1) instanceof java.awt.GraphicsConfiguration))) 
       { b = 3;}
   
    
try {
switch (b) {  
   // jump to the best matching method/constructor
    case 0: return new javax.swing.JFrame(); 
    case 1: return new javax.swing.JFrame(
            (java.awt.GraphicsConfiguration) args.nth(0) ); 
    case 2: return new javax.swing.JFrame(
            (java.lang.String) args.nth(0) ); 
    case 3: return new javax.swing.JFrame(
            (java.lang.String) args.nth(0),
            (java.awt.GraphicsConfiguration) args.nth(1) ); 

   default: // error
}
} catch(Exception e) {throw new JschemeThrowable(e);}; 
 return tmp;
}

static Object _J0/* javax.swing.JFrame. */ = new runGREWP( JAVA_LIT, 0/* javax.swing.JFrame.*/, Pair.EMPTY);

public static Object _J1/* .add */(Pair Args){
  return (((jsint.Procedure)_J1/* .add */).apply(Args));}
static Object _J1/* .add */ = new JavaMethod("add", null, false);

public static Object _J2/* .getContentPane */(Pair Args){
  return (((jsint.Procedure)_J2/* .getContentPane */).apply(Args));}
static Object _J2/* .getContentPane */ = new JavaMethod("getContentPane", null, false);


static boolean [][] _moreApplicable__J3/* javax.swing.JLabel. */ = new boolean[][]{ 
{true,false,false,false,false,false},
{false,true,false,false,false,false},
{false,false,true,false,false,false},
{false,false,false,true,false,false},
{false,false,false,false,true,false},
{false,false,false,false,false,true}

};

public static javax.swing.JLabel _J3/* javax.swing.JLabel. */(Pair args){
int numargs = args.length();
javax.swing.JLabel 
    tmp=null;  // return type, for methods
    int b= -1; // index of best matching method/constructor

if ((numargs== 3)
        &&
       ((b== -1) || (_moreApplicable__J3/* javax.swing.JLabel. */[ 0][b]))
        &&
       ((args.nth(0) instanceof java.lang.String) &&
        (args.nth(1) instanceof javax.swing.Icon) &&
        (args.nth(2) instanceof java.lang.Integer))) 
       { b = 0;}
   
    if ((numargs== 2)
        &&
       ((b== -1) || (_moreApplicable__J3/* javax.swing.JLabel. */[ 1][b]))
        &&
       ((args.nth(0) instanceof java.lang.String) &&
        (args.nth(1) instanceof java.lang.Integer))) 
       { b = 1;}
   
    if ((numargs== 1)
        &&
       ((b== -1) || (_moreApplicable__J3/* javax.swing.JLabel. */[ 2][b]))
        &&
       ((args.nth(0) instanceof java.lang.String))) 
       { b = 2;}
   
    if ((numargs== 2)
        &&
       ((b== -1) || (_moreApplicable__J3/* javax.swing.JLabel. */[ 3][b]))
        &&
       ((args.nth(0) instanceof javax.swing.Icon) &&
        (args.nth(1) instanceof java.lang.Integer))) 
       { b = 3;}
   
    if ((numargs== 1)
        &&
       ((b== -1) || (_moreApplicable__J3/* javax.swing.JLabel. */[ 4][b]))
        &&
       ((args.nth(0) instanceof javax.swing.Icon))) 
       { b = 4;}
   
    if ((numargs== 0)
        &&
       ((b== -1) || (_moreApplicable__J3/* javax.swing.JLabel. */[ 5][b]))
        &&
       (true)) 
       { b = 5;}
   
    
try {
switch (b) {  
   // jump to the best matching method/constructor
    case 0: return new javax.swing.JLabel(
            (java.lang.String) args.nth(0),
            (javax.swing.Icon) args.nth(1),
            (((Integer) (args.nth(2))).intValue()) ); 
    case 1: return new javax.swing.JLabel(
            (java.lang.String) args.nth(0),
            (((Integer) (args.nth(1))).intValue()) ); 
    case 2: return new javax.swing.JLabel(
            (java.lang.String) args.nth(0) ); 
    case 3: return new javax.swing.JLabel(
            (javax.swing.Icon) args.nth(0),
            (((Integer) (args.nth(1))).intValue()) ); 
    case 4: return new javax.swing.JLabel(
            (javax.swing.Icon) args.nth(0) ); 
    case 5: return new javax.swing.JLabel(); 

   default: // error
}
} catch(Exception e) {throw new JschemeThrowable(e);}; 
 return tmp;
}

static Object _J3/* javax.swing.JLabel. */ = new runGREWP( JAVA_LIT, 3/* javax.swing.JLabel.*/, Pair.EMPTY);


static boolean [][] _moreApplicable__J4/* java.util.Date. */ = new boolean[][]{ 
{true,false,false,false,false,false},
{false,true,false,false,false,false},
{false,false,true,false,false,false},
{false,false,false,true,false,false},
{false,false,false,false,true,false},
{false,false,false,false,false,true}

};

public static java.util.Date _J4/* java.util.Date. */(Pair args){
int numargs = args.length();
java.util.Date 
    tmp=null;  // return type, for methods
    int b= -1; // index of best matching method/constructor

if ((numargs== 0)
        &&
       ((b== -1) || (_moreApplicable__J4/* java.util.Date. */[ 0][b]))
        &&
       (true)) 
       { b = 0;}
   
    if ((numargs== 1)
        &&
       ((b== -1) || (_moreApplicable__J4/* java.util.Date. */[ 1][b]))
        &&
       ((args.nth(0) instanceof java.lang.Long))) 
       { b = 1;}
   
    if ((numargs== 3)
        &&
       ((b== -1) || (_moreApplicable__J4/* java.util.Date. */[ 2][b]))
        &&
       ((args.nth(0) instanceof java.lang.Integer) &&
        (args.nth(1) instanceof java.lang.Integer) &&
        (args.nth(2) instanceof java.lang.Integer))) 
       { b = 2;}
   
    if ((numargs== 5)
        &&
       ((b== -1) || (_moreApplicable__J4/* java.util.Date. */[ 3][b]))
        &&
       ((args.nth(0) instanceof java.lang.Integer) &&
        (args.nth(1) instanceof java.lang.Integer) &&
        (args.nth(2) instanceof java.lang.Integer) &&
        (args.nth(3) instanceof java.lang.Integer) &&
        (args.nth(4) instanceof java.lang.Integer))) 
       { b = 3;}
   
    if ((numargs== 6)
        &&
       ((b== -1) || (_moreApplicable__J4/* java.util.Date. */[ 4][b]))
        &&
       ((args.nth(0) instanceof java.lang.Integer) &&
        (args.nth(1) instanceof java.lang.Integer) &&
        (args.nth(2) instanceof java.lang.Integer) &&
        (args.nth(3) instanceof java.lang.Integer) &&
        (args.nth(4) instanceof java.lang.Integer) &&
        (args.nth(5) instanceof java.lang.Integer))) 
       { b = 4;}
   
    if ((numargs== 1)
        &&
       ((b== -1) || (_moreApplicable__J4/* java.util.Date. */[ 5][b]))
        &&
       ((args.nth(0) instanceof java.lang.String))) 
       { b = 5;}
   
    
try {
switch (b) {  
   // jump to the best matching method/constructor
    case 0: return new java.util.Date(); 
    case 1: return new java.util.Date(
            (((Long) (args.nth(0))).longValue()) ); 
    case 2: return new java.util.Date(
            (((Integer) (args.nth(0))).intValue()),
            (((Integer) (args.nth(1))).intValue()),
            (((Integer) (args.nth(2))).intValue()) ); 
    case 3: return new java.util.Date(
            (((Integer) (args.nth(0))).intValue()),
            (((Integer) (args.nth(1))).intValue()),
            (((Integer) (args.nth(2))).intValue()),
            (((Integer) (args.nth(3))).intValue()),
            (((Integer) (args.nth(4))).intValue()) ); 
    case 4: return new java.util.Date(
            (((Integer) (args.nth(0))).intValue()),
            (((Integer) (args.nth(1))).intValue()),
            (((Integer) (args.nth(2))).intValue()),
            (((Integer) (args.nth(3))).intValue()),
            (((Integer) (args.nth(4))).intValue()),
            (((Integer) (args.nth(5))).intValue()) ); 
    case 5: return new java.util.Date(
            (java.lang.String) args.nth(0) ); 

   default: // error
}
} catch(Exception e) {throw new JschemeThrowable(e);}; 
 return tmp;
}

static Object _J4/* java.util.Date. */ = new runGREWP( JAVA_LIT, 4/* java.util.Date.*/, Pair.EMPTY);

public static Object _J5/* .pack */(Pair Args){
  return (((jsint.Procedure)_J5/* .pack */).apply(Args));}
static Object _J5/* .pack */ = new JavaMethod("pack", null, false);

public static Object _J6/* .show */(Pair Args){
  return (((jsint.Procedure)_J6/* .show */).apply(Args));}
static Object _J6/* .show */ = new JavaMethod("show", null, false);


static boolean [][] _moreApplicable__J7/* jsint.Scheme.environmentImport */ = new boolean[][]{ 
{true}

};

public static Object _J7/* jsint.Scheme.environmentImport */(Pair args){
int numargs = args.length();
Object 
    tmp=null;  // return type, for methods
    int b= -1; // index of best matching method/constructor

if ((numargs== 2)
        &&
       ((b== -1) || (_moreApplicable__J7/* jsint.Scheme.environmentImport */[ 0][b]))
        &&
       ((args.nth(0) instanceof java.lang.Object) &&
        (args.nth(1) instanceof java.lang.Object))) 
       { b = 0;}
   
    
try {
switch (b) {  
   // jump to the best matching method/constructor
    case 0: return jsint.Scheme.environmentImport(
            (java.lang.Object) args.nth(0),
            (java.lang.Object) args.nth(1) ); 

   default: // error
}
} catch(Exception e) {throw new JschemeThrowable(e);}; 
 return tmp;
}

static Object _J7/* jsint.Scheme.environmentImport */ = new runGREWP( JAVA_LIT, 7/* jsint.Scheme.environmentImport*/, Pair.EMPTY);

public static Object _J8/* .hide */(Pair Args){
  return (((jsint.Procedure)_J8/* .hide */).apply(Args));}
static Object _J8/* .hide */ = new JavaMethod("hide", null, false);


static boolean [][] _moreApplicable__J9/* java.lang.Thread.sleep */ = new boolean[][]{ 
{true,false},
{false,true}

};

public static Object _J9/* java.lang.Thread.sleep */(Pair args){
int numargs = args.length();
Object 
    tmp=null;  // return type, for methods
    int b= -1; // index of best matching method/constructor

if ((numargs== 1)
        &&
       ((b== -1) || (_moreApplicable__J9/* java.lang.Thread.sleep */[ 0][b]))
        &&
       ((args.nth(0) instanceof java.lang.Long))) 
       { b = 0;}
   
    if ((numargs== 2)
        &&
       ((b== -1) || (_moreApplicable__J9/* java.lang.Thread.sleep */[ 1][b]))
        &&
       ((args.nth(0) instanceof java.lang.Long) &&
        (args.nth(1) instanceof java.lang.Integer))) 
       { b = 1;}
   
    
try {
switch (b) {  
   // jump to the best matching method/constructor
    case 0: java.lang.Thread.sleep(
            (((Long) (args.nth(0))).longValue()) ); break; 
    case 1: java.lang.Thread.sleep(
            (((Long) (args.nth(0))).longValue()),
            (((Integer) (args.nth(1))).intValue()) ); break; 

   default: // error
}
} catch(Exception e) {throw new JschemeThrowable(e);}; 
 return tmp;
}

static Object _J9/* java.lang.Thread.sleep */ = new runGREWP( JAVA_LIT, 9/* java.lang.Thread.sleep*/, Pair.EMPTY);


    //static { new runGREWP().init();}
    }