Logo

Programming-Idioms

This language bar is your friend. Select your favorite languages!
point = { x = 123, y = 456 }
type Point is
   record
      X : Float;
      Y : Float;
   end record;
typedef struct {
  double x;
  double y;
} Point;
type point = {
	x: float;
	y: float;
}
[x y]
(vector-of :double x y)
struct Point{
  double x;
  double y;
};
record Point(double x, double y);
(double x, double y)
struct Point
{
    public double x;
    public double y;
};
struct Point{
    double x;
    double y;
}

    
class Point
{
    float x;
    float 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 ]
PointAsAMap = #{x => X, y => Y}.
PointAsATuple = {X, Y}.
-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.
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
}
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 
  }
const point = { x: 1, y: 2 };
var p = { x: 1.122, y: 7.45 };
public record Point(double x, double y) { }
private class Point
{
	private final float x;
	private final float y;
	
	public Point(float x, float y)
	{
		this.x = x;
		this.y = y;
	}
	
	public float getX()
	{
		return this.x;
	}
	
	public float getY()
	{
		return this.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))
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 ];
from dataclasses import dataclass
@dataclass
class Point:
    x: float
    y: float
from collections import namedtuple
Point = namedtuple("Point", "x y")
Point = Struct.new(:x, :y)
struct Point(f64, f64);
struct Point {
    x: f64,
    y: f64,
}
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

New implementation...
< >
programming-idioms.org