Changeset 20024

Timestamp:

01/29/16 17:16:33 (9 years ago)

Author:

Eric.Larour

Message:

CHG: default is now to precompute legendre polynomials.

File:

• issm/trunk-jpl/src/m/classes/slr.m (modified) (6 diffs)

issm/trunk-jpl/src/m/classes/slr.m

@@ -16 +16 @@
                 eustatic         = 0;
                 legendre_precompute = 0;
-                legendre_coefficients = NaN;
                 store_green_functions = 0;
         end
@@ -43 +42 @@
                 
                 %legendre coefficients: 
-                self.legendre_precompute = 0;
-                self.legendre_coefficients = NaN;
+                self.legendre_precompute = 1;
 
                 %optimization: 
@@ -66 +64 @@
                         end
 
-                        %check that the legendre coefficients have indeed been computed if requested:
-                        if self.legendre_precompute,
-                                md = checkfield(md,'fieldname','slr.legendre_coefficients','NaN',1,'Inf',1,'size',[NaN length(self.love_h)]);
-                        end
-
                 end % }}}
                 function disp(self) % {{{
@@ -86 +79 @@
                         fielddisplay(self,'store_green_functions','store green functions (default 1) to speed up solutoin (though memory intense)');
                         fielddisplay(self,'legendre_precompute','precompute legendre coefficients? (default is 0)');
-                        if(self.legendre_precompute)
-                                fielddisplay(self,'legendre_coefficients','precomputed legendre coefficients');
-                        end
 
                 end % }}}
@@ -103 +93 @@
                         WriteData(fid,'object',self,'class','sealevelrise','fieldname','store_green_functions','format','Boolean');
                         WriteData(fid,'object',self,'class','sealevelrise','fieldname','legendre_precompute','format','Boolean');
-                        if(self.legendre_precompute),
-                                WriteData(fid,'object',self,'class','sealevelrise','fieldname','legendre_coefficients','format','DoubleMat','mattype',1);
-                        end
                 end % }}}
                 function savemodeljs(self,fid,modelname) % {{{
@@ -119 +106 @@
                         writejsdouble(fid,[modelname '.slr.eustatic'],self.eustatic);
                         writejsdouble(fid,[modelname '.slr.legendre_precompute'],self.legendre_precompute);
-                        if self.legendre_precompute,
-                                writejs2Darray(fid,[modelname '.srl.legendre_coefficients'],self.legendre_coefficients);
-                        end
 
                 end % }}}