Academic Integrity: tutoring, explanations, and feedback — we don’t complete graded work or submit on a student’s behalf.

/*******************************************************************************

ID: 3690988 • Letter: #

Question

/************************************************************************************
*
*         CSC220 Programming Project#2
*
* Specification:
*
* Taken from Project 7, Chapter 5, Page 178
* I have modified specification and requirements of this project
*
* Ref: http://www.gigamonkeys.com/book/ (see chap. 10)
* http://joeganley.com/code/jslisp.html (GUI)
*
* In the language Lisp, each of the four basic arithmetic operators appears
* before an arbitrary number of operands, which are separated by spaces.
* The resulting expression is enclosed in parentheses. The operators behave
* as follows:
*
* (+ a b c ...) returns the sum of all the operands, and (+ a) returns a.
*
* (- a b c ...) returns a - b - c - ..., and (- a) returns -a.
*
* (* a b c ...) returns the product of all the operands, and (* a) returns a.
*
* (/ a b c ...) returns a / b / c / ..., and (/ a) returns 1/a.
*
* Note: + * - / must have at least one operand
*
* You can form larger arithmetic expressions by combining these basic
* expressions using a fully parenthesized prefix notation.
* For example, the following is a valid Lisp expression:
*
*    (+ (- 6) (* 2 3 4) (/ (+ 3) (* 1) (- 2 3 1)) (+ 1))
*
* This expression is evaluated successively as follows:
*
*   (+ (- 6) (* 2 3 4) (/ 3 1 -2) (+ 1))
*   (+ -6 24 -1.5 1.0)
*   17.5
*
* Requirements:
*
* - Design and implement an algorithm that uses LinkedStack class to evaluate a
* valid Lisp expression composed of the four basic operators and integer values.
* - Valid tokens in an expression are '(',')','+','-','*','/',and positive integers (>=0)
* - Display result as floting point number with at 2 decimal places
* - Negative number is not a valid "input" operand, e.g. (+ -2 3)
* However, you may create a negative number using parentheses, e.g. (+ (-2)3)
* - There may be any number of blank spaces, >= 0, in between tokens
* Thus, the following expressions are valid:
*    (+ (-6)3)
*    (/(+20 30))
*
* - Must use LinkedStack class in this project. (*** DO NOT USE Java API Stack class ***)
* - Must throw LispExpressionException to indicate errors
* - Must not add new or modify existing data fields
* - Must implement these methods in LispExpressionEvaluator class:
*
*    public LispExpressionEvaluator()
*    public LispExpressionEvaluator(String inputExpression)
* public void reset(String inputExpression)
* public double evaluate()
* private void evaluateCurrentOperation()
*
* - You may add new private methods
*
*************************************************************************************/

package PJ2;
import java.util.*;

