15 lines
206 B
Ada
15 lines
206 B
Ada
package openGL.Model.arrow
|
|
--
|
|
-- Models an arrow.
|
|
--
|
|
is
|
|
type Item is abstract new Model.item with private;
|
|
|
|
|
|
|
|
private
|
|
|
|
type Item is abstract new Model.item with null record;
|
|
|
|
end openGL.Model.arrow;
|