From octave-sources-request at bevo dot che dot wisc dot edu Mon Mar 8 20:41:25 1999 Subject: geostatistics From: doolin at alpha-8 dot CE dot Berkeley dot EDU To: octave-sources at bevo dot che dot wisc dot edu Cc: doolin at alpha-8 dot CE dot Berkeley dot EDU Date: Mon, 08 Mar 99 18:41:21 -0800 Here are routines someone may find useful for building a geostatistics toolbox. They aren't pretty. In fact, they probably need to be rewritten. I welcome comments and patches. Even patches for simple stupid stuff, because I haven't learned to use patch yet and this will be an excuse! And I really am not a very good octave coder either. Why do I feel naked? ;) One other thing: THIS IS IMPORTANT! I may have forgotten to tar it into its own subdirectory. Use tar -tf to check before tar -xvf. Apologies for that. I will be building a script for releasing code at some point in the future. Dave D begin 664 geostat.tar.gz M'XL("(07Y#8"`V=E;W-T870N=&%R` dot U=>W/;1I+/W_ at 4?:DH!F40)$!2LJCH M-HJ=V*YU')GWX1L`9W?0K7]S<'>[?8"=G9V! MVW,==Q>37=?I?P/=;^XAY&GF)0#?!-Y,?"C?=>E_T;`%)Z#&'T[A0#^: at 9=Y M%LR\)/1B7U at 0YZ dot 1R dot A[,O dot B7*0MV#*V((RG>38TZ%'F6?5\EH]2\.(`HG`2 M9EX6RC at =`G#:\3A,(?63<)K!-)%3D40%G(E(QE@FC$'Z&79T)Z5B:1;Z:2>= MXJ,7+4K[,A#`W],B"4?C#)YXLS"`7VUX(F6$1/(X$`ED8P%/7[[!8D]%+!(O M at E?Y613Z\"+T19P*,)^^>M&R%5'D991X$Z(;8,5)>)9G(@!N)%,:(Z_X@/T4 M9G`91A%R#7DJSO/(PA9G\/;Y\;/?WAS#XO#E\?O]HG`99B-L7M` MS(0B%4ZF48C$+[TD\>*L`'D dot O_[\^O$S+'+XT_,7SX_? at 4RHZ"_/CU_^?'0$ MO_SV& at [AU>'KX^>/W[PX?`VOWKQ^]=O1SS;`D1!E2U?;B03*IIXCO8E,!`0B M\\(HM=5HO),YI,A<%,`8NQT2X8MPAJQYW+O$V`;:FC#2\&CLN)&8%[OO/(P$ M\O7\'&*)4^8R"3/D4#*A7Q+D]DB>9]AT_"5QH'AZ6$AGL`?'`GM&P*O(\P6T MX2BGHKU>UX*?9)IA-OCU$+JNXSAMI]?=M>#-T:'-#?GN,,=.3H80J!GP'>BG M'WUAGXGD0D2BL$604]XG7B:&X.SM[76Z;L<=0+<[Q']N#[ZCY".9)SYFZ*1C M;]09RXE(.XI8QY^EB919QQ?N7KL dot at -EIR!A dot &QG dot `Z4T- dot $Y4RXTS,+@5 dot KJD,XTPM/1_77);D?D:S M at #+37 dot ,!I8I@ZH5)2M,WH*'Q-5&]U*@(,J99L0U#,WP`,A:I67'TT*FQ]]!I M[6,K<9Z%F-$95 at D&E%(EM,(6II6$]S&%\K_'N'`I/X6J<0>0_IED)G`/(0VG MA5.#G]_C<^MW%^!AE>C6$O&94UO[FF3%QGMBPRSYP!*JLUO;IH,_Q'QJMLVR M_E;'V6FUL`J59X76>]6D&F7*( dot +`H/_&EDX86O5^P at )M9WMMTK[NZ\V=C(6[ MV-%(OIQ1QJ?(?YJ_U-0 at 3 dot Y(^U^O__L[+NM_U/[]/F$!Q]GI[3;Z_[[TOQ(& M)([T3-#"*$0U.F\9=4T/5P*J#%PGHSS"7CR3KD,#O54TL&'UZ<7WQ70^%8E$/,)A/(!$7J;,%NGX"]+O2[I^ MD;>NTA^N)%S5Z0N5WEY2Z'5]WJZT.:9H5;Y%I$CP4`_R\A^+1-BVS:G<3O/" M&I*N/%E4"IJFZMD2)>A?IXHRM>T"ZW>6U/AGT[9?7Z#Y*M+LR^[_G>YB_^\T M^__[UO]J_&&2LQ2J9H-Y at =I4*/EBP?K]26,':/3^W\4 dot T`77'0X&0Y1&M]/[ M-3FZ3O.[JYI?K[N/7W1?#A48N!4E,+","6B#ZLLHG\150JT9A!FVEG(0>M"- M7] at 4J)C>[.J<5PP*)04%`?Y)5<`HP27/%4$D?9Y%=@V%<#GFF,O`,:ZT=!*F M:3 at +<<5Q%]3+;0(I!$W:M48Q:JEC%4(H*QGJD`7T$)<6@_76A]+XL&)]6#8_ M5+#D[?_E9"19 M%`M4IFBRQ/<%F2<*G1.D_D!!4(SRZ,0;T3B(CR MCT+2 at +CNUM%FF:7(V\8MP84 dot C_,D$7&&P&+L)<$E[A@"E@N'L\2#__$B5`6H MA%!AP*),=E4^V`UD:2#+UVFJ>`3=P7#0'0YN>W2Q$/WK$(NSYN2B+BG*TM=) M"4,9S,NB&[2?4GTU4J at \5XWO?^ dot =^)?;_Q dot $NC/C__7ZO]?;&:S:_QUWT dot C_ M^]+_-=2JEC7.!_-,SE$YL)A+"MR)A#.E[4MECPJ]VDCHLJ8O91*$,:?)(S,YW6/A2+GV0(,%"*<:$YIZ(XT[\PD>2:_M7C7V5: MG^GB#RP\-+VSU,2'-N9N=:BVUA`?]XV",Q1EA at (S%*U dot H3,42 dot ($YBQ;"OZD M/L'^' at =R8LZM@NI(RL9R/N3!9\\&-KF4<891[]@# dot #E=LM$D2Y87GRT?X3F8 M)-JQ:\U%WY\P0?:8L!1+_'S::FES":Q45/NY#QN+E^#_VAQIB%J>C)+ZG6JY:"ET)D"?D]$)I)) M&"/"N1P+5#+),H8CC:XI>37 at P@BIE*ND]$LR"'@*75+9H"D=USIA+BTF;,97 M"8.06()($I0M_ECX%XAY+$9EJ.\0'J3>.6E(&:-$1:A`-N^9F)?5IKJFY0M9&YB&`8(EU?I"FR7R^)>8*0=1/)1];?7C22J+/'$[MN MM(*?!"*$$#.QII_D41:2KHXD*B4+0EO8%LE4ZFB$9HE,TUIA.1.)16SD\07" MSO at C;5=D_A\) dot >DT(+`!@7=ELG+ZPYX[[-_69%5JJQL=L6F!=+I9M!E;)(&N M"9UM4E0'BIH%W0.<84QX)6QWB!S7X*T5L>71H=EL'B'81:!X42]QE$)=Y/M#8 dot )_@0-8V]V%< M55$CM\3=/+,VD9N#B1,F_)>,,R]J\4ROMWXMN2)K;2)7 at (F"#G>MFX@I#?=?M$PD86',*2R'\,(ZZP,(-T/1B80T\=Y1<\IUT)YZ0MAE$L?O(& MA)K',5RXY,#BK.N3W.536&>H$]BHRYU9*Q0R)4HH5A.8SJ*%U'XN_-_1A6X]V#.0_>2GSA'!3K\A?N0;&27T0HH]?5MXXNU;>6KG.%;E7? M2GZU&5EIO&K]#[AH$'<=8&=D\,.![HLR;.%D%\%(P+>H#N-O`=5A),XS(DCS MNU;K]]^#663MPFEMFW.W/7=:2-HL7!V3<5D8L'SV$=P0#B`(4#*NI8AG7V7O+V*A$

