diff options
author | Jed Barber <jjbarber@y7mail.com> | 2015-10-17 14:14:43 +1100 |
---|---|---|
committer | Jed Barber <jjbarber@y7mail.com> | 2015-10-17 14:14:43 +1100 |
commit | 5933f248c18914fbbce03102b340361a575eae3c (patch) | |
tree | 03739436f9e1d30505d18528d468a32bc330b40c /odd_even.ads | |
parent | a7a0c2924c68c7dc457debb60f44bffc4aa80682 (diff) |
Added comb, odd-even sorts
Diffstat (limited to 'odd_even.ads')
-rw-r--r-- | odd_even.ads | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/odd_even.ads b/odd_even.ads new file mode 100644 index 0000000..735a5ef --- /dev/null +++ b/odd_even.ads @@ -0,0 +1,16 @@ + + +generic + + type Index_T is (<>); + type Element_T is private; + type Array_T is array (Index_T range <>) of Element_T; + + with function ">"(X, Y : in Element_T) return Boolean is <>; + +package Odd_Even is + + procedure Single(Arr : in out Array_T); + +end Odd_Even; + |