public class LispExpressionEvaluator
{
// Current input Lisp expression
private String currentExpr;

// Main expression stack, see algorithm in evaluate()
private LinkedStack<Object> tokensStack;
private LinkedStack<Double> currentOpStack;


// default constructor
// set currentExpr to ""
// create LinkedStack objects
public LispExpressionEvaluator()
{
   // add statements
}

// constructor with an input expression
// set currentExpr to inputExpression
// create LinkedStack objects
public LispExpressionEvaluator(String inputExpression)
{
   // add statements
}

// set currentExpr to inputExpression
// clear stack objects
public void reset(String inputExpression)
{
   // add statements
}

// This function evaluates current operator with its operands
// See complete algorithm in evaluate()
//
// Main Steps:
//        Pop operands from tokensStack and push them onto
//            currentOpStack until you find an operator
//     Apply the operator to the operands on currentOpStack
// Push the result into tokensStack
//
private void evaluateCurrentOperation()
{
   // add statements
}


/**
* This funtion evaluates current Lisp expression in currentExpr
* It return result of the expression
*
* The algorithm:
*
* Step 1 Scan the tokens in the string.
* Step 2       If you see an operand, push operand object onto the tokensStack
* Step 3         If you see "(", next token should be an operator
* Step 4         If you see an operator, push operator object onto the tokensStack
* Step 5       If you see ")" // steps in evaluateCurrentOperation() :
* Step 6           Pop operands and push them onto currentOpStack
*                    until you find an operator
* Step 7           Apply the operator to the operands on currentOpStack
* Step 8           Push the result into tokensStack
* Step 9 If you run out of tokens, the value on the top of tokensStack is
* is the result of the expression.
*/
public double evaluate()
{
// only outline is given...
// you need to add statements/local variables
// you may delete or modify any statements in this method

// use scanner to tokenize currentExpr
Scanner currentExprScanner = new Scanner(currentExpr);
  
// Use zero or more white space as delimiter,
// which breaks the string into single character tokens
currentExprScanner = currentExprScanner.useDelimiter("\s*");

// Step 1: Scan the tokens in the string.
while (currentExprScanner.hasNext())
{
      
    // Step 2: If you see an operand, push operand object onto the tokensStack
if (currentExprScanner.hasNextInt())
{
// This force scanner to grab all of the digits
// Otherwise, it will just get one char
String dataString = currentExprScanner.findInLine("\d+");

        // more ...
}
else
{
// Get next token, only one char in string token
String aToken = currentExprScanner.next();
//System.out.println("Other: " + aToken);
char item = aToken.charAt(0);
  
switch (item)
{
        // Step 3: If you see "(", next token shoube an operator
        // Step 4: If you see an operator, push operator object onto the tokensStack
        // Step 5: If you see ")" // steps in evaluateCurrentOperation() :
default: // error
throw new LispExpressionException(item + " is not a legal expression operator");
} // end switch
} // end else
} // end while
  
// Step 9: If you run out of tokens, the value on the top of tokensStack is
// is the result of the expression.
//
// return result

   return 0.0; // return result
}
  

//=====================================================================
// DO NOT MODIFY ANY STATEMENTS BELOW
// Quick test is defined in main()
//=====================================================================

// This static method is used by main() only
private static void evaluateExprTest(String s, LispExpressionEvaluator expr, String expect)
{
Double result;
System.out.println("Expression " + s);
System.out.printf("Expected result : %s ", expect);
   expr.reset(s);
try {
result = expr.evaluate();
System.out.printf("Evaluated result : %.2f ", result);
}
catch (LispExpressionException e) {
System.out.println("Evaluated result :"+e);
}
  
System.out.println("-----------------------------");
}

// define few test cases, exception may happen
public static void main (String args[])
{
LispExpressionEvaluator expr= new LispExpressionEvaluator();
//expr.setDebug();
String test1 = "(+ (- 6) (* 2 3 4) (/ (+ 3) (* 1) (- 2 3 1)) (+ 1))";
String test2 = "(+ (- 632) (* 21 3 4) (/ (+ 32) (* 1) (- 21 3 1)) (+ 0))";
String test3 = "(+ (/ 2) (* 2) (/ (+ 1) (+ 1) (- 2 1 ))(* 1))";
String test4 = "(+ (/2)(+ 1))";
String test5 = "(+ (/2 3 0))";
String test6 = "(+ (/ 2) (* 2) (/ (+ 1) (+ 3) (- 2 1 ))))";
String test7 = "(+ (*))";
String test8 = "(+ (- 6) (* 2 3 4) (/ (+ 3) (* 1) (- 2 3 1)) (+ ))";
   evaluateExprTest(test1, expr, "17.50");
   evaluateExprTest(test2, expr, "-378.12");
   evaluateExprTest(test3, expr, "4.50");
   evaluateExprTest(test4, expr, "1.5");
   evaluateExprTest(test5, expr, "Infinity or LispExpressionException");
   evaluateExprTest(test6, expr, "LispExpressionException");
   evaluateExprTest(test7, expr, "LispExpressionException");
   evaluateExprTest(test8, expr, "LispExpressionException");
}
}

Explanation / Answer

