diff --git a/Misc./comprehensions.adb b/Misc./comprehensions.adb
new file mode 100644
index 0000000..9ddbc8e
--- /dev/null
+++ b/Misc./comprehensions.adb
@@ -0,0 +1,8 @@
+-- @BAKE gnatmake-10 -gnat2022 -o comprehender $@
+
+procedure Comrehension is
+	type Integer_Array is array (Positive range <>) of Integer;
+	Vector : Integer_Array := [for J in 1 .. 5 => J * 2];
+begin
+	null;
+end Comrehension;