RosettaCodeData/Task/Multi-dimensional-array/Ada/multi-dimensional-array-3.ada
2023-07-01 13:44:08 -04:00

1 line
51 B
Ada

subtype Positive is Integer range 1..Integer'Last;