SPVM::Point3D − Point 3D
use Point3D;
my $point = Point3D−>new;
my $point = Point3D−>new(1, 2, 3);
my $x = $point−>x;
my $y = $point−>y;
my $z = $point−>z;
my $point_string = $point−>to_string;
"Point3D" is a class for a point 3D.
Point is the super class of "Point3D".
"Point3D" inherits the fields of Point.
has z : ro int;
"z".
"static method new : Point3D ($x : int = 0, $y : int = 0, $z : int = 0);"
Creates a new "Point3D" object with $x, $y, $z.
"Point3D" inherits the instance methods of Point.
protected method init : Point3D ($x : int = 0, $y : int = 0, $z : int = 0)
Initializes "x", "y", and "z".
"method clear : void ();"
Sets x, y, and "z" to 0.
"method clone : Point3D ();"
Creates a new "Point3D" object that clones myself.
"method to_string : string ();"
Stringifies "Point3D" object as the following format.
(1,2,3)
"method eq : int ($a : Point, $b : Point);"
If $a is equal to $b, returns 1, otherwise returns 0.
Implementation:
If $a and $b is defined and "x" and "y" fields in $a are equals to "x" and "y" fields in $b, returns 1.
If only $a is not defined, returns 0.
If only $b is not defined, returns 0.
If both $a and $b is not defined, returns 1.
Copyright (c) 2023 Yuki Kimoto
MIT License