// This file is distributed under the same license as the Scilab package.
// =============================================================================
+// <-- CLI SHELL MODE -->
+
// Load previously saved data (check backward compatibility)
+///// Empty matrix
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/emptymatrix.sod");
+assert_checkequal(emptymatrix, []);
+
///// Double
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/matricedoublescalar.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/matricedoublescalar.sod");
assert_checkequal(ascalar,42);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/matricedouble.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/matricedouble.sod");
assert_checkequal(a,[2,3;4,5]);
///// Double complex
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/matricedoublecomplex.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/matricedoublecomplex.sod");
assert_checkequal(b,[2+%i,3+%i*2;4+%i*%pi,5]);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/matricedoublecomplexscalar.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/matricedoublecomplexscalar.sod");
assert_checkequal(bscalar,42+%i);
///// String
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/matricestring.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/matricestring.sod");
assert_checkequal(c,["my matrix","of strings";"is","saved in Scilab data format"]);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/matricestringscalar.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/matricestringscalar.sod");
assert_checkequal(cscalar,["my single string"]);
// Polynomials
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/polynomials.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/polynomials.sod");
p_reference=poly([1 2],'s') ;
assert_checkequal(p,p_reference);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/polynomialscoef.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/polynomialscoef.sod");
q_reference=poly([1 42],'s','c');
assert_checkequal(q,q_reference);
// Boolean matrices
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/booleanscalar.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/booleanscalar.sod");
assert_checkequal(bm,%t);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/booleanmatrix.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/booleanmatrix.sod");
assert_checkequal(bmm,[%t,%f; %f, %t]);
// Sparse
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/sparsematrix.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/sparsematrix.sod");
assert_checkequal(sp,sparse([1,2;4,5;3,10],[1,2,3]));
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/emptysparse.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/emptysparse.sod");
assert_checkequal(emptysparse,sparse([]));
// boolean sparse
%F, %F, %F, %F, %F
%F, %F, %F, %F, %T];
sp_reference=sparse(dense);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/booleansparse.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/booleansparse.sod");
assert_checkequal(sp,sp_reference);
// List
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/list.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/list.sod");
assert_checkequal(ls,list(2,%i,'f',ones(3,3)));
ls(2) = list( %t, [32,42]); // alter ls to add the list
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/listnested.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/listnested.sod");
assert_checkequal(lsnested,ls);
// tlist
lst_reference = tlist(['random numbers';'Name';'Example'], 'Uniform',ones(1,2, 3));
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/tlist.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/tlist.sod");
assert_checkequal(lst,lst_reference);
// mlist
M_ref=mlist(['V','name','value'],['a','b';'c' 'd'],[1 2; 3 4]);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/mlist.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/mlist.sod");
// Commented because of bug 9531
//assert_checkequal(M_ref,M);
// hypermatrices
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/hypermatrix.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/hypermatrix.sod");
assert_checkequal(HM,hypermat([2 3 2 2],1:24));
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/hypermatrixcomplex.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/hypermatrixcomplex.sod");
HMC_reference(1,1,1,1:2)=[1+%i 2*2*%i];
assert_checkequal(HMC,HMC_reference);
int8rowvector_ref = int8([1 -4 7]);
int8colvector_ref = int8([1;-4;7]);
int8matrix_ref = int8([1 -4 7;-9 6 -3]);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/int8.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/int8.sod");
assert_checkequal(emptyint8matrix, emptyint8matrix_ref);
assert_checkequal(int8scalar, int8scalar_ref);
assert_checkequal(int8rowvector, int8rowvector_ref);
int16rowvector_ref = int16([1 -4 7]);
int16colvector_ref = int16([1;-4;7]);
int16matrix_ref = int16([1 -4 7;-9 6 -3]);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/int16.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/int16.sod");
assert_checkequal(emptyint16matrix, emptyint16matrix_ref);
assert_checkequal(int16scalar, int16scalar_ref);
assert_checkequal(int16rowvector, int16rowvector_ref);
int32rowvector_ref = int32([1 -4 7]);
int32colvector_ref = int32([1;-4;7]);
int32matrix_ref = int32([1 -4 7;-9 6 -3]);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/int32.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/int32.sod");
assert_checkequal(emptyint32matrix, emptyint32matrix_ref);
assert_checkequal(int32scalar, int32scalar_ref);
assert_checkequal(int32rowvector, int32rowvector_ref);
uint8rowvector_ref = uint8([1 4 7]);
uint8colvector_ref = uint8([1;4;7]);
uint8matrix_ref = uint8([1 4 7;9 6 3]);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/uint8.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/uint8.sod");
assert_checkequal(emptyuint8matrix, emptyuint8matrix_ref);
assert_checkequal(uint8scalar, uint8scalar_ref);
assert_checkequal(uint8rowvector, uint8rowvector_ref);
uint16rowvector_ref = uint16([1 4 7]);
uint16colvector_ref = uint16([1;4;7]);
uint16matrix_ref = uint16([1 4 7;9 6 3]);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/uint16.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/uint16.sod");
assert_checkequal(emptyuint16matrix, emptyuint16matrix_ref);
assert_checkequal(uint16scalar, uint16scalar_ref);
assert_checkequal(uint16rowvector, uint16rowvector_ref);
uint32rowvector_ref = uint32([1 4 7]);
uint32colvector_ref = uint32([1;4;7]);
uint32matrix_ref = uint32([1 4 7;9 6 3]);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/uint32.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/uint32.sod");
assert_checkequal(emptyuint32matrix, emptyuint32matrix_ref);
assert_checkequal(uint32scalar, uint32scalar_ref);
assert_checkequal(uint32rowvector, uint32rowvector_ref);
// undefined
undefinedelement_ref=list(2,%i,'f',ones(3,3));
undefinedelement_ref(6)="toto";
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/undefinedelement.h5");
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/undefinedelement.sod");
assert_checkequal(undefinedelement, undefinedelement_ref);
// void
voidelement_ref=list(1,,3);
-import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/voidelement.h5")
+import_from_hdf5(SCI+"/modules/hdf5/tests/sample_scilab_data/voidelement.sod");
// Commented because of bug 9529
//assert_checkequal(voidelement, voidelement_ref);