/**
  * Applies the <b>(SEND-SKIP)</b> rule to the <code>pNode</code> using the <code>pContext</code>.
  *
  * @param pContext The big step proof pContext.
  * @param pNode The node to apply the <b>(SEND-SKIP)</b> rule to.
  */
 public void applySendSkip(BigStepProofContext pContext, BigStepProofNode pNode) {
   Send send = (Send) pNode.getExpression();
   Row row = (Row) send.getE();
   if (!row.isValue()) {
     throw new IllegalArgumentException("Can not apply SEND-SKIP"); // $NON-NLS-1$
   }
   Expression[] rowExpressions = row.getExpressions();
   Identifier methodName;
   if (rowExpressions[0] instanceof Method) {
     Method method = (Method) rowExpressions[0];
     methodName = method.getId();
   } else if (rowExpressions[0] instanceof CurriedMethod) {
     CurriedMethod curriedMethod = (CurriedMethod) rowExpressions[0];
     methodName = curriedMethod.getIdentifiers()[0];
   } else {
     throw new IllegalArgumentException("Can not apply SEND-SKIP"); // $NON-NLS-1$
   }
   boolean definedLater = false;
   for (int i = 1; i < row.getExpressions().length; i++) {
     Expression rowChild = rowExpressions[i];
     if ((rowChild instanceof Method) && (((Method) rowChild).getId().equals(send.getId()))) {
       definedLater = true;
       break;
     } else if ((rowChild instanceof CurriedMethod)
         && (((CurriedMethod) rowChild).getIdentifiers()[0].equals(send.getId()))) {
       definedLater = true;
       break;
     }
   }
   if ((definedLater) || (!(send.getId().equals(methodName)))) {
     pContext.addProofNode(pNode, new Send(row.tailRow(), send.getId()));
   } else {
     throw new IllegalArgumentException("Can not apply SEND-SKIP"); // $NON-NLS-1$
   }
 }
 /**
  * Applies the <b>(OMEGA)</b> rule to the <code>pNode</code> using the <code>pContext</code>.
  *
  * @param pContext The big step proof pContext.
  * @param pNode The node to apply the <b>(OMEGA)</b> rule to.
  */
 public void applyOmega(BigStepProofContext pContext, BigStepProofNode pNode) {
   Row row = (Row) pNode.getExpression();
   if (!row.isValue()) {
     throw new IllegalArgumentException("Can not apply OMEGA"); // $NON-NLS-1$
   }
   pContext.setProofNodeResult(pNode, row);
 }
 /**
  * Applies the <b>(OBJECT)</b> rule to the <code>pNode</code> using the <code>pContext</code>.
  *
  * @param pContext The big step proof pContext.
  * @param pNode The node to apply the <b>(OBJECT)</b> rule to.
  */
 public void applyObject(BigStepProofContext pContext, BigStepProofNode pNode) {
   ObjectExpr objectExpr = (ObjectExpr) pNode.getExpression();
   Row row = objectExpr.getRow();
   if (row.isValue()) {
     throw new IllegalArgumentException("Can not apply OBJECT"); // $NON-NLS-1$
   }
   pContext.addProofNode(pNode, row);
 }
 /**
  * Applies the <b>(SEND-ATTR)</b> rule to the <code>pNode</code> using the <code>pContext</code>.
  *
  * @param pContext The big step proof pContext.
  * @param pNode The node to apply the <b>(SEND-ATTR)</b> rule to.
  */
 public void applySendAttr(BigStepProofContext pContext, BigStepProofNode pNode) {
   Send send = (Send) pNode.getExpression();
   Row row = (Row) send.getE();
   if (!row.isValue()) {
     throw new IllegalArgumentException("Can not apply SEND-ATTR"); // $NON-NLS-1$
   }
   Expression[] rowExpressions = row.getExpressions();
   Attribute attribute = (Attribute) rowExpressions[0];
   Expression[] newRowExpressions = new Expression[row.getExpressions().length - 1];
   for (int i = 0; i < newRowExpressions.length; i++) {
     newRowExpressions[i] = rowExpressions[i + 1].substitute(attribute.getId(), attribute.getE());
   }
   pContext.addProofNode(pNode, new Send(new Row(newRowExpressions), send.getId()));
 }
 /**
  * Applies the <b>(SEND-EXEC)</b> rule to the <code>pNode</code> using the <code>pContext</code>.
  *
  * @param pContext The big step proof pContext.
  * @param pNode The node to apply the <b>(SEND-EXEC)</b> rule to.
  */
 public void applySendExec(BigStepProofContext pContext, BigStepProofNode pNode) {
   Send send = (Send) pNode.getExpression();
   Row row = (Row) send.getE();
   if (!row.isValue()) {
     throw new IllegalArgumentException("Can not apply SEND-EXEC"); // $NON-NLS-1$
   }
   Expression[] rowExpressions = row.getExpressions();
   Identifier methodName;
   Expression methodExpression;
   if (rowExpressions[0] instanceof Method) {
     Method method = (Method) rowExpressions[0];
     methodExpression = method.getE();
     methodName = method.getId();
   } else if (rowExpressions[0] instanceof CurriedMethod) {
     CurriedMethod curriedMethod = (CurriedMethod) rowExpressions[0];
     methodExpression = curriedMethod.getE();
     Identifier[] identifiers = curriedMethod.getIdentifiers();
     MonoType[] types = curriedMethod.getTypes();
     for (int i = identifiers.length - 1; i > 0; i--) {
       methodExpression = new Lambda(identifiers[i], types[i], methodExpression);
     }
     methodName = identifiers[0];
   } else {
     throw new IllegalArgumentException("Can not apply SEND-EXEC"); // $NON-NLS-1$
   }
   if (!(send.getId().equals(methodName))) {
     throw new IllegalArgumentException("Can not apply SEND-EXEC"); // $NON-NLS-1$
   }
   boolean definedLater = false;
   for (int i = 1; i < row.getExpressions().length; i++) {
     Expression rowChild = rowExpressions[i];
     if ((rowChild instanceof Method) && (((Method) rowChild).getId().equals(send.getId()))) {
       definedLater = true;
       break;
     } else if ((rowChild instanceof CurriedMethod)
         && (((CurriedMethod) rowChild).getIdentifiers()[0].equals(send.getId()))) {
       definedLater = true;
       break;
     }
   }
   if (!definedLater) {
     pContext.addProofNode(pNode, methodExpression);
   } else {
     throw new IllegalArgumentException("Can not apply SEND-EXEC"); // $NON-NLS-1$
   }
 }