Add dim4 and seq macros for ease of creating the associated objects

Author: 9prady9

src/macros.rs

@@ -130,3 +130,38 @@ macro_rules! eval {
         }
     };
 }
+
+/// Create a dim4 object from provided dimensions
+///
+/// The user can pass 1 or more sizes and the left over values will default to 1.
+#[macro_export]
+macro_rules! dim4 {
+    ($dim0:literal) => {
+        $crate::Dim4::new(&[$dim0, 1, 1, 1])
+    };
+    ($dim0:literal, $dim1:literal) => {
+        $crate::Dim4::new(&[$dim0, $dim1, 1, 1])
+    };
+    ($dim0:literal, $dim1:literal, $dim2:literal) => {
+        $crate::Dim4::new(&[$dim0, $dim1, $dim2, 1])
+    };
+    ($dim0:literal, $dim1:literal, $dim2:literal, $dim3:literal) => {
+        $crate::Dim4::new(&[$dim0, $dim1, $dim2, $dim3])
+    };
+}
+
+/// Create a sequence object
+///
+/// If type is not provided, then the Seq will default to i32 type
+#[macro_export]
+macro_rules! seq {
+    () => {
+        $crate::Seq::<i32>::default()
+    };
+    ($sty:ty; $start:literal : $end:literal : $step:literal) => {
+        $crate::Seq::<$sty>::new($start, $end, $step)
+    };
+    ($start:literal : $end:literal : $step:literal) => {
+        $crate::Seq::<i32>::new($start, $end, $step)
+    };
+}

tests/seq_macro.rs

@@ -0,0 +1,17 @@
+use arrayfire::{af_print, dim4, index, randu, seq};
+
+#[test]
+fn array_view() {
+    let _dim1d = dim4!(2);
+    let _dim2d = dim4!(2, 3);
+    let _dim3d = dim4!(2, 3, 4);
+
+    let mut dim4d = dim4!(5, 3, 2, 1);
+    dim4d[2] = 1;
+
+    let a = randu::<f32>(dim4d);
+    let seqs = &[seq!(1:3:1), seq!()];
+    let sub = index(&a, seqs);
+    af_print!("A", a);
+    af_print!("Indexed A", sub);
+}