Changeset 25326
- Timestamp:
- 07/31/20 16:46:10 (5 years ago)
- Location:
- issm/trunk-jpl/src/m/contrib/larour
- Files:
-
- 2 added
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/m/contrib/larour/equiprobable_histogram_uncertain.m
r25212 r25326 1 function [ ids,probs,n]=equiprobable_histogram_uncertain(numberids)1 function [abscissas,counts,pair_per_variable]=equiprobable_histogram_uncertain(numberabscissas) 2 2 3 n=numberids+1;4 ids=(1:(numberids+1))';5 p=ones(number ids,1)/numberids;6 probs=[p;0]; probs=probs/sum(probs);3 pair_per_variable=numberabscissas+1; 4 abscissas=(1:(numberabscissas+1))'; 5 p=ones(numberabscissas,1)/numberabscissas; 6 counts=[p;0]; counts=counts/sum(counts); -
issm/trunk-jpl/src/m/contrib/larour/glaciermip.m
r24851 r25326 178 178 end 179 179 end % }}} 180 function part=partition(self,md,rgi2mesh,part,value) % {{{ 181 182 for i=1:size(rgi2mesh,2), 183 dh=rgi2mesh(:,i); 184 pos=find(dh); 185 part(pos)=value; 186 end 187 188 end % }}} 180 189 end 181 190 end -
issm/trunk-jpl/src/m/contrib/larour/oceanmip.m
r25272 r25326 207 207 end 208 208 %}}} 209 function arrays= dbottompressures(self) % {{{ 209 function arrays= dbottompressures(self,varargin) % {{{ 210 options=pairoptions(varargin{:}); 211 units=getfieldvalue(options,'units','mm/yr'); 212 210 213 arrays=cell(self.n,1); 211 214 for i=1:self.n, 212 pbo=self.mesh_pbo{i}; pbo=pbo/1000; %in meters215 pbo=self.mesh_pbo{i}; 213 216 dpbo=diff(pbo,1,2); 214 time=self.time{i}; 215 time=time(1:end-1); 216 array=[dpbo;dtime]; 217 if strcmpi(units,'m/yr'), 218 dpbo=dpbo/1000; 219 end 220 time=self.time{i}; time=time(1:end-1); 221 array=[dpbo;time']; 217 222 arrays{i}=array; 218 223 end 219 224 end %}}} 220 function arrays= dzoss(self) % {{{ 225 function arrays= dzoss(self,varargin) % {{{ 226 options=pairoptions(varargin{:}); 227 units=getfieldvalue(options,'units','mm/yr'); 228 221 229 arrays=cell(self.n,1); 222 230 for i=1:self.n, 223 zos=self.mesh_zos{i}; zos=zos/1000; %in meters231 zos=self.mesh_zos{i}; 224 232 dzos=diff(zos,1,2); 233 if strcmpi(units,'m/yr'), 234 dzos=dzos/1000; 235 end 225 236 time=self.time{i};time=time(1:end-1); 226 array=[dzos;time ];237 array=[dzos;time']; 227 238 arrays{i}=array; 228 239 end 229 240 end %}}} 230 function arrays= dzostogass(self) % {{{ 241 function arrays= dzostogass(self,varargin) % {{{ 242 options=pairoptions(varargin{:}); 243 units=getfieldvalue(options,'units','mm/yr'); 244 231 245 arrays=cell(self.n,1); 232 246 for i=1:self.n, 233 zostoga=self.zostoga{i}; zos=zos/1000; %in meters 234 dzostoga=diff(dzostoga); 247 zostoga=self.zostoga{i}; 248 dzostoga=diff(zostoga); 249 if strcmpi(units,'m/yr'), 250 dzostoga=dzostoga/1000; 251 end 235 252 time=self.time{i};time=time(1:end-1); 236 array=[dzostoga ;time];253 array=[dzostoga';time']; 237 254 arrays{i}=array; 238 255 end
Note:
See TracChangeset
for help on using the changeset viewer.