Memory info

bordley.m

@@ -10,6 +10,8 @@
 %   w=[.1, .1, 1];
 %   p_com=bordley(p0,[p1;p2;p3],w);
 %
+% See also, comb_cprob
+%
 function p_com=bordley(p0,p,w);
 if nargin<3, w=1;end
 [n,dim]=size(p);

colorbar_log10.m

@@ -3,7 +3,7 @@ function colorbar_log10(Ticks)
 
 cb=colorbar;
 if nargin>0
-    set(cb,'Ticks',log10(Ticks))
+    set(cb,'Ticks',log10(Ticks));
 end
 T=get(cb,'Ticks');
 for it=1:length(T);TL{it}=sprintf('%3.1f',10.^T(it));end

comb_cprob.m

@@ -14,7 +14,8 @@
 %
 % Journel, An Alternative to Traditional Data Independence
 % Hypotheses, Math Geol(34), 2002
-% 
+%
+% See also comb_cprob_nd, bordley
 %
 function pAgBC=comb_cprob(pA,pAgB,pAgC,tau)
 

misc/memory_get.m

@@ -1,4 +1,10 @@
 function [mem_total,mem_used,mem_available]=memory_get();
+% memory_get: Get memory inforation on Unix and Windows systems
+%
+% Call: 
+%    [mem_total,mem_used,mem_available]=memory_get;
+% 
+%
 mem_total=[];
 mem_used=[];
 mem_available=[];
@@ -8,7 +14,9 @@
     mem_total=str2num(ws{2})/1e+6;
     mem_used=str2num(ws{3})/1e+6;
     mem_available=str2num(ws{4})/1e+6;
-else iswin==1
+else 
     [USERVIEW, SYSTEMVIEW] = memory;
-    mem_total=USERVIEW.MaxPossibleArrayBytes/1024/1E+6;
+    mem_total=SYSTEMVIEW.PhysicalMemory.Total/1024/1E+6;
+    mem_available=SYSTEMVIEW.PhysicalMemory.Available/1024/1E+6;
+    mem_used=mem_total-mem_available;
 end