Data commit

Task/Arrays/Diego/arrays.diego

@@ -0,0 +1,117 @@
+set_ns(rosettacode);
+set_base(0);
+
+// Create a new dynamic array with length zero, variant and/or mixed datatypes
+add_array(myEmptyArray);
+
+// Create a new dynamic array with length zero, of integers with no mixed datatypes
+add_array({int}, myIntegerArray);
+
+// Create a new fixed-length array with length 5
+add_array(myFiveArray)_len(5)_base(0);   // The value base '_base(0)' is usually defaulted to zero, depends upon thing.
+
+// Create an array with 2 members (length is 2)
+add_ary(myStringArray)_value(Item1,Item2);   // '_array' can be shortened to '_ary'
+
+// Assign a value to member [2]
+with_ary(myChangeArray)_at(2)_v(5);    // '_value' can be shortened to '_v'
+
+// Add a member to an array with the push function (defaulted at end), length increased by one
+[myExpandedArray]_push()_v(9);    // 'with_ary(...)' can be shortened to '[...]'
+[myExpandedArray]_append()_v(9);
+
+// Add a member to an array with the push function (at a location), length increased by one
+[myExpandedArray]_pushat(3)_v(8);
+
+// Remove a member to an array with the pop function (defaulted at end), length reduced by one
+[myExpandedArray]_pop();
+
+// Remove a member to an array with the pop function (at a location), length reduced by one
+[myExpandedArray]_popat(3);
+
+// Swap a member to an array with the swap function
+[myExpandedArray]_swapfrom(2)_swapto(6);
+[myExpandedArray]_swap(2, 6);
+
+// Rectiline a member in an array
+[MyCaterpillarArray]_rectilat(4)_rectilup(2);
+[MyCaterpillarArray]_rectilup(4, 2);
+[MyCaterpillarArray]_rectilat(5)_rectildown(3);
+[MyCaterpillarArray]_rectildown(5, 3);
+
+// Null a member to an array with the pluck function (defaulted at end)
+[myExpandedArray]_pluck();
+
+// Null a member to an array with the pluck function (at a location)
+[myExpandedArray]_pluckat(3);
+
+// Get size of array
+[mySizableArray]_size();    // '_len()' can also be used
+[myMultidimensialArray]_size()
+
+// Retrieve an element of an array
+[myArray]_at(3);
+[myArray]_first();    // Retrieve first element in an array
+[myArray]_last();     // Retrieve last element in an array
+
+// More transformations of arrays (like append, union, intersection) are available
+
+// For multi-dimensional array use the 'matrix' object
+
+set_matrixorder(row-major);    // set major order as row- or column-major order depends on the thing
+set_handrule(right);           // set hand-rule, most things will use right hand-rule
+
+// Create a new dynamic two-dimensional array with length zero, variant and/or mixed datatypes
+add_matrix(myMatrix)_dim(2);
+
+// Create a new dynamic three-dimensional array with length zero, of integers with no mixed datatypes
+add_matrix({int}, my3DEmptyMatrix)_dim(3);
+
+// Convert an array to a matrix by adding a new dimension with length zero, variant and/or mixed datatypes
+with_array(MyConvertedArray)_dim();    // Should now use '_matrix' object rather than '_array'
+with_array(MyConvertedArray)_dim(3);   // Add three dimensions to array, should now use '_matrix' object rather than '_array'
+
+// Create a new fixed-length traditional (2D) matrix with 5 rows and 4 columns
+add_matrix(myMatrix)_rows(5)_columns(4);
+add_matirx(myMatrix)_subs(5, 4);  // check or set major order first
+
+// Create a new fixed-length mutil-dimensional matrix with 5 rows, 4 columns, 6 subscripts, and 8 subscripts
+add_matrix(myMatrix)_rows(5)_columns(4)_subs(6)_subs(8);
+add_mat(myMatrix)_subs(5, 4, 6, 8);  // check or set major order first, '_matrix' can be shortened to 'mat'
+
+// Create a 4 x 4 identiy matrix:
+add_mat(myIdentityMatrix)_subs(4, 4)_identity;    // ...or...
+
+add_mat(myMorphedMatrix)_subs(4, 4)
+with_mat(myMorphedMatrix)_trans(morph)_identity();   // More transformations available
+
+// Assign a value to member [2,4]
+with_mat(myMatrix)_row(2)_col(4)_value(5);    // ...or...
+with_mat(myMatrix)_at(2, 4)_v(5);    // check or set major order first
+
+// Add a member(s) to a matrix using push functions is available
+// Remove a member(s) from a matrix with the pop functions is available
+// Swap a member(s) in a matrix with the swap functions is available
+
+// Rectiline a single member in a three-dimensional matrix
+[MyWobbleMatrix]_rectilat()_row(3)_col(3)_sub(3)_rectilto()_row(-1)_col(1)_sub(0);    // ...or...
+[MyWobbleMatrix]_rectilat(3, 3, 3)_rectilto(-1, 1, 0);    // check or set major order first, ...or...
+[MyWobbleMatrix]_rectilat(3, 3, 3)_rectilleft(1)_rectilup(1);    / check or set hand-rule, ...or...
+
+// Also 'crab', 'elevate', 'slide' and 'pump' movements are available
+// Also 'row', 'pitch', and 'yaw' movements are available
+// Also, quaternions calculations are available
+// Null a member in a matrix using pluck functions is available
+
+// Get size of a matrix
+mat(mySizableMatrix)_size();    // will return an array of the size()
+[myMultidimensialArray]_len();  // '_len()' can also be used
+
+// Retrieve an element of a matrix
+[myMatrix]_at(3, 2);
+[myArray]_first()_atsub(2);    // Retrieve first element of a row/column/subscript of a matrix
+[myArray]_last()_atsub(2);     // Retrieve last element of a row/column/subscript of a matrix
+[myArray]_origin();    // Retrieve first element in a matrix
+[myArray]_end();       // Retrieve last element in a matrix
+
+reset_ns[];