Anonymous user
Polymorphism: Difference between revisions
→{{header|M2000 Interpreter}}
Line 2,309:
Class:
Module PointA {
\\ ? means
Read ? .[x], .[y]
}
Line 2,317:
Operator "=" (n1) {
n=group(n1)
n2=This ' get a copy of this to check n
if valid(@n as n2) else push false :exit
if n.x=.x Then if n.y=.y then if n.r=.r then push true : exit
|