add sample code m3d

This commit is contained in:
2021-07-28 07:54:12 +08:00
parent d645456208
commit 5b65eab987
36 changed files with 597430 additions and 0 deletions

View File

@@ -0,0 +1,505 @@
%!PS-Adobe-3.0 EPSF-3.0
%%Creator: MATLAB, The Mathworks, Inc. Version 7.9.0.529 (R2009b). Operating System: Linux 4.6.4-201.fc23.x86_64 #1 SMP Tue Jul 12 11:43:59 UTC 2016 x86_64.
%%Title: /home/renzh/code/m3d2geophysics/m3d/test/prism/solution_one_profile_Tyz.eps
%%CreationDate: 02/26/2017 13:42:33
%%DocumentNeededFonts: Helvetica
%%DocumentProcessColors: Cyan Magenta Yellow Black
%%LanguageLevel: 2
%%Pages: 1
%%BoundingBox: -13 295 626 496
%%EndComments
%%BeginProlog
% MathWorks dictionary
/MathWorks 160 dict begin
% definition operators
/bdef {bind def} bind def
/ldef {load def} bind def
/xdef {exch def} bdef
/xstore {exch store} bdef
% operator abbreviations
/c /clip ldef
/cc /concat ldef
/cp /closepath ldef
/gr /grestore ldef
/gs /gsave ldef
/mt /moveto ldef
/np /newpath ldef
/cm /currentmatrix ldef
/sm /setmatrix ldef
/rm /rmoveto ldef
/rl /rlineto ldef
/s {show newpath} bdef
/sc {setcmykcolor} bdef
/sr /setrgbcolor ldef
/sg /setgray ldef
/w /setlinewidth ldef
/j /setlinejoin ldef
/cap /setlinecap ldef
/rc {rectclip} bdef
/rf {rectfill} bdef
% page state control
/pgsv () def
/bpage {/pgsv save def} bdef
/epage {pgsv restore} bdef
/bplot /gsave ldef
/eplot {stroke grestore} bdef
% orientation switch
/portraitMode 0 def /landscapeMode 1 def /rotateMode 2 def
% coordinate system mappings
/dpi2point 0 def
% font control
/FontSize 0 def
/FMS {/FontSize xstore findfont [FontSize 0 0 FontSize neg 0 0]
makefont setfont} bdef
/reencode {exch dup where {pop load} {pop StandardEncoding} ifelse
exch dup 3 1 roll findfont dup length dict begin
{ 1 index /FID ne {def}{pop pop} ifelse } forall
/Encoding exch def currentdict end definefont pop} bdef
/isroman {findfont /CharStrings get /Agrave known} bdef
/FMSR {3 1 roll 1 index dup isroman {reencode} {pop pop} ifelse
exch FMS} bdef
/csm {1 dpi2point div -1 dpi2point div scale neg translate
dup landscapeMode eq {pop -90 rotate}
{rotateMode eq {90 rotate} if} ifelse} bdef
% line types: solid, dotted, dashed, dotdash
/SO { [] 0 setdash } bdef
/DO { [.5 dpi2point mul 4 dpi2point mul] 0 setdash } bdef
/DA { [6 dpi2point mul] 0 setdash } bdef
/DD { [.5 dpi2point mul 4 dpi2point mul 6 dpi2point mul 4
dpi2point mul] 0 setdash } bdef
% macros for lines and objects
/L {lineto stroke} bdef
/MP {3 1 roll moveto 1 sub {rlineto} repeat} bdef
/AP {{rlineto} repeat} bdef
/PDlw -1 def
/W {/PDlw currentlinewidth def setlinewidth} def
/PP {closepath eofill} bdef
/DP {closepath stroke} bdef
/MR {4 -2 roll moveto dup 0 exch rlineto exch 0 rlineto
neg 0 exch rlineto closepath} bdef
/FR {MR stroke} bdef
/PR {MR fill} bdef
/L1i {{currentfile picstr readhexstring pop} image} bdef
/tMatrix matrix def
/MakeOval {newpath tMatrix currentmatrix pop translate scale
0 0 1 0 360 arc tMatrix setmatrix} bdef
/FO {MakeOval stroke} bdef
/PO {MakeOval fill} bdef
/PD {currentlinewidth 2 div 0 360 arc fill
PDlw -1 eq not {PDlw w /PDlw -1 def} if} def
/FA {newpath tMatrix currentmatrix pop translate scale
0 0 1 5 -2 roll arc tMatrix setmatrix stroke} bdef
/PA {newpath tMatrix currentmatrix pop translate 0 0 moveto scale
0 0 1 5 -2 roll arc closepath tMatrix setmatrix fill} bdef
/FAn {newpath tMatrix currentmatrix pop translate scale
0 0 1 5 -2 roll arcn tMatrix setmatrix stroke} bdef
/PAn {newpath tMatrix currentmatrix pop translate 0 0 moveto scale
0 0 1 5 -2 roll arcn closepath tMatrix setmatrix fill} bdef
/vradius 0 def /hradius 0 def /lry 0 def
/lrx 0 def /uly 0 def /ulx 0 def /rad 0 def
/MRR {/vradius xdef /hradius xdef /lry xdef /lrx xdef /uly xdef
/ulx xdef newpath tMatrix currentmatrix pop ulx hradius add uly
vradius add translate hradius vradius scale 0 0 1 180 270 arc
tMatrix setmatrix lrx hradius sub uly vradius add translate
hradius vradius scale 0 0 1 270 360 arc tMatrix setmatrix
lrx hradius sub lry vradius sub translate hradius vradius scale
0 0 1 0 90 arc tMatrix setmatrix ulx hradius add lry vradius sub
translate hradius vradius scale 0 0 1 90 180 arc tMatrix setmatrix
closepath} bdef
/FRR {MRR stroke } bdef
/PRR {MRR fill } bdef
/MlrRR {/lry xdef /lrx xdef /uly xdef /ulx xdef /rad lry uly sub 2 div def
newpath tMatrix currentmatrix pop ulx rad add uly rad add translate
rad rad scale 0 0 1 90 270 arc tMatrix setmatrix lrx rad sub lry rad
sub translate rad rad scale 0 0 1 270 90 arc tMatrix setmatrix
closepath} bdef
/FlrRR {MlrRR stroke } bdef
/PlrRR {MlrRR fill } bdef
/MtbRR {/lry xdef /lrx xdef /uly xdef /ulx xdef /rad lrx ulx sub 2 div def
newpath tMatrix currentmatrix pop ulx rad add uly rad add translate
rad rad scale 0 0 1 180 360 arc tMatrix setmatrix lrx rad sub lry rad
sub translate rad rad scale 0 0 1 0 180 arc tMatrix setmatrix
closepath} bdef
/FtbRR {MtbRR stroke } bdef
/PtbRR {MtbRR fill } bdef
/stri 6 array def /dtri 6 array def
/smat 6 array def /dmat 6 array def
/tmat1 6 array def /tmat2 6 array def /dif 3 array def
/asub {/ind2 exch def /ind1 exch def dup dup
ind1 get exch ind2 get sub exch } bdef
/tri_to_matrix {
2 0 asub 3 1 asub 4 0 asub 5 1 asub
dup 0 get exch 1 get 7 -1 roll astore } bdef
/compute_transform {
dmat dtri tri_to_matrix tmat1 invertmatrix
smat stri tri_to_matrix tmat2 concatmatrix } bdef
/ds {stri astore pop} bdef
/dt {dtri astore pop} bdef
/db {2 copy /cols xdef /rows xdef mul dup 3 mul string
currentfile
3 index 0 eq {/ASCIIHexDecode filter}
{/ASCII85Decode filter 3 index 2 eq {/RunLengthDecode filter} if }
ifelse exch readstring pop
dup 0 3 index getinterval /rbmap xdef
dup 2 index dup getinterval /gbmap xdef
1 index dup 2 mul exch getinterval /bbmap xdef pop pop}bdef
/it {gs np dtri aload pop moveto lineto lineto cp c
cols rows 8 compute_transform
rbmap gbmap bbmap true 3 colorimage gr}bdef
/il {newpath moveto lineto stroke}bdef
currentdict end def
%%EndProlog
%%BeginSetup
MathWorks begin
0 cap
end
%%EndSetup
%%Page: 1 1
%%BeginPageSetup
%%PageBoundingBox: -13 295 626 496
MathWorks begin
bpage
%%EndPageSetup
%%BeginObject: obj1
bplot
/dpi2point 12 def
portraitMode -0156 5952 csm
0 0 7679 2401 rc
85 dict begin %Colortable dictionary
/c0 { 0.000000 0.000000 0.000000 sr} bdef
/c1 { 1.000000 1.000000 1.000000 sr} bdef
/c2 { 0.900000 0.000000 0.000000 sr} bdef
/c3 { 0.000000 0.820000 0.000000 sr} bdef
/c4 { 0.000000 0.000000 0.800000 sr} bdef
/c5 { 0.910000 0.820000 0.320000 sr} bdef
/c6 { 1.000000 0.260000 0.820000 sr} bdef
/c7 { 0.000000 0.820000 0.820000 sr} bdef
c0
1 j
1 sg
0 0 7680 2402 rf
6 w
0 1845 2570 0 0 -1845 998 2062 4 MP
PP
-2570 0 0 1845 2570 0 0 -1845 998 2062 5 MP stroke
4 w
DO
SO
6 w
0 sg
998 2062 mt 3568 2062 L
998 217 mt 3568 217 L
998 2062 mt 998 217 L
3568 2062 mt 3568 217 L
998 2062 mt 3568 2062 L
998 2062 mt 998 217 L
998 2062 mt 998 2036 L
998 217 mt 998 242 L
%%IncludeResource: font Helvetica
/Helvetica /ISOLatin1Encoding 132 FMSR
849 2218 mt
(-30) s
1426 2062 mt 1426 2036 L
1426 217 mt 1426 242 L
1277 2218 mt
(-20) s
1854 2062 mt 1854 2036 L
1854 217 mt 1854 242 L
1705 2218 mt
(-10) s
2283 2062 mt 2283 2036 L
2283 217 mt 2283 242 L
2247 2218 mt
(0) s
2711 2062 mt 2711 2036 L
2711 217 mt 2711 242 L
2638 2218 mt
(10) s
3139 2062 mt 3139 2036 L
3139 217 mt 3139 242 L
3066 2218 mt
(20) s
3568 2062 mt 3568 2036 L
3568 217 mt 3568 242 L
3495 2218 mt
(30) s
998 2062 mt 1023 2062 L
3568 2062 mt 3542 2062 L
593 2110 mt
(-1500) s
998 1798 mt 1023 1798 L
3568 1798 mt 3542 1798 L
593 1846 mt
(-1000) s
998 1534 mt 1023 1534 L
3568 1534 mt 3542 1534 L
666 1582 mt
(-500) s
998 1271 mt 1023 1271 L
3568 1271 mt 3542 1271 L
890 1319 mt
(0) s
998 1007 mt 1023 1007 L
3568 1007 mt 3542 1007 L
743 1055 mt
(500) s
998 744 mt 1023 744 L
3568 744 mt 3542 744 L
670 792 mt
(1000) s
998 480 mt 1023 480 L
3568 480 mt 3542 480 L
670 528 mt
(1500) s
998 217 mt 1023 217 L
3568 217 mt 3542 217 L
670 265 mt
(2000) s
998 2062 mt 3568 2062 L
998 217 mt 3568 217 L
998 2062 mt 998 217 L
3568 2062 mt 3568 217 L
gs 998 217 2571 1846 rc
18 w
gr
18 w
gs 930 659 2707 1225 rc
24 24 998 1271 FO
24 24 1126 1266 FO
24 24 1255 1254 FO
24 24 1383 1231 FO
24 24 1512 1186 FO
24 24 1640 1104 FO
24 24 1769 969 FO
24 24 1897 804 FO
24 24 2026 727 FO
24 24 2154 892 FO
24 24 2283 1271 FO
24 24 2411 1649 FO
24 24 2540 1815 FO
24 24 2668 1738 FO
24 24 2797 1573 FO
24 24 2925 1438 FO
24 24 3054 1355 FO
24 24 3182 1310 FO
24 24 3311 1287 FO
24 24 3439 1276 FO
24 24 3568 1271 FO
gr
gs 998 217 2571 1846 rc
129 -5 128 -11 129 -23 128 -45 129 -83 128 -135 129 -165 128 -77
129 166 128 378 129 379 128 165 129 -77 128 -165 129 -135 128 -82
129 -45 128 -23 129 -12 128 -5 998 1271 21 MP stroke
gr
451 1420 mt -90 rotate
(T) s
90 rotate
%%IncludeResource: font Helvetica
/Helvetica /ISOLatin1Encoding 96 FMSR
517 1340 mt -90 rotate
(yz) s
90 rotate
%%IncludeResource: font Helvetica
/Helvetica /ISOLatin1Encoding 132 FMSR
451 1244 mt -90 rotate
(\(nT/m\)) s
90 rotate
2150 2370 mt
(y\(m\)) s
%%IncludeResource: font Helvetica
/Helvetica /ISOLatin1Encoding 120 FMSR
962 2123 mt
( ) s
3533 277 mt
( ) s
6 w
%%IncludeResource: font Helvetica
/Helvetica /ISOLatin1Encoding 132 FMSR
1712 400 mt
(Our closed-form solutions) s
gs 1201 247 2363 381 rc
18 w
gs 1407 284 137 137 rc
24 24 1475 352 FO
gr
gr
18 w
1712 569 mt
(Closed-form solutions for prism) s
gs 1201 247 2363 381 rc
393 0 1279 521 2 MP stroke
6 w
gr
6 w
1 sg
0 1846 2569 0 0 -1846 4380 2062 4 MP
PP
-2569 0 0 1846 2569 0 0 -1846 4380 2062 5 MP stroke
4 w
DO
SO
6 w
0 sg
4380 2062 mt 6949 2062 L
4380 216 mt 6949 216 L
4380 2062 mt 4380 216 L
6949 2062 mt 6949 216 L
4380 2062 mt 6949 2062 L
4380 2062 mt 4380 216 L
4380 2062 mt 4380 2036 L
4380 216 mt 4380 242 L
4231 2218 mt
(-30) s
4808 2062 mt 4808 2036 L
4808 216 mt 4808 242 L
4659 2218 mt
(-20) s
5236 2062 mt 5236 2036 L
5236 216 mt 5236 242 L
5087 2218 mt
(-10) s
5664 2062 mt 5664 2036 L
5664 216 mt 5664 242 L
5628 2218 mt
(0) s
6092 2062 mt 6092 2036 L
6092 216 mt 6092 242 L
6019 2218 mt
(10) s
6520 2062 mt 6520 2036 L
6520 216 mt 6520 242 L
6447 2218 mt
(20) s
6949 2062 mt 6949 2036 L
6949 216 mt 6949 242 L
6876 2218 mt
(30) s
4380 1798 mt 4405 1798 L
6949 1798 mt 6923 1798 L
4122 1846 mt
(-10) s
4380 1534 mt 4405 1534 L
6949 1534 mt 6923 1534 L
4195 1582 mt
(-8) s
4380 1271 mt 4405 1271 L
6949 1271 mt 6923 1271 L
4195 1319 mt
(-6) s
4380 1007 mt 4405 1007 L
6949 1007 mt 6923 1007 L
4195 1055 mt
(-4) s
4380 744 mt 4405 744 L
6949 744 mt 6923 744 L
4195 792 mt
(-2) s
4380 480 mt 4405 480 L
6949 480 mt 6923 480 L
4272 528 mt
(0) s
4380 217 mt 4405 217 L
6949 217 mt 6923 217 L
4272 265 mt
(2) s
4380 162 mt
(x 10) s
%%IncludeResource: font Helvetica
/Helvetica /ISOLatin1Encoding 88 FMSR
4629 81 mt
(-11) s
4380 2062 mt 6949 2062 L
4380 216 mt 6949 216 L
4380 2062 mt 4380 216 L
6949 2062 mt 6949 216 L
gs 4380 217 2570 1846 rc
18 w
gr
18 w
gs 4312 398 2706 1643 rc
24 24 4380 776 FO
24 24 4508 503 FO
24 24 4636 495 FO
24 24 4765 476 FO
24 24 4893 481 FO
24 24 5022 481 FO
24 24 5150 481 FO
24 24 5279 481 FO
24 24 5407 480 FO
24 24 5536 480 FO
gr
gs 4380 217 2570 1846 rc
gr
gs 4312 398 2706 1643 rc
24 24 5792 480 FO
24 24 5921 481 FO
24 24 6049 481 FO
24 24 6178 480 FO
24 24 6306 480 FO
24 24 6435 478 FO
24 24 6563 479 FO
24 24 6692 485 FO
24 24 6820 466 FO
24 24 6949 1972 FO
gr
gs 4380 217 2570 1846 rc
gr
%%IncludeResource: font Helvetica
/Helvetica /ISOLatin1Encoding 132 FMSR
3980 1831 mt -90 rotate
(Relative error of T) s
90 rotate
%%IncludeResource: font Helvetica
/Helvetica /ISOLatin1Encoding 96 FMSR
4046 785 mt -90 rotate
(yz) s
90 rotate
%%IncludeResource: font Helvetica
/Helvetica /ISOLatin1Encoding 132 FMSR
3980 689 mt -90 rotate
( \(%\)) s
90 rotate
5531 2370 mt
(y\(m\)) s
6 w
end %%Color Dict
eplot
%%EndObject
epage
end
showpage
%%Trailer
%%EOF