/**
  * Updates the <code>node</code> to which <b>(OBJECT)</b> was applied previously.
  *
  * @param pContext The big step proof context.
  * @param pNode The node to update according to <b>(OBJECT)</b>.
  */
 public void updateObject(BigStepProofContext pContext, BigStepProofNode pNode) {
   if ((pNode.getChildCount() == 1) && (pNode.getChildAt(0).isProven())) {
     ObjectExpr oldObjectExpr = (ObjectExpr) pNode.getExpression();
     Row row = (Row) pNode.getChildAt(0).getResult().getValue();
     pContext.setProofNodeResult(
         pNode, new ObjectExpr(oldObjectExpr.getId(), oldObjectExpr.getTau(), row));
   }
 }
 /**
  * Updates the <code>node</code> to which <b>(SEND)</b> was applied previously.
  *
  * @param pContext The big step proof context.
  * @param pNode The node to update according to <b>(SEND)</b>.
  */
 public void updateSend(BigStepProofContext pContext, BigStepProofNode pNode) {
   if ((pNode.getChildCount() == 1) && (pNode.getChildAt(0).isProven())) {
     Send send = (Send) pNode.getExpression();
     ObjectExpr objectExpr = (ObjectExpr) pNode.getChildAt(0).getResult().getValue();
     Row row = objectExpr.getRow();
     Expression newRow;
     newRow = row.substitute(objectExpr.getId(), objectExpr);
     pContext.addProofNode(pNode, new Send(newRow, send.getId()));
   } else if ((pNode.getChildCount() == 2)
       && (pNode.getChildAt(0).isProven())
       && (pNode.getChildAt(1).isProven())) {
     pContext.setProofNodeResult(pNode, pNode.getChildAt(1).getResult());
   }
 }
 /**
  * Applies the <b>(OBJECT)</b> rule to the
  * <code>node</node> using the <code>context</code>.
  *
  * @param context the minimal typing proof context.
  * @param pNode the minimal typing proof node.
  */
 public void applyObject(MinimalTypingProofContext context, MinimalTypingProofNode pNode) {
   MinimalTypingExpressionProofNode node = (MinimalTypingExpressionProofNode) pNode;
   ObjectExpr object = (ObjectExpr) node.getExpression();
   MonoType tau = object.getTau();
   // check if user entered type for self
   if (tau == null) {
     throw new RuntimeException(
         MessageFormat.format(
             Messages.getString("MinimalTypingException.2"), "self")); // $NON-NLS-1$ //$NON-NLS-2$
   }
   // if type is a rec type, unfold to get a object type
   if (tau instanceof RecType) {
     RecType rec = (RecType) tau;
     tau = rec.getTau().substitute(rec.getTypeName(), rec);
   }
   TypeEnvironment environment = node.getEnvironment();
   environment = environment.star();
   // generate new child node
   context.addProofNode(node, environment.extend(object.getId(), tau), object.getRow());
 }