laspack2.ps

一个用来实现偏微分方程中网格的计算库

%!PS-Adobe-2.0
%%Creator: dvips 5.58 Copyright 1986, 1994 Radical Eye Software
%%Title: LASPACK2.DVI
%%CreationDate: Wed Jan 17 13:16:52 1996
%%Pages: 40
%%PageOrder: Ascend
%%BoundingBox: 0 0 612 792
%%EndComments
%DVIPSCommandLine: c:\user\tex\emtex\bin\dvips32.exe LASPACK2.DVI
%+ -pj=G:\SOURCES\LASPACK\DOC\LASPACK2.mfj
%DVIPSParameters: dpi=300, compressed, comments removed
%DVIPSSource:  TeX output 1996.01.17:1316
%%BeginProcSet: texc.pro
/TeXDict 250 dict def TeXDict begin /N{def}def /B{bind def}N /S{exch}N
/X{S N}B /TR{translate}N /isls false N /vsize 11 72 mul N /hsize 8.5 72
mul N /landplus90{false}def /@rigin{isls{[0 landplus90{1 -1}{-1 1}
ifelse 0 0 0]concat}if 72 Resolution div 72 VResolution div neg scale
isls{landplus90{VResolution 72 div vsize mul 0 exch}{Resolution -72 div
hsize mul 0}ifelse TR}if Resolution VResolution vsize -72 div 1 add mul
TR[matrix currentmatrix{dup dup round sub abs 0.00001 lt{round}if}
forall round exch round exch]setmatrix}N /@landscape{/isls true N}B
/@manualfeed{statusdict /manualfeed true put}B /@copies{/#copies X}B
/FMat[1 0 0 -1 0 0]N /FBB[0 0 0 0]N /nn 0 N /IE 0 N /ctr 0 N /df-tail{
/nn 8 dict N nn begin /FontType 3 N /FontMatrix fntrx N /FontBBox FBB N
string /base X array /BitMaps X /BuildChar{CharBuilder}N /Encoding IE N
end dup{/foo setfont}2 array copy cvx N load 0 nn put /ctr 0 N[}B /df{
/sf 1 N /fntrx FMat N df-tail}B /dfs{div /sf X /fntrx[sf 0 0 sf neg 0 0]
N df-tail}B /E{pop nn dup definefont setfont}B /ch-width{ch-data dup
length 5 sub get}B /ch-height{ch-data dup length 4 sub get}B /ch-xoff{
128 ch-data dup length 3 sub get sub}B /ch-yoff{ch-data dup length 2 sub
get 127 sub}B /ch-dx{ch-data dup length 1 sub get}B /ch-image{ch-data
dup type /stringtype ne{ctr get /ctr ctr 1 add N}if}B /id 0 N /rw 0 N
/rc 0 N /gp 0 N /cp 0 N /G 0 N /sf 0 N /CharBuilder{save 3 1 roll S dup
/base get 2 index get S /BitMaps get S get /ch-data X pop /ctr 0 N ch-dx
0 ch-xoff ch-yoff ch-height sub ch-xoff ch-width add ch-yoff
setcachedevice ch-width ch-height true[1 0 0 -1 -.1 ch-xoff sub ch-yoff
.1 sub]/id ch-image N /rw ch-width 7 add 8 idiv string N /rc 0 N /gp 0 N
/cp 0 N{rc 0 ne{rc 1 sub /rc X rw}{G}ifelse}imagemask restore}B /G{{id
gp get /gp gp 1 add N dup 18 mod S 18 idiv pl S get exec}loop}B /adv{cp
add /cp X}B /chg{rw cp id gp 4 index getinterval putinterval dup gp add
/gp X adv}B /nd{/cp 0 N rw exit}B /lsh{rw cp 2 copy get dup 0 eq{pop 1}{
dup 255 eq{pop 254}{dup dup add 255 and S 1 and or}ifelse}ifelse put 1
adv}B /rsh{rw cp 2 copy get dup 0 eq{pop 128}{dup 255 eq{pop 127}{dup 2
idiv S 128 and or}ifelse}ifelse put 1 adv}B /clr{rw cp 2 index string
putinterval adv}B /set{rw cp fillstr 0 4 index getinterval putinterval
adv}B /fillstr 18 string 0 1 17{2 copy 255 put pop}for N /pl[{adv 1 chg}
{adv 1 chg nd}{1 add chg}{1 add chg nd}{adv lsh}{adv lsh nd}{adv rsh}{
adv rsh nd}{1 add adv}{/rc X nd}{1 add set}{1 add clr}{adv 2 chg}{adv 2
chg nd}{pop nd}]dup{bind pop}forall N /D{/cc X dup type /stringtype ne{]
}if nn /base get cc ctr put nn /BitMaps get S ctr S sf 1 ne{dup dup
length 1 sub dup 2 index S get sf div put}if put /ctr ctr 1 add N}B /I{
cc 1 add D}B /bop{userdict /bop-hook known{bop-hook}if /SI save N @rigin
0 0 moveto /V matrix currentmatrix dup 1 get dup mul exch 0 get dup mul
add .99 lt{/QV}{/RV}ifelse load def pop pop}N /eop{SI restore showpage
userdict /eop-hook known{eop-hook}if}N /@start{userdict /start-hook
known{start-hook}if pop /VResolution X /Resolution X 1000 div /DVImag X
/IE 256 array N 0 1 255{IE S 1 string dup 0 3 index put cvn put}for
65781.76 div /vsize X 65781.76 div /hsize X}N /p{show}N /RMat[1 0 0 -1 0
0]N /BDot 260 string N /rulex 0 N /ruley 0 N /v{/ruley X /rulex X V}B /V
{}B /RV statusdict begin /product where{pop product dup length 7 ge{0 7
getinterval dup(Display)eq exch 0 4 getinterval(NeXT)eq or}{pop false}
ifelse}{false}ifelse end{{gsave TR -.1 .1 TR 1 1 scale rulex ruley false
RMat{BDot}imagemask grestore}}{{gsave TR -.1 .1 TR rulex ruley scale 1 1
false RMat{BDot}imagemask grestore}}ifelse B /QV{gsave newpath transform
round exch round exch itransform moveto rulex 0 rlineto 0 ruley neg
rlineto rulex neg 0 rlineto fill grestore}B /a{moveto}B /delta 0 N /tail
{dup /delta X 0 rmoveto}B /M{S p delta add tail}B /b{S p tail}B /c{-4 M}
B /d{-3 M}B /e{-2 M}B /f{-1 M}B /g{0 M}B /h{1 M}B /i{2 M}B /j{3 M}B /k{
4 M}B /w{0 rmoveto}B /l{p -4 w}B /m{p -3 w}B /n{p -2 w}B /o{p -1 w}B /q{
p 1 w}B /r{p 2 w}B /s{p 3 w}B /t{p 4 w}B /x{0 S rmoveto}B /y{3 2 roll p
a}B /bos{/SS save N}B /eos{SS restore}B end
%%EndProcSet
TeXDict begin 40258431 52099146 1000 300 300
(/SOURCES/LASPACK/DOC/LASPACK2.DVI) @start /Fa 8 68 df<1430146014C0EB01
80EB03005B130E130C5B1338133013705B5B12015B1203A290C7FC5A1206120EA2120C12
1CA312181238A45AA75AB3A31270A77EA41218121CA3120C120EA2120612077E7FA21201
7F12007F13701330133813187F130E7F7FEB0180EB00C014601430146377811F>18
D<12C012607E7E7E120E7E7E6C7E7F12007F1370133013381318131CA2130C130E130613
07A27F1480A3130114C0A4EB00E0A71470B3A314E0A7EB01C0A414801303A314005BA213
06130E130C131CA213181338133013705B5B12015B48C7FC5A120E120C5A5A5A5A14637F
811F>I<140C141814381430146014E014C01301EB0380A2EB0700A2130EA25BA25BA213
78137013F0A25B1201A2485AA4485AA3120F90C7FCA35AA2121EA3123EA4123CA3127CA8
1278A212F8B1164B748024>48 D<12C01260127012307E121C120C120E7EA26C7EA26C7E
A26C7EA21370A213781338133CA2131C131EA27FA4EB0780A314C01303A314E0A21301A3
14F0A41300A314F8A81478A2147CB1164B7F8024>I<12F8B11278A2127CA8123CA3123E
A4121EA3121FA27EA37F1207A36C7EA46C7EA212007FA2137013781338A27FA27FA27FA2
EB0380A2EB01C0130014E01460143014381418140C164B748224>64
D<147CB11478A214F8A814F0A31301A414E0A31303A214C0A313071480A3EB0F00A4131E
A2131C133CA2133813781370A25BA2485AA2485AA248C7FCA2120E120C121C12185A1270
12605A164B7F8224>I<12F8B3A9051B748024>I<12F8B3A9051B6E8024>I
E /Fb 21 122 df<0008130648130EA248130614025A1308131800801304A2EB300C1408
00C01318EBF030B512F0387F9FE0EB1FC0383E0F00171280911A>33
D<13FCEA03FEEA0E07EA180012105AA2EA10C0EA1720EA1FE0EA20005AA25AA21304EA40
08EA6030EA3FE0EA0F8010147F9213>I<126012F0A2126004047C830C>58
D<126012F0A212701210A41220A212401280040C7C830C>I<EC01801407EC1E001478EB
01E0EB0780010EC7FC133813F0EA03C0000FC8FC123C12F0A2123C120FEA03C0EA00F013
38130E6D7EEB01E0EB0078141EEC07801401191A7D9620>I<130113031306A3130CA313
18A31330A31360A213C0A3EA0180A3EA0300A31206A25AA35AA35AA35AA35AA210297E9E
15>I<140CA2141CA2143C145CA2149E148EEB010E1302A21304A213081310A2497EEB3F
FFEB40071380A2EA0100A212025AA2001C148039FF803FF01C1D7F9C1F>65
D<48B5128039003C01E090383800701538153C151C5B151EA35BA44848133CA315384848
1378157015F015E039070001C0EC0380EC0700141C000E1378B512C01F1C7E9B22>68
D<3801FFE038003C001338A45BA45BA4485AA438038002A31404EA0700140C1418143800
0E13F0B5FC171C7E9B1C>76 D<EB03F8EB0E0E90383803809038E001C0EA01C039038000
E048C7FC4814F0121E121C123CA25AA348EB01E0A3EC03C0A215801407EC0F0038703C0E
EB421C383882385C381C83C0380787813801FF01380003031402148E14FC5C130114E01C
257E9C21>81 D<3801FFFE39003C03C090383800E015F01570A24913F0A3EC01E001E013
C0EC0780EC1E00EBFFF03801C038140C140EA2EA0380A43807001E1508A2151048130FD8
FFE01320C7EA03C01D1D7E9B20>I<397FF03FE0390F000700000E13061404A3485BA448
5BA4485BA4485BA35CA249C7FCEA60025B6C5AEA1830EA07C01B1D7D9B1C>85
D<3AFFC0FFC0FF3A3C001C003C001C1510143C1620025C1340A2029C1380A29039011C01
00A20102130213045D01085BA2496C5A121ED80E205BA201405B018013C05D260F000FC7
FCA2000E130EA2000C130CA2281D7D9B27>87 D<123F1207A2120EA45AA4EA39E0EA3A30
EA3C1812381270131CA3EAE038A313301370136013C01261EA2300121E0E1D7E9C12>98
D<EA01F0EA030C120CEA1C1EEA383CEA3018EA7000A25AA51304EA60081310EA3060EA1F
800F127E9112>I<EA0FC01201A2485AA448C7FCA4EA0E3E13C3380F0380120E121E121C
A338380700A3130E00701320A2131C144038E00C8038600700131D7E9C18>104
D<EA3C3CEA4E42EA4687EA470FEA8E1E130CEA0E00A25AA45AA45A123010127E9113>
114 D<EA01F0EA060CEA0C04130EEA180CEA1C00121FEA0FE013F0EA03F8EA0038EA201C
EA701812F01310EA8030EA6060EA1F800F127E9113>I<001C13C0EA27011247A2388703
80A2120EA2381C0700A438180E20A3EA1C1E380C26403807C38013127E9118>117
D<380787803808C8403810F0C03820F1E0EBE3C03840E1803800E000A2485AA438638080
12F3EB810012E5EA84C6EA787813127E9118>120 D<001C13C0EA27011247A238870380
A2120EA2381C0700A4EA180EA3EA1C1EEA0C3CEA07DCEA001C1318EA6038EAF0305B485A
EA4180003EC7FC121A7E9114>I E /Fc 5 57 df<120C121C12EC120CAFEAFFC00A137D
9211>49 D<121FEA60C01360EAF07013301260EA0070A2136013C012011380EA02005AEA
08101210EA2020EA7FE012FF0C137E9211>I<136013E0A2EA016012021206120C120812
101220126012C0EAFFFCEA0060A5EA03FC0E137F9211>52 D<EA6060EA7FC01380EA4400
1240A3124FEA70C0EA40E0EA00601370A212E0A21360EA40E0EA21C0EA1F000C137E9211
>I<EA0FC0EA1070EA20181260A21270EA3C30EA3F60EA0F8013E0EA31F0EA6078EAC01C
130CA3EA6018EA3030EA0FC00E137F9211>56 D E /Fd 3 50 df<B512C0A212027D871A
>0 D<1204120EA2121CA31238A212301270A21260A212C0A2070F7F8F0A>48
D<000F131E393BC06180396060804038403100D8801A1320130EA3130B39401180409038
20C0C03930C07B80390F001E001B0D7E8C21>I E /Fe 1 85 df<381FFFF838381C18EA
2038140812401410EA807000001300A35BA4485AA4485AEA3FF81514809314>84
D E /Ff 19 89 df<131E133FA3EB7380A5EBF3C0A313E100017FA43803C0F0A5380780
78EBFFF8A3487FEB003CA4001E7FA239FFC0FFC0A41A257EA41F>65
D<90381F81C0EB7FE13801FFFB4813FF3807F03F380FC01F381F800FEB0007123E003C13
03127C1278A291C7FC5AA91278A2EC03C0127C123C123E6CEB07801380390FC00F003807
F03F3803FFFE6C5B38007FF0EB1FC01A257EA41F>67 D<387FFF80B512E014F86C7F380F
00FE143E80EC0F80A2140715C01403A215E01401A9140315C0A31407EC0F80A2EC1F0014
3E14FE387FFFFCB55A14E06C13801B257FA41F>I<B612C0A4380F0003A691C7FCA3EB01
E0A313FFA41301A390C8FCA3EC01E0A7B6FCA41B257EA41F>I<B612C0A4380F0003A691
C7FCA314F0A313FFA41300A391C7FCAAEAFFF8A41A257EA41F>I<EB3F07EBFFC74813EF
000713FF13E0380F807F48487E001E7F123E003C7F127C1278A200F890C7FC5AA6ECFFC0
4913E0A26C6C13C00078EB0F00A25C7E123E121E001F5B6C6C5A3807E0FF90B5FC000113
EF6C13CFEB3F0F1B257EA41F>I<397FE07FE039FFF0FFF0A2397FE07FE0390F000F00AC
90B5FCA4EB000FAD397FE07FE039FFF0FFF0A2397FE07FE01C257FA41F>I<387FFFF8B5
12FCA26C13F838007800B3AB387FFFF8B512FCA26C13F816257CA41F>I<EAFFF87FA25B
000FC8FCB3A4EC0180EC03C0A6B6FCA41A257EA41F>76 D<00FEEB07F06C130FA2EB801F
001DEB1B80A2EBC03BA2001C1333EBE073A3EB6063EB70E3A2EB30C31339A3EB1983A213
1FEB0F03A213061300A839FF801FF0A41C257FA41F>I<007FEB3FE039FF807FF0A2397F
C03FE0000FEB0700EA0EE0A31370A31338A2131CA3130EA213061307A2EB0387A3EB01C7
A2EB00E7A31477A3143FEA7FC0486C7EA26C487E1C257FA41F>I<3803FFC0001F13F848
13FCA2387E007E007C133E0078131EA200F8131F48130FB36C131F0078131EA2007C133E
007F13FE383FFFFCA26C13F8000313C018257DA41F>I<B512C014F014FC80380F007FEC
1F80140F140715C01403A414071580140F141FEC7F00EBFFFE5C14F014C090C8FCABEAFF
F0A41A257EA41F>I<3803FFC0001F13F84813FCA2387F00FE007C133E0078131EA200F8
131F48130FB2133E00F8131F38781F1EA2387C0FBE387F07FE383FFFFCA26C13F8000313
E0380001F0EB00F8A2147CA2143EA2141E182D7DA41F>I<EA7FFFB512E0806C7F380F01
FCEB007E141E141F80A45C141E147E495AEBFFF85C5C80EB01F8EB0078147C143CA71578
A2143E397FE01FF0EAFFF0EC0FE0397FE003C01D257FA41F>I<3801FC1C3807FF9C4813
FC123F1303EA7C000078137C48133CA414001278127C7EEA3FE0EA1FFE3807FFC0000113
F038001FF8EB01FCEB007C143E141E140FA2127012F0A2141F6C131E6C133EB413FCEBFF
F814F000E313E000E0130018257DA41F>I<007FB512F0B6FCA338F00F00A600001400B3
A53801FFF8A41C257FA41F>I<39FFC03FF0EBE07FA2EBC03F391F000F806C1400A36D5A
0007131EA3EBC03E0003133CA46C6C5AA46C6C5AA4EB70E01379A3EB39C0A4EB1F80A36D
C7FC1C257FA41F>86 D<393FE0FF80D87FF113C0A2D83FE013803907C07C0000031378EB
E0F800015B13F03800F1E013F9EB7BC0137F6D5AA2131F91C7FC7F5B80133F80137BEB79
E013F1EBF0F0EA01E014781203497E1207EB803E141E397FE07FE000FF14F0A2007F14E0
1C257FA41F>88 D E /Fg 8 108 df<B61280A219027D8A20>0 D<126012F0A212600404
7C8B0C>I<0040132000C01360006013C03830018038180300EA0C066C5A6C5AEA01B0EA
00E0A2EA01B0EA0318EA060C487E487E38300180386000C04813600040132013147A9320
>I<13041306ACB612E0A2D80006C7FCABB612E0A21B1C7E9A20>6
D<EA03C0EA0FF0EA1FF8EA3FFCEA7FFEA2B5FCA4EA7FFEA2EA3FFCEA1FF8EA0FF0EA03C0
10107E9115>15 D<EC01801407EC1E001478EB01E0EB0780010EC7FC133813F0EA03C000
0FC8FC123C12F0A2123C120FEA03C0EA00F01338130E6D7EEB01E0EB0078141EEC078014
0191C7FCA8007FB5FCB6128019247D9920>20 D<153081A381A281811680ED00C0B712F8
A2C912C0ED0380160015065DA25DA35D25167E942A>33 D<EA8010EAC030B3B3A4EA8010
0C2A7C9E15>107 D E /Fh 84 126 df<126012F0AF12601200A4126012F0A212600419
779816>33 D<EAE038EAF078A7EAE038A2EA60300D0B7C9816>I<EA0387A6B512E0A27E
38070E00A3EA0E1CA4387FFFE0B5FCA2381C3800A613197F9816>I<38380180EA7C03A2
38EE0700A2130EA35B127C5B1238C65AA35BA2485AA3485AEB8380380707C0A2380E0EE0
A3121CA2383807C0A23818038013207F9C16>37 D<EA0380EA07E0120FEA1E70121CA3EB
F7E013E7EA1DC7000F1300138E130E121F485AEA7B9C1273EAE1F8A238E0F0E0A2EA71F8
387FFFC0EA3F9F381E070013197F9816>I<13E01201EA0380EA0700120E5AA25AA25AA3
5AA91270A37EA27EA27E7EEA0380EA01E012000B217A9C16>40 D<12C07E12707E7E7EA2
7EA2EA0380A3EA01C0A9EA0380A3EA0700A2120EA25A5A5A5A5A0A217B9C16>I<EA0380
A4EAE38EEAF39EEAFFFEEA3FF8EA0FE0A2EA3FF8EAFFFEEAF39EEAE38EEA0380A40F127D
9516>I<13E0A8B512E0A33800E000A813137F9516>I<1238127C127EA2123E120E121E12
1C127812F01260070B798416>I<B51280A311037E8D16>I<127012F8A312700505788416
>I<EB01801303A2EB0700A2130EA25BA25BA25BA25BA2485AA2485AA248C7FCA2120EA2
5AA25AA25AA25AA25A11207E9C16>I<EA03E0EA0FF8487EEA1E3CEA380EEA780FEA7007
A238E00380A8EAF00700701300A2EA780FEA3C1E6C5AEA1FFC6C5AEA03E011197E9816>
I<12035AA25A5AB4FCA212E71207AEEAFFF8A30D197B9816>I<EA07E0EA1FF8487EEA78
3EEAE00700F01380130312601200A2EB0700A2130E5B5B5B5B485A485A000FC7FC381E03
801238EA7FFFB5FC7E11197E9816>I<EA07E0EA1FF8487EEA781E130712301200A2130E
133EEA07FC13F013FCEA001E13077F1480A2126012F038E00700EA781EEA3FFC6C5AEA07