--  Programmed by Jedidiah Barber
--  Licensed under the Sunset License v1.0

--  See license.txt for further details


package body Datatypes is


    function Create
           (X, Y  : Quantity;
            Solid : in Boolean)
        return Particle is
    begin
        return (Place => Plane.Compose_From_Cartesian (X, Y), Solid => Solid, others => <>);
    end Create;


end Datatypes;