Index: /issm/trunk/src/c/Container/Options.cpp
===================================================================
--- /issm/trunk/src/c/Container/Options.cpp	(revision 8535)
+++ /issm/trunk/src/c/Container/Options.cpp	(revision 8536)
@@ -213,4 +213,46 @@
 		memcpy(outstring,default_value,stringsize*sizeof(char));
 		*pvalue=outstring;
+	}
+
+}
+/*}}}*/
+/*FUNCTION Options::Get(char*** ppvalue,int* numel,char* name){{{1*/
+void Options::Get(char*** ppvalue,int* numel,const char* name){
+
+	vector<Object*>::iterator object;
+	Option* option=NULL;
+	Option* option2=NULL;
+	Options* options=NULL;
+	int   i;
+
+	/*Get option*/
+	option=GetOption(name);
+
+	/*If the pointer is not NULL, the option has been found*/
+	if(option){
+		/*If the object is a Cell, copy the strings from its options dataset*/ 
+		if(option->Enum()==OptionCellEnum){
+			if (option->NumEl()) {
+				*ppvalue=(char **) xmalloc(option->NumEl()*sizeof(char *));
+				if (numel) *numel=option->NumEl();
+				option->Get(&options);
+				for (i=0; i<option->NumEl(); i++) {
+					option2=((Option *)options->GetObjectByOffset(i));
+					if(option2->Enum()==OptionCharEnum && option2->NDims()==2)
+						option2->Get(&((*ppvalue)[i]));
+					else
+						((*ppvalue)[i])=NULL;
+				}
+			}
+		}
+		/*Else: not supported*/
+		else{
+			_error_("Cannot recover field \"%s\" for an option of type %s",name,EnumToStringx(option->Enum()));
+		}
+	}
+	/*Else, the Option does not exist, no default provided*/
+	else{
+		*ppvalue=NULL;
+		if (numel) *numel=0;
 	}
 
Index: /issm/trunk/src/c/Container/Options.h
===================================================================
--- /issm/trunk/src/c/Container/Options.h	(revision 8535)
+++ /issm/trunk/src/c/Container/Options.h	(revision 8536)
@@ -29,4 +29,5 @@
 		void Get(char**   pvalue,const char* name);
 		void Get(char**   pvalue,const char* name,const char* default_value);
+		void Get(char***  pvalue,int* numel,const char* name);
 		void Get(double** pvalue,int* numel,const char* name);
 };