(define (make-point x y)
(cons x y))
(define (point-x p)
(car p))
(define (point-y p)
(cdr p))
type Point is
record
X : Float;
Y : Float;
end record;
typedef struct {
double x;
double y;
} Point;
type point = {
x: float;
y: float;
}
struct Point{
double x;
double y;
};
record Point(double x, double y);
struct Point
{
public double x;
public double y;
};
class Point
{
float x;
float y;
}
struct Point{
double x;
double y;
}
class Point {
double x, y;
}
class Point {
double x, y;
Point(this.x, this.y);
}
{x, y}
defmodule Point do
defstruct x: 0.0, y: 0.0
end
p = [ x: 1.122, y: 7.45 ]
-module(points).
-export([new/2, x/1, y/1]).
-opaque point() :: #{x => float(), y => float()}.
-export_type([point/0]).
-spec new(float(), float()) -> point().
new(X, Y) -> #{x => X, y => Y}.
-spec x(point()) -> float().
x(#{x := X}) -> X.
-spec y(point()) -> float().
y(#{y := Y}) -> Y.
PointAsAMap = #{x => X, y => Y}.
module x
type point
real :: x, y
end type point
end module x
type point
real :: x
real :: y
end type point
type Point struct {
x, y float64
}
class Point{
double x
double y
}
data Point = Point
{ x :: Double
, y :: Double
} deriving (Eq, Ord, Show, Read)
data Point = Point
{ x :: Double
, y :: Double
}
var p = { x: 1.122, y: 7.45 };
const point = { x: 1, y: 2 };
record Point<T extends Number>(T x, T y) {}
public record Point(double x, double y) { }
class Point { double x, y; }
class Point{
double x;
double y;
}
data class Point(val x: Float, val y: Float)
(defstruct point
(x 0.0d0 :type double-float)
(y 0.0d0 :type double-float))
point = { x = 123, y = 456 }
typedef struct {
double x,y;
} NSPoint;
class Point
{
/** @var float */
public $x = 0.0;
/** @var float */
public $y = 0.0;
}
Type
TPoint = Record
x : Double;
y : Double;
End;
my $point = { x => 1, y => 2 };
my $point = [ 1.5, 6.3 ];
point = {'x': 1.2, 'y': 3.4}
@dataclass
class Point:
x: float
y: float
Point = namedtuple("Point", "x y")
class Point:
def __init__(self, x, y):
self.x, self.y = x, y
point = dict(x=1.2, y=3.4)
Point = Struct.new(:x, :y)
struct Point {
x: f64,
y: f64,
}
case class Point(x: Float, y: Float)
Object subclass: #Point
instanceVariableNames: 'x y'
classVariableNames: ''
poolDictionaries: ''
category: 'Graphics-Primitives'
Structure Point
Public x As Double
Public y As Double
End Structure
