Creating implementation for idiom 5 : Create a 2D Point data structure

Idiom

# 5 Create a 2D Point data structure

Created by

Lead paragraph

Declare a container type for two floating-point numbers x and y

New implementation

Language

Imports

Code

Documentation URL

Original attribution URL

Online runnable demo

Username

Be concise.

Be useful.

All contributions dictatorially edited by webmasters to match personal tastes.

Please do not paste any copyright violating material.

Please try to avoid dependencies to third-party libraries and frameworks.

Other implementations

type Point is
   record
      X : Float;
      Y : Float;
   end record;

typedef struct {
  double x;
  double y;
} Point;

type point = {
	x: float;
	y: float;
}

(vector-of :double x y)

[x y]

struct Point{
  double x;
  double y;
};

namespace point {
    double x, y;
}

class point {
    public:
        double x, y;
        point(double x, double y) {
            this->x = x;
            this->y = y;
        }
};

struct point { double x, y; };
point p { .x = 1.2, .y = 3.4 };

struct Point
{
    public double x;
    public double y;
};

(double x, double y)

record Point(double x, double y);

struct Point{
    double x;
    double y;
}

class Point
{
    float x;
    float y;
}

class Point {
  double x, y;
  Point(this.x, this.y);
}

class Point {
  double x, 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}.

PointAsATuple = {X, Y}.

type point
  real :: x
  real :: y
end type point

module x
  type point
  real :: x, y
  end type point
end module x

type Point struct {
    x, y float64
}

Demo

class Point{
  double x
  double y
}

data Point = Point 
  { x :: Double
  , y :: Double 
  }

data Point = Point
  { x :: Double
  , y :: Double
  } deriving (Eq, Ord, Show, Read)

const point = { x: 1, y: 2 };

var p = { x: 1.122, y: 7.45 };

class Point { double x, y; }

class Point{
  double x;
  double y;
}

class Point<T extends Number> {
    T x, y;
    Point(T x, T y) {
        this.x = x;
        this.y = y;
    }
}

public record Point(double x, double y) { }

data class Point(val x: Float, val y: Float)

Demo
Doc

(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 ];

class Point:
    def __init__(self, x, y):
        self.x, self.y = x, y

from collections import namedtuple

Point = namedtuple("Point", "x y")

point = {'x': 1.2, 'y': 3.4}

from dataclasses import dataclass

@dataclass
class Point:
    x: float
    y: float

point = dict(x=1.2, y=3.4)

Point = Struct.new(:x, :y)

struct Point {
    x: f64,
    y: f64,
}

Demo

struct Point(f64, f64);

Demo

case class Point(x: Float, y: Float)

(define (make-point x y)
  (cons x y))
(define (point-x p)
  (car p))
(define (point-y p)
  (cdr p))

Object subclass: #Point
	instanceVariableNames: 'x y'
	classVariableNames: ''
	poolDictionaries: ''
	category: 'Graphics-Primitives'

Structure Point
    Public x As Double
    Public y As Double
End Structure

Preview