[8I?V, at BH14"0D[<= M^ at >AU+SLL3OM-Y*L[3!NEYJVVB)8Q(M'&%FD4T']@_B=>N^M3**@_984P%MQ MMD0M%74CLHK:/$/."3=*)&-'VQ[[SECY# MG+?8"1&(Q2W7.,NFPT[G\O+2'M%$L/&C$R"0C^2TA'W^W8_"3<).Q]GK[`T0 M-O\DS^`H$PB/OH?'B1>.X)TW_4AJ*97_L6KS)_+F$Q<_^JFPS[V<4/A]2*3/ M%SJ->>Z>[7]L6 at VS+W7_J]\CG^_5^U^-__>]G?\JK4![9#T3]/VOJ\Q4>)-Q[2Q0ZV0D?8F5Q%E M+6)GK(^UWU7U/EOR`7M:>J75_%+80WJZ-^S>UCV]$O,WLYS= M0BC06GLJLH4O)PY,Z4FN%B\LTM1-<.4\/;1Z+783)Q,[[H0OR5^$QY5#7I%&86F!A=$X MR%E*%:KSB94+>CW-<.F'7QC dot T(\H2\-M at ;/_:B M( at U3]A"I+MHOW@O`=5]UJMM4]4SXF4PTO$]XLY!1_U%V91[#K1* dot +8]RZ?A dot M/?*SYX_U0B+K"&;GPPQU_JO)DI#Q=.O*I:3RIA[B^87-D(_./>41O(AE9_N* M$=5BY`:Y7[H!L:'%Y?R0ES0]?!3=J8QF2JJ(.,/11`T0"U3F:8&`>L+D(V]R M%GA5A_ZOJDY1>BO(,T=)E*I5R*8NHV[<,Y5C[Z(`SK>UJ22Q:S(U<9"6Q1-U$TED/ M0YAP>\L1'0+97422P3EV8D'-B[RSQ65)Q:MD*DL+"J.9I*Y-I"WF4XF#Y7-X M"_914)S"/S"<,J]\WP1'!G4."=2,-(G$YG.'D,1E\]`63H`T:^M-*?8L(8B4 MAJ'MI7X8JLIL+*3K)=*X]J;F at V=JL&(4ZTBT>-!J7$(_$_['DENW9W`+8#"`CL`3B(#`;0H\6- MXEA>E!X_)+![2^<"ZI:WB600!C`M?#1#MOK.')>4_38[>/>V([I%/G-Z5^/< M_M6XWM4XS% at K; dot YT'+OO]%LEX?[&-$ dot IFA/`!A!3Q`3E;SO,(T8B8>*"(WKJ M)Q`+'-'G-/HYHPB'YN[B?Y=\C_A>&U5AE!STEKG[Y%B'JZGK-5)J5#/JO"G& M:"UB.L-^Z\$VIO'3OC')*PUC#HA\.:#\L`\FS-I,XB%,7_W77[+M0`=?=_QOT>S7_+Y;_.X/&___>[#\U-]FENW\<;Z$ at CTJ\EWA! MF.-W+)/)O5T'^.B+?XWQIC'>?*T7]0:W--XLR^B;O5CHELO:P![*BC\BG*)_ M8),FN+E dot _Y#E6W^J8LLO!ZJB2V_UR at <%BF47E*N^X\I;?(4P>1F0/XH)"]I\ M"Q\';=[ZG5BEN_?U-'[Y7Z'26K^;3H?_?_>S_ M- at ``F@LW`@#'F#&]JM(K dot 40+W)<)W;2+19HVJKU1[7]3U;[SB:I=B=_-]_"S MZI4Y)X8#9']P#1>_7?QVNN`H`T1Y,^V$+#?X'^.T=ML$!#1="QS4<#4"[D<6 M=Y>+#^!C"N]0X68[_D7T?TKO0&$C\-T8 at *_S_RCU_\#M dot ?U!C_1_;Z?Q_[BG M_?^3!$5V4IW.\&%0>=I5>U,.'='PNW+6OR'G$#4:E4!%>(9[!E(>[*AXCL)^ MZJ%J)#>/M-069WQ%"U6)HL:#+8O3E(S.46RF$;_79 M]+<+O&'&=!29YF?O%R>?^M2UU*2H6%#]E,>SW'`^ZU2X at I0)YL#?)4T+6TYJ MNSS(AHC7+>&Q&(2;2S\^+4L`$<#>"XX[]7<%M;0EW>KX,;NPPW/F at % MH%=;T$%*'Q!D/`)WE[%'Z8"ASE at 0D`P,3 dot 0/!S$*9MVA3[=+,)=BMLJ877"@&T<2;Y0HFN MFG<:'2X;*R\YUD=8JUDKYY3:^XO(<65COIN_?$"=[Q^S6T$ at YMKSA&716$:! M9+E,3G%*LN(0R3Q5_A;:JZ;F^<'.[,:Z]TFO0_5:!G*507FX M6HKVGB4Q[;*S8*(Z15M0LX"(16D^H7=#YA-S0YYZ6]3# at _W5-W9R]P0++PO; M^%=WX0&R=F[M&VDXFGC:G6=+N^/]?D?6:>JC/RP7S8FQ-[8UN^A=(:. MTZ5W4=)QGQFVD"0=]VE_DUA?=)YZJ6:X?/=F)D=\Z]E6;X) at SXX#6'[C!K([ M;%F`+;(4*TB\[M]1E60?C^I7 at _^;T(0F-*$)36A"$YK0A"8TX>["_P%E?>=9 $`' at ````` ` end