public static SCode Make(Primitive2 rator, LexicalVariable rand0, SCode rand1)
{
return
((rand0 is Argument) ? PrimitiveIsObjectEqA.Make(rator, (Argument)rand0, rand1)
: (rand0 is LexicalVariable1) ? PrimitiveIsObjectEqL1.Make(rator, (LexicalVariable1)rand0, rand1)
: (rand1 is LexicalVariable) ? Unimplemented()
: (rand1 is Quotation) ? PrimitiveIsObjectEqLQ.Make(rator, rand0, (Quotation)rand1)
: new PrimitiveIsObjectEqL(rator, rand0, rand1));
}
public static SCode Make(PrimitiveIsObjectEqLQ predicate, SCode consequent, LexicalVariable alternative)
{
return
(alternative is Argument) ? Unimplemented () :
(alternative is LexicalVariable1) ? Unimplemented() :
new PCondIsObjectEqLQSL (predicate, consequent, alternative);
}
protected PCondIsObjectEqLQSL(PrimitiveIsObjectEqLQ predicate, SCode consequent, LexicalVariable alternative)
: base(predicate, consequent, alternative)
{
this.alternativeName = alternative.Name;
this.alternativeDepth = alternative.Depth;
this.alternativeOffset = alternative.Offset;
}
public static SCode Make(PrimitiveIsObjectEqLQ predicate, Quotation consequent, SCode alternative)
{
return
(alternative is LexicalVariable) ? PCondIsObjectEqLQQL.Make (predicate, consequent, (LexicalVariable) alternative) :
(alternative is Quotation) ? Unimplemented () :
new PCondIsObjectEqLQQ (predicate, consequent, alternative);
}
protected PCondIsObjectEqLQQ(PrimitiveIsObjectEqLQ predicate, Quotation consequent, SCode alternative)
: base(predicate, consequent, alternative)
{
this.consequentValue = consequent.Quoted;
}
public static SCode Make(PrimitiveIsObjectEqLQ predicate, LexicalVariable consequent, Quotation alternative)
{
return
new PCondIsObjectEqLQLQ (predicate, consequent, alternative);
}
protected PCondIsObjectEqLQLQ(PrimitiveIsObjectEqLQ predicate, LexicalVariable consequent, Quotation alternative)
: base(predicate, consequent, alternative)
{
}
protected PCondIsObjectEqLQL1(PrimitiveIsObjectEqLQ predicate, LexicalVariable1 consequent, SCode alternative)
: base(predicate, consequent, alternative)
{
}
public static SCode Make(PrimitiveIsObjectEqLQ predicate, LexicalVariable consequent, SCode alternative)
{
return
(consequent is Argument) ? Unimplemented() :
(consequent is LexicalVariable1) ? PCondIsObjectEqLQL1.Make (predicate, (LexicalVariable1) consequent, alternative) :
(alternative is LexicalVariable) ? Unimplemented () :
(alternative is Quotation) ? PCondIsObjectEqLQLQ.Make (predicate, consequent, (Quotation) alternative) :
new PCondIsObjectEqLQL (predicate, consequent, alternative);
}
protected PCondIsObjectEqLQL(PrimitiveIsObjectEqLQ predicate, LexicalVariable consequent, SCode alternative)
: base(predicate, consequent, alternative)
{
this.consequentName = consequent.Name;
this.consequentDepth = consequent.Depth;
this.consequentOffset = consequent.Offset;
}
protected PCondIsObjectEqLQ(PrimitiveIsObjectEqLQ predicate, SCode consequent, SCode alternative)
: base(predicate, consequent, alternative)
{
this.rand1Value = predicate.rand1Value;
}
