1 files changed, 110 insertions, 0 deletions
diff --git a/rasodmg/test/test_marray.cc b/rasodmg/test/test_marray.cc
new file mode 100644
index 0000000..210db3f
--- /dev/null
+++ b/rasodmg/test/test_marray.cc
@@ -0,0 +1,110 @@
+/*
+* This file is part of rasdaman community.
+*
+* Rasdaman community is free software: you can redistribute it and/or modify
+* it under the terms of the GNU General Public License as published by
+* the Free Software Foundation, either version 3 of the License, or
+* (at your option) any later version.
+*
+* Rasdaman community is distributed in the hope that it will be useful,
+* but WITHOUT ANY WARRANTY; without even the implied warranty of
+* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+* GNU General Public License for more details.
+*
+* You should have received a copy of the GNU General Public License
+* along with rasdaman community.  If not, see <http://www.gnu.org/licenses/>.
+*
+* Copyright 2003, 2004, 2005, 2006, 2007, 2008, 2009 Peter Baumann /
+rasdaman GmbH.
+*
+* For more information please see <http://www.rasdaman.org>
+* or contact Peter Baumann via <baumann@rasdaman.com>.
+/
+/**
+ * SOURCE: test_marray.cc
+ *
+ * MODULE: raslib
+ *
+ * COMMENTS:
+ *		None
+*/
+
+#ifdef EARLY_TEMPLATE
+#define __EXECUTABLE__
+#include "raslib/template_inst.hh"
+#endif
+
+#include <iostream>
+
+#include "rasodmg/marray.hh"
+
+#include "raslib/minterval.hh"
+#include "raslib/sinterval.hh"
+#include "raslib/point.hh"
+#include "raslib/error.hh"
+
+static int INIT = 0;
+
+int initFunction( const r_Point& /*pt*/ )
+{
+   /*
+  int value=0;
+  
+  for( int i=0; i< pt.dimension(); i++ )
+    value += pt[i];
+  
+  return value;
+  */
+   return INIT++;
+}
+
+
+int main()
+{   
+  cout << endl << endl;
+  cout << "Marray Examples" << endl;
+  cout << "===============" << endl << endl;
+        
+  cout << "Initialization of Marray<int, [0:2,3:5,6:8]> with init function:" << endl;
+  r_Minterval domain(3);
+  domain << r_Sinterval(0,2) << r_Sinterval(3,5) << r_Sinterval(6,8);
+  r_Marray<int> a( domain, &initFunction );
+  cout << "OK" << endl;
+  a.print_status( cout );
+
+  cout << "Value [0,3,6] = " << a[r_Point(0,3,6)] << endl;
+  cout << "Changing to 99" << endl;
+  a[r_Point(0,3,6)] = 99;
+  cout << "New value [0,3,6] = " << a[r_Point(0,3,6)] << endl;
+  
+  cout << endl << "Projection operator:" << endl;
+  cout << "project a[1]" << endl;
+  r_Marray<int> b = a[1];
+  b.print_status( cout );
+
+  cout << endl << "Projection and cast operator a[r_Point(1,4,7)] :" << endl;
+  cout << "a[1][4][7] = " << (int)(a[ r_Point(1,4,7) ]) << endl;
+  
+  cout << endl << "Projection and cast operator a[1][4][7] :" << endl;
+  cout << "a[1][4][7] = " << (int)(a[1][4][7]) << endl;
+  
+  cout << endl << "Triming operator:" << endl;
+  cout << "trim a[1:3, 4:6, 7:9]" << endl;
+  r_Marray<int> c = a[ r_Minterval(3) << r_Sinterval(1,3) << r_Sinterval(4,6) << r_Sinterval(7,9) ];
+  c.print_status( cout );
+
+  cout << "Initialization of Marray<char, [0:2,0:2,0:2]> with 'A'" << endl;
+  r_Minterval domain2(3);
+  domain2 << r_Sinterval(0,2) << r_Sinterval(0,2) << r_Sinterval(0,2);
+  r_Marray<char> a_char( domain2, 'A' );
+  cout << "OK" << endl;
+  a_char.print_status( cout );
+
+  cout << "Transforming the object GMarray( [0:2,0:2,0:2], 4 ) to Marray<int>( [...] )" << endl;
+  r_GMarray     genMDD( domain2, 4 );
+  r_Marray<int> specMDD( genMDD );
+  
+  cout << specMDD.spatial_domain() << endl;  
+  
+  return 0;
+}