Add initial prototype.

2022-07-31 17:34:54 +10:00
commit 54a53b2ac0
1421 changed files with 358874 additions and 0 deletions
--- a/3-mid/opengl/source/lean/model/opengl-model-arrow.ads
+++ b/3-mid/opengl/source/lean/model/opengl-model-arrow.ads
@@ -0,0 +1,14 @@
+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;