/* -------------------------
   Program name "zValue.java"
   h.8.8.10.-h.8.8.12
   by Yoshikazu oonishi
   
   h10.10.9
   updata by nken
   ------------------------- */

public class zValue{
   int ichi,Err;
   double atai,suu,su1,su2;
   char op,op2;
   char xx;
   char yy;
   double a[];

   public zValue()
   {
    a=new double[26];
    for(int i=0; i<26; i++) a[i]=0;
    op='@'; ichi=1; atai=0; xx='x'; yy='y';
    }

   public int getErr()
   {
    return Err;
   }

   public void setHensuu(char c)
   {
    xx=c;
   }
//


   public void setTeisuu(char c, double r)
   {
    int i;
    i=c-'a';
    if(i>=0 && i<26) a[i]=r;
   }

   public double getTeisuu(char c)
   {
    int i;
    i=c-'a';
    if(i>=0 && i<26) return(a[i]); else return(0);
   }

   public double kansuu(String fn, double x) throws Exception
   {
    int i;
    char c;
    double r=0;
    String f;

     f="t:Tan s:Sin c:Cos l:Log e:Exp r:Sqr a:Abs i:Int";
     i=f.indexOf(fn);
     if(i<0) c=' '; else c=f.charAt(i-2);
     
     switch(c)
     {
      case 't': r=Math.tan(x); break;
      case 's': r=Math.sin(x); break;
      case 'c': r=Math.cos(x); break;
      case 'l': r=Math.log(x); break;
      case 'e': r=Math.exp(x); break;
      case 'r': r=Math.sqrt(x); break;
      case 'a': r=Math.abs(x); break;
      case 'i': r=Math.floor(x); break;
      default:  Err=2; r=0; break;
     }
    return(r);
   }

   public void endsyori1() throws Exception
   {
    int i;
    double r;

    switch(op)
    {
     case '@': su1=suu; break;
     case '+':
     case '-':
                  
     if(ichi==1) atai+=su1;
     else
     {
      if(op2=='*') atai+=(su1*su2);
      else atai+=(su1/su2);
     }
                     
     if(op=='+') su1=suu; else su1=-suu;
     ichi=1;
     break;
     case '^':
     
     if(ichi==1) su1=Math.pow(su1,suu);
     else su2=Math.pow(su2,suu);
     break;
     case '*':
     case '/':
     
     if(ichi==2)
     {
      if(op2=='*') su1*=su2; else su1/=su2;
     }
     
     ichi=2; su2=suu;
     op2=op;
     break;
     default: Err=2; break;
    }
   }

   public void endsyori2() throws Exception
   {
    switch(op)
    {
     case '@': atai=suu; break;
     case '+':
     case '-':
     case '^':
     
     if(ichi==1) atai+=su1;
     else
     {
      if(op2=='*') atai+=(su1*su2); else atai+=(su1/su2);
     }
     
     break;
     case '*':
     case '/':
     
     if(op=='*') atai+=(su1*su2); else atai+=(su1/su2);
     
     break;
     default: Err=2; break;
    }
   }

   public double Value(String ss,double x,double y)
   {
    int i,j,len;
    char c,d;
    int deep;
    int bichi;
    double batai,bsu1,bsu2;
    char bop,bop2;
    String fn;
    String s;

    Err=0;
    s=delspace(ss);
    len=s.length();
    op='@'; ichi=1; atai=0; su1=0; su2=0;
    
    try
    {
     for (i=0; i<len; i++)
        {
         c=s.charAt(i);
         
         if(c>='0' && c<='9')
         {
          j=i++;
          
          if(i<len)
          {
           c=s.charAt(i);
           
           while ((((c>='0') && (c<='9')) || (c=='.')) && (++i<len))
                {
                 c=s.charAt(i);
                }
          }
                   
          suu=Double.valueOf(s.substring(j,i--)).doubleValue();
          endsyori1();
         }
                
         else
         
         if(c>='a' && c<='z')
           {
            if(i>0)
              {
               d=s.charAt(i-1);
                     
               if((d==')') || ((d>='0') && (d<='9'))) op='*';
              }
            
            if(c==xx){suu=x;} else if(c==yy){suu=y;} else suu=getTeisuu(c);
            endsyori1();
           }
           else 
           if(c=='(')
             {
              if(i>0)
                {
                 d=s.charAt(i-1);
                 
                 if((d==')') || ((d>='0') && (d<='9')) || ((d>='a') && (d<='z'))) op='*';
                }
              j=i; deep=1;
              
              do
                {
                 c=s.charAt(++i);
                 
                 if(c=='(') ++deep;
                 else if(c==')') --deep;
                }
               while(((c!=')') || (deep!=0)) && (i<len));
                    
               if(deep!=0) Err=3;
               else
                   {
                    bichi=ichi;
                    batai=atai; bsu1=su1; bsu2=su2;
                    bop=op; bop2=op2;
                    suu =Value(s.substring(j+1,i),x,y);
                    ichi=bichi;
                    atai=batai; su1=bsu1; su2=bsu2;
                    op=bop; op2=bop2;
                    endsyori1();
                   }
             }
 
            else
            if(c>='A' && c<='Z')
              {
               if(i>0)
                 {
                  d=s.charAt(i-1);
                  if((d==')') || ((d>='0') && (d<='9')) || ((d>='a') && (d<='z'))) op='*';
                 }
            j=i++;
            if(i<len){
               do{
                  c=s.charAt(i++);
               }while((i<len) && (c>='a') && (c<='z'));
               if(i<len) --i;
            }
            fn=s.substring(j,i);
            if(i<len){
               if(c=='['){
                  j=i; deep=1;
                  do{
                     c=s.charAt(++i);
                     if(c=='[') ++deep;
                     else if(c==']') --deep;
                  }while(((c!=']') || (deep!=0)) && (i<len));
                  if(deep!=0) Err=3;
                  else{
                     bichi=ichi;
                     batai=atai; bsu1=su1; bsu2=su2;
                     bop=op; bop2=op2;
                     suu=Value(s.substring(j+1,i),x,y);
                     ichi=bichi;
                     atai=batai; su1=bsu1; su2=bsu2;
                     op=bop; op2=bop2;
                     suu=kansuu(fn,suu);
                     endsyori1();
                  }
               }
            }
            if(fn.equals("Pi")){
               suu=Math.PI;
               endsyori1();
               --i;
            }else if(fn.equals("E")){
               suu=Math.E;
               endsyori1();
               --i;
            }
         }else{
            op=c;
         }
      }
      endsyori2();
      }catch(Exception e){
         Err=1; atai=0;
      }
      return atai;
   }

   public String delspace(String s){
      String t=new String();
      int l;
      char c;

      l=s.length();
      for(int i=0; i<l; i++){
         c=s.charAt(i);
         if(c != ' ') t+=c;
      }
      return(t);
   }
}