package PJ2;
import java.util.*;
public class LispExpressionEvaluator
{
// Current input Lisp expression
private String currentExpr;
// Main expression stack, see algorithm in evaluate()
private LinkedStack<Object> tokensStack;
private LinkedStack<Double> currentOpStack;

// default constructor
// set currentExpr to ""
// create LinkedStack objects
public LispExpressionEvaluator()
{
currentExpr = "";
tokensStack = new LinkedStack<Object>();
currentOpStack = new LinkedStack<Double>();
}
// constructor with an input expression
// set currentExpr to inputExpression
// create LinkedStack objects
public LispExpressionEvaluator(String inputExpression)
{
if (inputExpression == NULL)
{
throw new LispExpressionEvaluatorException();
}
currentExpr = inputExpression;
exprStack = new LinkedStack<Object>();
currentOpStack = new LinkedStack<Double>();
}
// set currentExpr to inputExpression
// clear stack objects
public void reset(String inputExpression)
{
if (inputExpression == NULL)
{
throw new LispExpressionException();
}
currentExpr = inputExpression;
tokensStack.clear();
currentOpStack.clear();
}
// This function evaluates current operator with its operands
// See complete algorithm in evaluate()
//
// Main Steps:
// Pop operands from tokensStack and push them onto
// currentOpStack until you find an operator
// Apply the operator to the operands on currentOpStack
// Push the result into tokensStack
//
private void evaluateCurrentOperation()
{
String currentOperation;
boolean numric = true;
do{
currentOperation = (String.valueOf(exprStack.pop()));

try{
Double numbr = Double.parseDouble(currentOperation);
currentOpStack.push(numbr);

}catch(numbrFormatException nfe){
numric = false;
}
} while(numric);


double solution;
switch (currentOperation) {
case "*":
solution = currentOpStack.pop();
while(!currentOpStack.isEmpty()){
solution *= currentOpStack.pop();
}
break;
case "/":
solution = currentOpStack.pop();
while(!currentOpStack.isEmpty()){
solution /= currentOpStack.pop();
}
break;
case "+":
solution = currentOpStack.pop();
while(!currentOpStack.isEmpty()){
solution += currentOpStack.pop();
}
break;
case "-":
solution = currentOpStack.pop();
while(!currentOpStack.isEmpty()){
solution -= currentOpStack.pop();
}
break;

default:
solution = currentOpStack.pop();
break;
}

exprStack.push(solution);
}

/**
* This funtion evaluates current Lisp expression in currentExpr
* It return result of the expression
*
* The algorithm:
*
* Step 1 Scan the tokens in the string.
* Step 2 If you see an operand, push operand object onto the tokensStack
* Step 3 If you see "(", next token should be an operator
* Step 4 If you see an operator, push operator object onto the tokensStack
* Step 5 If you see ")" // steps in evaluateCurrentOperation() :
* Step 6 Pop operands and push them onto currentOpStack
* until you find an operator
* Step 7 Apply the operator to the operands on currentOpStack
* Step 8 Push the result into tokensStack
* Step 9 If you run out of tokens, the value on the top of tokensStack is
* is the result of the expression.
*/
public double evaluate()
{
// only outline is given...
// you need to add statements/local variables
// you may delete or modify any statements in this method
// use scanner to tokenize currentExpr
Scanner currentExprScanner = new Scanner(currentExpr);
  
// Use zero or more white space as delimiter,
// which breaks the string into single character tokens
currentExprScanner = currentExprScanner.useDelimiter("\s*");
// Step 1: Scan the tokens in the string.
while (currentExprScanner.hasNext())
{
  
// Step 2: If you see an operand, push operand object onto the tokensStack
if (currentExprScanner.hasNextInt())
{
// This force scanner to grab all of the digits
// Otherwise, it will just get one char
String dataString = currentExprScanner.findInLine("\d+");
// more ...
   String dataString = inputExprScanner.findInLine("\d+");
}
else
{
// Get next token, only one char in string token
String aToken = currentExprScanner.next();
//System.out.println("Other: " + aToken);
char item = aToken.charAt(0);
  
switch (item)
{
       switch (item)
{
case '(':
break;

case ')':
evaluateCurrentOperation();
break;

case'*':
exprStack.push("*");
break;

case'+':
exprStack.push("+");
break;

case'/':
exprStack.push("/");
break;

case'-':
exprStack.push("-");
break;

// Step 3: If you see "(", next token shoube an operator
// Step 4: If you see an operator, push operator object onto the tokensStack
// Step 5: If you see ")" // steps in evaluateCurrentOperation() :
default: // error
throw new LispExpressionException(item + " is not a legal expression operator");
} // end switch
} // end else
} // end while
  
// Step 9: If you run out of tokens, the value on the top of tokensStack is
// is the result of the expression.
//
// return result

return Double.parseDouble(String.valueOf(exprStack.pop())); // return result
}
  
//=====================================================================
// DO NOT MODIFY ANY STATEMENTS BELOW
// Quick test is defined in main()
//=====================================================================
// This static method is used by main() only
private static void evaluateExprTest(String s, LispExpressionEvaluator expr, String expect)
{
Double result;
System.out.println("Expression " + s);
System.out.printf("Expected result : %s ", expect);
expr.reset(s);
try {
result = expr.evaluate();
System.out.printf("Evaluated result : %.2f ", result);
}
catch (LispExpressionException e) {
System.out.println("Evaluated result :"+e);
}
  
System.out.println("-----------------------------");
}
// define few test cases, exception may happen
public static void main (String args[])
{
LispExpressionEvaluator expr= new LispExpressionEvaluator();
//expr.setDebug();
String test1 = "(+ (- 6) (* 2 3 4) (/ (+ 3) (* 1) (- 2 3 1)) (+ 1))";
String test2 = "(+ (- 632) (* 21 3 4) (/ (+ 32) (* 1) (- 21 3 1)) (+ 0))";
String test3 = "(+ (/ 2) (* 2) (/ (+ 1) (+ 1) (- 2 1 ))(* 1))";
String test4 = "(+ (/2)(+ 1))";
String test5 = "(+ (/2 3 0))";
String test6 = "(+ (/ 2) (* 2) (/ (+ 1) (+ 3) (- 2 1 ))))";
String test7 = "(+ (*))";
String test8 = "(+ (- 6) (* 2 3 4) (/ (+ 3) (* 1) (- 2 3 1)) (+ ))";
evaluateExprTest(test1, expr, "17.50");
evaluateExprTest(test2, expr, "-378.12");
evaluateExprTest(test3, expr, "4.50");
evaluateExprTest(test4, expr, "1.5");
evaluateExprTest(test5, expr, "Infinity or LispExpressionException");
evaluateExprTest(test6, expr, "LispExpressionException");
evaluateExprTest(test7, expr, "LispExpressionException");
evaluateExprTest(test8, expr, "LispExpressionException");
}
}