LCPQ/irpf90
10
0
Fork 0
mirror of https://gitlab.com/scemama/irpf90.git synced 2024-12-22 04:13:33 +01:00
Code Releases Activity

Website branch clean

Browse Source
This commit is contained in:
Anthony Scemama 2018-11-20 18:29:36 +01:00
parent 7e275a5512
commit 9351d38eff
91 changed files with 9732 additions and 8602 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
.gitignore vendored
View File

@ -1,11 +0,0 @@
packages/.rpmmacros
packages/*.tar.gz
packages/*.rpm
packages/sourceforge.sh
packages/version
src/*.pyc
src/*.pyo
irpf90.make
irpf90_entities
IRPF90_temp
IRPF90_man

518
Irpf90.xpm
View File

@ -1,518 +0,0 @@
/* XPM */
static char *Irpf__[] = {
/* columns rows colors chars-per-pixel */
"256 256 256 2",
" c #000000",
". c #0B0000",
"X c #020B0C",
"o c #150000",
"O c #1B0101",
"+ c #041213",
"@ c #161719",
"# c #240000",
"$ c #2C0000",
"% c #360101",
"& c #3C1F1F",
"* c #0A1E21",
"= c #12272B",
"- c #142629",
"; c #1C3136",
": c #162A2D",
"> c #3E2121",
", c #28373B",
"< c #2C2F32",
"1 c #440101",
"2 c #4D0101",
"3 c #510000",
"4 c #5B0000",
"5 c #421F1F",
"6 c #6A0000",
"7 c #640000",
"8 c #740000",
"9 c #7B0000",
"0 c #462525",
"q c #482727",
"w c #4B2A2A",
"e c #562D2D",
"r c #592F2F",
"t c #512726",
"y c #5C3232",
"u c #503131",
"i c #4E3333",
"p c #623535",
"a c #653A3A",
"s c #693D3D",
"d c #633738",
"f c #713E3E",
"g c #323D41",
"h c #693F40",
"j c #3E5158",
"k c #3E5057",
"l c #374348",
"z c #46545B",
"x c #4E4F54",
"c c #6D4444",
"v c #6B4849",
"b c #7E4545",
"n c #724B4B",
"m c #734646",
"M c #765152",
"N c #795454",
"B c #7D5A5A",
"V c #785758",
"C c #744F50",
"Z c #4C5D66",
"A c #475961",
"S c #565F66",
"D c #59656E",
"F c #656E76",
"G c #6B6F76",
"H c #850000",
"J c #8B0101",
"K c #930303",
"L c #9A0405",
"P c #A40101",
"I c #AB0000",
"U c #B60000",
"Y c #BB0000",
"T c #C50000",
"R c #CA0000",
"E c #D20000",
"W c #DA0000",
"Q c #E30000",
"! c #824646",
"~ c #874949",
"^ c #8C4C4C",
"/ c #8C4747",
"( c #914E4E",
") c #994E4E",
"_ c #825D5D",
"` c #865454",
"' c #965151",
"] c #9D5555",
"[ c #9C5B5B",
"{ c #945C5C",
"} c #98504F",
"| c #A25756",
" . c #A55B5B",
".. c #A85E5E",
"X. c #A45857",
"o. c #8A5F60",
"O. c #856465",
"+. c #896667",
"@. c #8B6A6B",
"#. c #866769",
"$. c #9B6667",
"%. c #8D7273",
"&. c #927474",
"*. c #967B7C",
"=. c #9A7E7E",
"-. c #987578",
";. c #936E71",
":. c #A66262",
">. c #AB6565",
",. c #A66A6B",
"<. c #AD6A6A",
"1. c #A56768",
"2. c #B06F6F",
"3. c #B16565",
"4. c #A86F71",
"5. c #AD7172",
"6. c #A5767A",
"7. c #A7777A",
"8. c #B27373",
"9. c #B67B7B",
"0. c #B97E7E",
"q. c #B47777",
"w. c #A46060",
"e. c #657683",
"r. c #6B7984",
"t. c #687985",
"y. c #747C85",
"u. c #977E81",
"i. c #A67C80",
"p. c #A97E81",
"a. c #B77F81",
"s. c #78838C",
"d. c #7D8B98",
"f. c #9C8182",
"g. c #9D878A",
"h. c #979096",
"j. c #A38B8C",
"k. c #A68587",
"l. c #BB8383",
"z. c #BE8A8B",
"x. c #B68182",
"c. c #A48E92",
"v. c #BB8E91",
"b. c #A49195",
"n. c #AB9596",
"m. c #AA9699",
"M. c #AD999A",
"N. c #A79799",
"B. c #B19B9B",
"V. c #BC959A",
"C. c #909CA6",
"Z. c #AE9EA2",
"A. c #BC9CA2",
"S. c #96A5B4",
"D. c #97A2AC",
"F. c #B4A2A4",
"G. c #BCABAC",
"H. c #B7A6A9",
"J. c #BCAEB2",
"K. c #B7ACB1",
"L. c #BEB1B4",
"P. c #BEB5B9",
"I. c #A7AFB7",
"U. c #C18D8D",
"Y. c #C18786",
"T. c #C49494",
"R. c #C5999A",
"E. c #C99E9E",
"W. c #C1979A",
"Q. c #C49EA2",
"!. c #C8A7A9",
"~. c #C7ADB2",
"^. c #C4B3B4",
"/. c #CCB5BA",
"(. c #C4B9BC",
"). c #CBBBBC",
"_. c #C7B3B8",
"`. c #D1B6B9",
"'. c #D5B9BA",
"]. c #D6B7B8",
"[. c #D1ADAE",
"{. c #9FB1C4",
"}. c #A5B5C5",
"|. c #ADBED1",
" X c #B4BFC9",
".X c #C7BDC2",
"XX c #D5BEC2",
"oX c #BAC3CF",
"OX c #B6C4D3",
"+X c #AEC3D8",
"@X c #B6D0E7",
"#X c #BAD1E7",
"$X c #BAD1E8",
"%X c #B7CEE4",
"&X c #CCC1C3",
"*X c #CCC5CA",
"=X c #CBC6CB",
"-X c #D2C4C5",
";X c #D2C5CB",
":X c #D4CACB",
">X c #D9CDCD",
",X c #DBC3C4",
"<X c #C9CBD5",
"1X c #D3CDD3",
"2X c #D6CDD5",
"3X c #DCD3D3",
"4X c #D6D4DB",
"5X c #DAD5DC",
"6X c #DCDADE",
"7X c #D4D1D6",
"8X c #C5D1DC",
"9X c #E3DCDD",
"0X c #E4D5D7",
"qX c #E1CCCD",
"wX c #C8D8E6",
"eX c #D5D9E4",
"rX c #DCDCE3",
"tX c #D8D9E4",
"yX c #C4DDF4",
"uX c #E2DEE3",
"iX c #DDE1EA",
"pX c #CAE5FE",
"aX c #CEE8FF",
"sX c #CAE2F7",
"dX c #DCE9F7",
"fX c #D1E7FC",
"gX c #D4EAFF",
"hX c #DBEEFF",
"jX c #D9E5F2",
"kX c #DEF1FF",
"lX c #DDFBFF",
"zX c #D5F1FF",
"xX c #E6E1E2",
"cX c #EAE4E5",
"vX c #E3E5EC",
"bX c #E6E8EE",
"nX c #ECEAEC",
"mX c #ECE6E9",
"MX c #F2EDED",
"NX c #F0E6E6",
"BX c #E5EBF3",
"VX c #EBEEF4",
"CX c #E1EFFE",
"ZX c #E4EBF5",
"AX c #ECF1F6",
"SX c #E4F2FF",
"DX c #ECF5FF",
"FX c #E3FCFF",
"GX c #EDFBFF",
"HX c #F4F3F4",
"JX c #F8F6F6",
"KX c #F0F7FE",
"LX c #F4F9FF",
"PX c #FDFEFF",
"IX c #FAF7F9",
"UX c #F2EFF1",
/* pixels */
"pXpXpXpXpXpXpXpXpXpXpXpXpXyXpXpXpXpXyXpXpXpXpXpXpXpXpXpXaXaXaXaXaXaXaXaXaXpXpXpXpXyXpXyXpXpXaXaXaXaXaXaXaXzXaXaXaXaXaXaXaXaXaXaXaXaXaXaXaXaXgXaXaXaXzXpXaXpXpXpXaXpXpXaXpXpXaXpXpXpXfXgXgXaXzXgXgXzXgXgXzXgXgXzXgXzXgXgXzXgXzXgXgXzXgXzXgXgXfXfXfXfXgXfXgXaXgXgXaXgXaXgXgXzXzXkXzXkXzXhXkXhXzXhXzXhXkXzXkXzXkXkXhXzXzXhXkXzXkXzXkXkXkXzXkXkXkXzXhXgXgXhXhXgXhXhXgXhXhXgXhXhXhXkXSXkXkXSXkXzXkXhXhXhXhXhXhXhXCXhXhXhXhXhXhXhXCXhXkXhXCXhXhXSXkXhXkXkXSXSXFXSXSXFXSXSXkXSXkXhXSXCXSXhXSXhXSXCXSXCXSXhXSXSXSXSXSXSXSXSXSXSXCXSXSXSX",
"pXpXpXpXyXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXyXpXpXpXe.s.e.e.e.e.e.e.e.t.d.zXpXpXpXpXpXpXyXD e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.e.F FXzXfXpXpXpXpXpXpXpXfXfXpXaXaXzXF e.e.e.r.e.e.e.e.e.t.e.t.e.e.r.r.e.e.r.e.e.r.r.e.F FXFXhXzXfXgXfXfXgXgXaXgXfXgXgXzXd.r.r.t.t.r.e.e.r.r.r.r.e.e.r.e.r.r.e.r.r.r.r.r.r.r.r.r.r.r.r.r.r.G }.zXhXgXhXgXhXhXgXgXhXhXkXFXGXLXG r.r.r.r.S.PXGXkXkXhXhXhXhXhXhXhXhXCXCXhXCXhXCXhXhXCXhXSXhXhXkXzXSXLXFXF r.y.y.r.s.PXLXSXSXkXSXhXCXCXCXSXkXSXhXSXCXSXSXSXCXSXhXSXSXSXSXCXSXSXSXSX",
"pXpXpXpXpXpXpXpXpXpXpXpXpXpXpXyXpXpXpXpXpXpXpXpXpXlXX % 3 3 3 3 2 3 3 1 * lXpXpXpXpXpXpX@X 3 3 3 3 1 2 3 3 3 3 1 3 3 3 3 3 2 2 3 3 3 3 2 3 3 3 3 4 g +XzXfXfXpXpXpXaXpXaXaXpXpXFX 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 4 e.C.LXaXgXgXaXgXgXgXgXaXfXFX- 1 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 O r.kXhXhXgXgXhXhXhXhXzXPXG l 4 3 3 $ s.S.FXhXhXhXhXhXhXhXCXhXhXkXhXhXkXCXhXhXhXSXkXPXh.G 4 3 3 2 s.jXFXSXSXSXkXSXhXSXCXSXSXCXSXSXCXSXCXSXSXkXSXSXSXSXSXSXSX",
"pXpXpXpXpXyXpXpXpXyXpXyXpXpXpXpXyXpXpXpXyXpXpXpXpXlX U Y Y Y Y U U U L = lXpXpXpXpXpXyX@XX R Y Y Y Y U Y Y U T U Y Y Y Y Y U U Y Y Y T U Y Y Y Y Y R H O , +XaXaXaXaXpXfXpXpXaXaXlX R Y Y Y Y Y Y U Y Y U T U Y Y Y Y Y Y U Y U T Y T R 4 % FXgXfXgXgXfXaXgXgXgXFX= P U U T Y Y Y Y Y Y Y Y U T Y Y U T Y Y Y T Y Y Y Y Y Y Y Y Y T 2 y.kXgXhXhXhXhXgXgXPXs. 3 H R R Y Y U T T E 3 $ G LXkXhXhXhXCXhXhXhXhXhXhXSXhXhXhXkXSXGXD. % 4 E R Y Y U T T T 3 x jXSXSXhXSXSXkXSXSXhXSXkXSXSXSXSXkXCXSXSXSXSXSXCXSXSX",
"yXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U U L = lXpXpXpXpXpXpX#X T U U U U U U U U U U U U Y U U U U U U U U U U U U U U U Y R J o #XpXpXaXpXaXpXaXpXfXFX T U U U U U U U U Y U U U U U U U U U U U U U U U U Y Y U d.FXfXgXfXgXgXgXgXGX- L U U U U U U U U U U U U U U Y U U U U U U U U U Y U U U U U Y 2 t.hXhXhXgXhXgXkXwX 3 E Y Y U U U U U Y U U Y R 4 S.FXSXhXhXhXhXSXhXhXhXhXCXCXhXhXkXS % U Y Y U U U U U U U Y Y R 8 . S IXkXSXkXSXCXkXSXSXkXSXSXSXSXSXSXSXSXSXSXSXSXSXSX",
"pXpXpXpXyXpXpXpXpXpXpXpXpXyXpXpXpXpXpXpXpXyXpXpXpXlX U U U U U U U U L = lXpXpXpXpXpXpX#X R U U U U U U Y U U U U U U U U U Y U Y U U U U U U U U U U U U R . GXaXaXfXaXfXpXpXaXFX T U U U U U U U U U U Y U Y U U U U U Y U U U U U U U U U R 1 d.FXgXfXfXfXfXgXFX: L U U U Y U U U U U U U U U U U U U Y U U Y U U U U U U U U U Y 2 y.kXgXhXgXhXhXwX . W Y U U U U U U U U U U U U U Y E % S.GXhXkXhXhXhXhXhXSXCXhXhXdXGX 7 R U U U Y U U U U U U U U U U R 8 S PXkXSXCXkXSXSXCXSXhXSXCXSXSXSXSXSXSXSXSXSXSXSX",
"pXyXpXpXpXpXpXpXpXpXyXpXpXpXyXpXpXyXpXpXpXpXpXpXpXlX U U U U U U U I L = lXpXpXpXpXpXpX@X T U Y U U Y U U U U Y U U U U Y U U U U U U U U U U U U U U U U U W , zXfXpXaXpXfXaXaXFX T U U U U U U U U U U U U U U U Y U U U U U U U U U U U U U R 2 fXfXgXgXgXgXgXFX= L U U U U U U U U U U U U U U U U Y U U U U U U U U U U U U U Y 2 y.kXgXhXhXhXwX . E U U U Y U U U Y U U U U U U U U U R % S.FXkXCXhXhXkXhXhXhXSXCXCX T U U U U U U U U U U U U U U U U U T 6 z GXCXSXSXSXkXSXSXCXSXSXCXSXSXSXSXSXSXSXSXSXSX",
"pXpXpXpXpXpXyXpXyXpXpXpXpXpXpXpXpXpXpXpXpXyXpXpXpXlX U U U U U U U I K = zXpXpXpXpXpXpX#X T U U U U U U U U Y U U U U U U U U U U U U U U U U U U U U U U U U J +XaXaXfXpXaXpXaXFX Y U U U U Y U U U U U U U U U U U U U U U U U U U U U U U U U E kXfXgXgXgXhXFX= L I U U U U U U U U U U Y U U U U U U U U U U Y U U U U U U U T 2 y.kXhXhXzXOX o R U U U U U U U U U U U U U U U U U U U R % D.SXhXkXhXSXhXSXhXhXFXy. T U U U U U Y U U U U U Y U U U U U U U T 8 SXhXSXSXZXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSX",
"pXyXpXpXpXyXpXpXpXpXpXpXpXpXpXpXpXpXyXpXpXpXpXpXpXlX U U U U U U U I L = lXpXpXpXpXyXpX@X T U U U U U U U U U U Y U U U U U U U U U U U U U U U U U U U U U U R o , kXpXfXaXpXfXaXFX T U U U U U U U U U U U Y U U U U U U U U U U U U U U U U U U U U d.FXgXgXgXgXGX: L U U U U U U U U U U U U U U U U U U Y U U U U U Y U U U U U T 3 r.kXhXhXGX, o E U U U U U U U U U Y R R U U U U U U U U U E % + GXCXhXhXhXCXhXhXdXwX 4 T U U U U U U U U U R R U Y U U U U U U U T PXSXSXSXSXSXCXSXSXSXSXCXSXSXSXSXDXCXSXDXSX",
"pXpXpXyXpXpXpXyXpXpXpXyXyXpXpXyXpXpXpXpXpXpXpXpXpXlX U U U U U U U U L = lXpXpXpXpXpXpX#X T U U U U U U T 9 6 6 6 7 7 6 6 6 6 6 6 6 6 E R R U U U U U U U U U U J FXfXpXaXpXfXaXFX T U U U U U U U L 6 6 6 6 6 6 6 6 6 6 H E R U U U U U U U U U U T 2 zXfXgXgXgXFX= L U U U U U U U U 7 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 # s.kXhXhX8X J U U U U U U U T P 7 % O 8 J R U U U U U U U I D.SXSXSXhXhXSXkXPXX o W U U U U U U U T 7 7 8 8 T U U U U U U U T I.hXSXSXSXSXSXSXCXSXSXSXSXSXSXSXSXSXSXSXSX",
"yXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXyXpXlX U U U U U U U U K = lXpXpXpXpXpXpX#X T U U U U U U T o l Z Z A Z Z A Z Z Z Z Z 8 R U U U U U U U U R +XaXaXaXaXaXaXFX T U U U U U U U 8 * D Z Z Z Z Z Z Z g 7 T U U U U U U U U U I #XaXgXgXgXFX: L U U U U U U U U D Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z S Z Z S.hXhXFX, O R U U U U U U R % + D S S , O K Y U U U U U T % + FXCXhXCXhXkXdXwX I U U U U U U U T D D S S 3 T U U U U U U T % PXSXSXZXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSX",
"yXpXyXpXpXyXpXpXyXpXpXpXyXpXpXyXpXpXpXpXpXyXpXpXpXlX U U U U U U U U K = zXpXpXpXyXpXpX#X T U U U U U U T o |.gXzXzXzXzXzXzXzXzXzXzXzXzXFXz % R U U Y U U U U T o F gXaXpXaXaXaXFX T U U U U U U U 8 z FXzXkXzXkXlXzXkXzXFXGXD 9 T U U U U U U U R . d.gXgXgXgXFX= L U U U U U U U U LXFXFXSXFXSXFXSXSXFXSXFXSXFXSXFXSXFXSXFXFXFXSXkXgXhXOX J U U U U U U U 8 D.LXGXSXFXGXOX< T U U U U U U I D.FXCXhXkXSXLX o R U U U U U U Y hXGXLXFXPXy. 3 Y U U U U U U T C.kXSXSXSXSXSXCXCXAXSXDXDXSXSXSXDXSXSXDX",
"pXpXyXpXpXpXpXyXpXpXpXpXpXpXyXpXpXpXpXpXpXpXpXpXpXzX U U U U U U U U L = lXpXpXpXyXpXpX@X T U U U U Y U T o {.sXpXpXpXpXpXpXpXpXaXpXpXpXpXlXC. 6 U U U U U U U Y 3 t.gXaXpXfXaXpXFX T U U U U U U U 8 j lXfXaXaXfXaXgXfXgXfXfXkXFXx T U U U U U U U U 2 * FXgXgXgXGX: L I U U U U U U U GXgXhXgXgXhXgXgXgXhXhXgXhXgXhXgXgXhXgXhXhXhXhXgXhXkXF o R U U U U U U P x GXzXhXhXkXhXSXPX o T U U U U U T % , LXCXhXkXhXdX U U U U U U U T 8 hXhXSXSXkXhXPXy. U U U U U U U T % D GXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSX",
"pXpXpXpXyXpXpXpXpXyXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U U L = lXpXpXpXpXpXpX@X T U U U U U U T o }.sXpXpXaXpXpXpXpXpXpXpXaXpXpXpXlXZ 8 U U U U U U U Y 3 t.gXaXaXaXaXfXFX T U U U U U U U 8 k kXfXfXgXgXgXfXgXfXgXgXfXfXyX 9 Y U U U U U U U P = FXgXgXgXFX- L U U U U U U U U GXzXhXgXhXgXgXhXhXgXgXhXhXhXgXhXhXhXhXhXgXgXhXhXhXFXl 4 Y U U U U U U 8 + LXhXhXhXzXhXhXhXhXwX T U U U U U U J dXhXkXhXhXoX U U U U U U U R o S GXZXhXSXCXSXSXGX J U U U U U U Y 6 PXSXSXCXSXSXSXSXSXSXSXSXSXDXSXSXSXDXSX",
"pXyXpXyXpXpXpXpXpXpXpXyXpXpXpXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U U L = lXpXpXpXpXpXyX@X T U U U U U U T o {.pXpXpXpXpXpXpXaXpXaXaXpXpXpXpXzXA 1 Y U U U U U U Y 3 t.gXpXaXaXaXfXFX T U U U U U U U 8 j lXaXgXaXfXfXaXgXgXfXfXgXfXFXx o R U U U U U U U L * FXgXgXgXGX= L U U U U U U U U GXgXgXgXzXhXgXhXgXhXhXgXhXhXhXhXhXgXgXhXhXhXhXhXzXGX H Y U Y U U U R S GXhXhXhXhXSXhXhXzXPX % T U U U U U R GXzXSXSXSXs.o R U U U U U U P %XdXSXhXSXSXkXSXLX, 7 U U U U U U U T dXSXSXSXSXSXSXDXSXSXSXDXSXSXSXSXSXSXSX",
"yXpXpXpXpXyXpXpXpXyXpXyXpXpXpXyXpXpX$XpXpXpXpXpXpXlX U U U U U U U U K = lXpXpXpXpXpXpX@X T U U U U U U T o {.sXpXpXpXpXpXaXpXpXaXpXpXaXpXpXaXh. R U U U U U U Y 3 t.zXaXaXaXfXaXFX T U U U U U U U 8 j kXgXfXfXaXgXgXfXgXgXgXfXfXsXOXo R U U U U U U I P * FXhXgXgXGX- L U U U U U U U U GXhXgXhXgXhXgXgXhXgXgXhXgXgXhXgXgXhXhXhXgXhXhXhXhXGX R U U U U U U R LXzXhXhXCXhXhXhXhXZXhXI.# T U U U U U R < LXkXSXLX 3 T U U U U U U I + LXSXSXSXSXhXSXSXGXG X R U U U U U U Y C.SXSXSXSXSXDXSXSXSXSXSXSXDXSXSXSXDXSX",
"pXpXpXyXpXpXpXyXpXpXyXyXpXpXpXpXpXyXpXpXpXpXpXpXpXlX U U U U U U U U K = lXpXyXpXpXpXpX@X T U U Y U U U R o {.sXpXpXaXpXfXpXaXpXaXpXaXpXpXpXfX+X R U U U Y U U Y 3 e.gXaXaXaXaXfXFX T U U U U U U U 9 k kXgXfXgXfXaXgXaXgXfXgXaXgXsX}. U U U U U U U U P * FXgXgXgXFX= L U U U U U U U U FXzXhXgXhXgXhXhXgXgXhXhXgXgXhXgXhXhXgXhXhXgXhXhXhXGX T U U U U U U E GXhXhXhXhXhXkXhXhXhXkXD.. T U U U U U U L ; LXkXSXLXX U U U U U U U U 9 + PXSXSXhXSXCXSXSXSXFX U U U U U U U T % D.SXDXSXSXSXSXSXSXDXSXAXSXSXSXDXDXSXSX",
"yXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXyXpXyXyXpXpXlX U U U U U U U U L = zXpXpXpXpXpXpX@X R U U U U U U T o }.sXpXpXpXpXpXpXpXaXpXaXpXaXfXaXzXz O T U U U U U U U 4 e.gXfXaXfXaXfXFX T U U U Y U U U 8 k lXgXaXgXgXgXfXgXgXaXgXgXfXfX}. I U U U U U U U L * FXgXgXhXGX= L U U U U U U U U LXgXgXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXGX T U U U U U U 7 FXhXSXhXhXhXhXhXSXkXhXOX U U U U U U U K , LXkXkXkX I U U U U U U R . x GXSXCXCXSXSXSXSXSXSX H U U U U U U T % D GXSXSXSXDXSXSXSXSXSXSXSXSXDXSXSXSXDX",
"pXpXyXyXpXpXpXpXyXpXpXpXpXpXpXyXpXpXpXpXpXyXpXpXpXlX U U U U U U U I L = lXpXpXpXpXpXpX@X T U U U U U U R o {.pXpXpXpXaXpXpXfXpXfXpXpXpXaXaXzX, 9 U U U U U U U E F zXaXaXaXfXgXFX T U U U U U U U 8 k zXfXfXgXaXgXgXaXgXgXgXgXaXaX}.o R U U U U U U U L * FXhXgXgXFX: L I U U U U U U U GXzXhXgXzXhXhXzXgXzXhXzXhXzXdXgXzXhXhXzXhXhXhXhXzXLX R U U U U U U 7 GXkXhXhXhXSXkXkXhXkXhXPX U U U U U U U J jXCXdXoX U U U U U U U T wXdXSXkXSXSXSXhXSXSXLXl J U U U U U U Y 7 PXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXDXSX",
"pXpXpXpXpXpXpXyXpXpXpXyXyXpXpXpXpXyXpXpXpXpXpXpXpXlX U U U U U U U I J = lXpXpXpXpXpXpX@X T U U U U U U T o {.yXpXpXaXpXpXpXaXpXaXaXaXpXfXaX%X J U U U U U U Y 3 FXaXaXfXfXaXaXFX T U U U U U U U 8 z lXgXgXaXgXgXfXgXgXgXgXgXgXzXs.O T U U U U U U U P * FXhXgXgXGX= L U U U U U U U U PXGXLXGXGXGXGXLXGXLXGXGXLXGXGXLXGXGXLXLXSXhXgXzXkXGX T U U U U U U R GXkXkXhXhXhXZXhXhXhXhXD. U U U U U U U R gXSXhXoX. R U U U U U U R <XhXkXSXSXCXSXSXkXSXFXg J U U U U U U U T PXSXDXSXSXSXSXDXSXDXDXSXDXSXSXSXDXSX",
"pXyXpXpXyXpXpXpXpXpXpXpXpXyXpXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U U K = lXpXpXpXpXpXpX@X R U U U U U U R o }.yXpXpXpXpXpXpXsXsXpXsXFXFXFXS. o T U U U U U U R $ s.fXaXaXaXaXaXfXFX T U U U U U U U 8 k lXfXgXgXfXfXaXgXgXgXgXgXfXfX 3 T U U U U U U U 8 - FXgXhXgXGX: L U U U U U U U U s.kXhXhXhXGX T U U U U U U R GXhXhXhXkXhXSXhXSXhXdX X# T U U U U U U R dXhXhXoX. T U U U U U U R 8XdXZXSXSXSXSXSXSXSXLX, J U U U U U U U Y PXSXSXSXSXSXSXDXSXSXDXSXDXSXDXDXSXDX",
"yXpXpXyXpXpXpXyXyXpXpXyXpXpXpXyXpXpXyXpXyXpXpXyXpXlX U U U U U U U U L = lXpXpXpXpXpXpX@X T U U U U U U R O y.S.C.S.S.S.D.C.S.S.S.S. % R U U U U U U Y 4 S.gXaXaXfXfXfXfXFX T U U U U U U U 8 k kXgXgXgXgXgXgXgXgXgXgXfXGXy. T U U U U U U U R x SXgXgXgXFX= L U U U U U U U U Y Y Y Y Y Y Y Y Y Y Y Y Y U Y Y Y Y U T 2 s.SXgXhXzXLX E U U U U U U R 8XSXhXhXhXhXhXhXhXCXLX $ T U U U U U U R dXhXhXoX. R U U U U U U R . 8XZXkXSXhXSXCXSXSXSXLX, L U U U U U U U Y PXSXSXSXDXSXSXSXDXSXSXSXSXSXSXSXDXSX",
"pXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXyXpXyXpXpXpXpXpXpXlX U U U U U U U I L = lXpXpXpXpXpXpX#X T U U U Y U U T 3 $ O # # # # # # # # # # $ R U Y R U U U U U U U I F zXfXgXaXaXaXfXgXFX T U U U U U U U 8 j kXfXgXgXfXgXfXaXFXGXLX}. 3 Y U U U U U U U U sXsXhXzXhXLX= L I U U U U U U Y U U U U U U U U U U U U U U U U U U U T 1 s.kXhXhXkXGX 4 Y U U U U U T O , GXCXhXhXkXSXhXhXhXFX Y U U U U U U U T dXSXdXoX. R U Y U U U U I OXhXhXSXSXSXSXCXSXSXLX< . R U U U U U U Y PXSXSXSXSXSXSXSXSXSXSXDXSXDXDXSXSXSX",
"pXpXpXyXpXpXyXpXpXpXyXpXyXpXpXpXpXpXpXpXpXyXpXpXpXlX U U U U U U U U L = zXpXpXpXpXpXpX@X T U U U U U U U Y T T T T T T T T T T T T T U U U U U U U U U T I X lXaXgXaXfXfXgXfXfXFX T U U U U U U U 9 , }.S.S.S.S.S.S.}. # U T U U U U U U U U 8 sXgXgXgXgXFX: L U U U U U U U U U U U U U U U U U U U U U U U U U U U Y 1 s.kXhXhXhXSXr.4 Y U U U U U U J wXkXkXhXZXhXkXCXPX T U U U U U U U T dXSXdXoX. R U U U U U U P + LXSXSXSXSXSXSXSXSXkXSXSX R U U U U U U Y PXSXDXSXDXSXSXDXDXSXSXSXDXSXSXSXDXDX",
"yXyXpXpXpXyXpXpXyXpXyXpXyXpXpXyXyXpXpXyXpXpXpXpXpXpXX P U U U U U U I L : lXpXpXpXpXpXpX@X T U U U U U U U U U U U U U U U U Y U U U U U U U U U U U T I % X GXfXaXfXaXaXfXaXaXaXFX T U U U U U U U J # # # O # # O # O # U U U T U U U U U U U U U Y S GXgXgXgXhXGX= L U U U U U U U U U U U U U U U U U U U U U Y U U U U U T 1 s.SXCXhXzXSXD R U U U U U U R . wXGXdXhXhXdXgXF T U U U U U U U U R dXSXdXoX. R U U U U U U I + PXSXSXSXSXSXCXCXSXSXSXZX R U U U U U Y Y PXSXSXSXSXSXSXSXSXDXDXSXSXSXDXSXDXSX",
"pXpXpXyXyXpXpXpXpXpXyXpXpXpXpXpXpXpXpXpXyXpXpXyXyXpXX I U U U U U U U L = lXpXpXpXpXpXpX@X R U Y U U Y U U U U U U U U U U U U U U U U U U U U U U Y 2 : C.lXaXfXaXaXfXfXaXgXgXfXFX T U U U U U U U U T T T T T T T T T R U U U U U U U U U U U U U 8 hXfXhXgXgXhXGX: L U U U U U U U U U U U U U U U U U U U U U U U Y U U U Y 1 s.kXhXhXkXkXLX I U U U U U U U E o x XwXI.oX 7 Y U U U U U U U U R dXSXdXoX. R U U U Y U U P + LXSXSXSXSXSXSXSXSXSXSXhX R U U U Y U U Y PXDXDXSXDXSXDXDXSXSXDXSXDXSXSXDXSXDX",
"pXpXpXpXpXpXpXpXyXpXpXpXyXpXpXyXpXyXpXyXpXpXpXpXpXlXX U U U U U U U U L = lXpXpXpXpXpXpX@X R U U U U U Y U U U U U U U U U U U U U U U U U U U U U U 6 +XkXfXgXaXgXaXaXaXgXfXgXFX T U U U U U U U U U U U U U U U U U U U U U U U U U U U U U U R z FXhXhXgXgXgXGX= L U U U U U U U U U U U U U U U U U U U U U U U U U U U Y 1 s.SXhXhXhXhXGX@ $ R U U U U U U U T 9 # O # Y T U U U U U U U U U T dXkXhXoX. R Y U U U U U P + LXkXkXSXSXSXSXSXSXSXSXkX R U U U U U U Y PXSXSXSXSXDXSXSXDXSXSXDXSXDXSXDXDXSX",
"yXpXpXyXyXpXpXyXpXpXpXyXpXpXpXpXpXpXpXpXyXpXpXpXpXlX U U U U U U U U K = lXpXpXpXpXpXpX#X T U U U U U U U U U U U U U U Y U U U U U U U U Y U U U U T T # S lXfXfXfXgXgXfXaXfXgXFX T U U U U Y U U U U U U U U U U U U U U U U U U U U U U U U T X kXgXgXgXgXhXgXGX= L I U U U U U U U R R R R R R R R R R R R R R R R R R R E 2 s.kXzXhXhXhXSXS. 7 U U U U U Y U U U T Y U U R T U U U U U U U Y U U U R dXkXhXoX. T U U U U U U P + LXSXSXSXCXSXSXSXSXSXSXZX R U U U U U Y T PXSXDXSXDXSXSXDXSXSXDXSXDXSXDXSXDXDX",
"pXpXyXpXpXpXpXpXpXpXpXyXpXpXyXpXpXpXpXpXpXyXpXyXpXlX U U U U U U U U L = lXpXpXaXpXpXpX@X T U U U U U U U U U U U U U U U U U U U U U U U U U U U U U U R 6 S zXgXfXaXfXgXfXaXgXFX T U U U U U U U U U U U U U U U U U U U U U U U U U U U U T . fXhXhXgXhXgXgXgXGX= L U U U U U U U U y.SXhXhXhXhXhXGXF U U U U U U U U U U U U U U U U U U U U U U U U U U R dXkXhXoX. R U U U U U U P + LXSXSXSXSXSXSXSXSXSXSXSX R U U U U U U Y PXDXSXSXDXSXSXDXSXDXSXDXSXDXSXDXDXSX",
"pXyXpXpXpXyXpXpXpXpXpXpXpXpXpXpXyXpXpXpXpXpXpXpXpXlX U U U U U U U I L = lXpXpXpXpXpXaX@X R U U U U U U U K K J J K K K K K J K J H R T U U U U U U U U U R 6 sXaXaXaXfXaXgXgXfXFX T U U U U U U U U U U U U U U U U U U U U U U U U U U E L X fXzXgXgXgXgXhXzXhXGX= L U U U U U U U U GXgXdXgXgXfXgXdXgXdXgXfXhXdXdXgXdXdXgXdXhXhXhXhXhXSXhXkXFX U U U U U U U U U U U U U U U U P J U U U U U U U R dXkXhXoX. R U U U U U U P X GXSXSXSXSXSXSXSXSXSXSXLX R U U U U U U Y PXSXSXDXDXSXSXDXDXSXDXSXDXSXDXSXDXDX",
"pXpXpXpXpXpXpXpXpXpXyXyXpXpXpXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U I L = lXpXpXpXpXfXpX@X T U U U Y U U R o : ; ; ; ; ; ; ; ; ; , 4 U U U U U U U U U R F zXfXgXfXaXgXgXgXFX T U U U Y U U U U U U U U U U U I U I U U U U I U R L O - jXhXgXgXhXhXgXhXhXgXGX= L U U U U U U U U GXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXCXhXhXhXPX U U U U U U U U U U U U U U R 4 Y U U U U U U T dXSXdXoX. T U U U U U U U oXdXSXSXSXSXSXSXSXSXPXl R U U U U Y U Y PXSXDXSXSXDXDXSXSXDXSXDXSXDXDXSXSXDX",
"yXpXyXpXpXyXpXyXyXpXpXpXyXpXyXpXpXyXpXyXpXyXyXpXpXlX U U U U U U U U L = lXpXpXpXaXpXpX#X R U U U U U U T o +XlXlXlXFXFXlXFXlXlXFXsXfXe. X T U U U U U U U Y 4 Z zXgXaXgXfXaXfXgXFX T U U U U U U U I K K K K K K K L K K K L K K K 8 X @ wXFXgXhXhXhXgXgXhXgXgXhXGX= L I U U U U U U U GXgXhXhXdXhXhXhXgXhXhXhXhXhXhXhXkXhXhXhXhXhXhXkXhXhXhXkXzXhXPX K R U U U U U U U U U U T . U U U U U U U Y dXSXZXoX. R U U Y U Y U R 8XSXSXSXSXSXSXSXSXSXLX, J U U U U U U U Y PXSXSXDXSXSXSXDXSXSXDXSXDXDXSXDXSXDX",
"pXpXpXpXpXpXpXyXpXyXpXpXpXpXyXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U U L = lXpXpXfXaXpXaX@X T U U U U U U R o }.sXpXpXfXaXfXaXaXpXfXfXpXlXkX R U U U U U U T 6 FXgXfXaXfXgXgXgXFX T U U U U U U U 6 + ; ; ; ; ; ; ; ; ; ; ; ; ; , , x SXFXhXgXgXgXhXgXgXhXgXhXgXhXGX= L U U U U U U U U GXzXhXhXhXhXhXzXhXhXhXhXhXhXhXhXhXCXhXhXhXhXhXhXkXhXkXCXhXCXhXPX< X K R R T I U U R U 7 LX Y U U U U U U H kXkXZXoX. T U U U Y U U R 8XZXSXSXSXSXSXSXSXSXLX, K U U U U U U U Y PXDXSXSXDXSXDXSXDXSXDXSXSXDXDXDXSXDX",
"yXyXpXyXpXyXpXpXpXpXpXyXpXpXpXpXpXpXpXyXpXpXpXpXpXlX U U U U U U U I L = lXpXpXpXpXpXpX#X T U U U U U U T o }.sXpXaXfXpXfXaXfXfXaXaXaXfXfXkX T U U U U U U U R FXgXgXgXgXaXfXgXFX T U U U U U U U 8 A PXFXFXGXFXGXGXFXGXGXFXGXFXFXFXFXgXgXgXgXhXgXgXhXgXgXhXgXhXgXGX= L U U U U U U U U LXhXhXhXhXhXgXhXhXhXhXhXhXhXkXhXhXhXhXhXCXhXCXhXhXCXCXhXkXhXhXhXLXSX< 1 L L 7 G GXFX U U U U U U U K , PXSXhXoX T U U U U U U R <XZXSXSXSXSXSXSXSXSXPX, J U U U U U U U P PXSXSXDXSXDXSXDXSXDXDXDXDXDXSXDXSXDX",
"pXpXpXpXyXpXpXpXpXpXpXpXpXyXpXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U U L = lXpXaXaXpXpXpX@X R U U U U U U T o }.sXfXaXfXfXaXaXaXaXaXaXaXaXfXzX Y U U U U U U U R FXfXgXfXgXfXfXgXFX T U U U U U U U 8 z FXfXfXgXgXgXfXzXgXgXgXgXgXgXgXhXhXgXgXhXgXhXgXhXgXhXgXgXgXhXLX= L U U U U U U U U LXzXhXhXgXhXhXhXhXhXhXhXhXhXCXhXhXhXkXhXCXhXhXhXhXhXhXhXhXhXhXkXkXdXIXjXjXC.- ; : ; F SXkXGXkXD. Y U U U U U U 8 , LXSXZX8X P U U U U U U R . S.SXSXSXSXSXSXSXDXSXPX, J U U U U U U T # @ PXDXSXSXSXDXDXSXDXSXSXSXDXSXSXDXDXDX",
"yXpXpXyXpXpXpXpXyXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U U L : lXpXpXpXpXfXaX#X T U U U U U U T o {.pXfXaXpXpXfXfXpXaXfXaXfXaXaXlX 6 U U U U U U U T FXgXaXaXgXgXgXgXGX T U U U U U U U 8 k lXgXzXdXgXgXgXgXgXgXgXhXgXhXgXgXgXgXhXgXhXgXhXgXhXgXhXhXgXhXFX= L U U U U U U U U GXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXkXhXhXhXhXCXhXhXCXSXhXSXSXhXCXkXkXkXzXkXSXPXLXLXLXGXkXkXSXdX}.$ T U U U U U R S LXkXSXPX+ I U U U U U U T % PXSXAXSXSXDXSXSXSXLX: J U U U U U U T # I.SXDXDXDXSXDXSXDXSXDXDXDXSXDXDXDXSXDX",
"pXpXpXpXpXpXpXyXpXpXpXyXpXpXpXpXyXpXyXpXpXpXpXpXpXlX U U U U U U U U L = lXaXpXpXaXpXpX#X T U U U U U U R o }.aXpXpXaXfXaXfXaXaXaXaXfXaXaXzXZ 8 U U U Y U U U T FXgXgXgXfXgXgXgXFX T U U U U U U U 8 k FXgXfXgXgXgXgXgXhXgXgXgXgXgXhXgXgXhXgXgXhXgXgXhXgXgXhXgXhXgXGX= L U U U U U U U U LXzXhXzXhXhXhXhXhXhXhXhXhXhXhXhXhXSXhXhXhXCXhXkXSXkXkXLXLXGXLXLXLXGXLXLXGXhXSXhXSXSXZXkXSXkXLX. $ T U U U U U Y FXCXSXSXLX+ K Y U U Y U U U U + PXSXSXCXSXSXSXSXDXdX K U U U U U U T # D.AXDXDXSXSXDXDXSXDXSXSXDXDXDXDXDXDXSX",
"yXpXpXyXyXpXpXpXpXpXpXpXpXpXyXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U I L = lXaXpXpXaXpXaX#X T U Y U U U U R o }.sXaXfXaXfXaXaXaXgXfXaXaXaXaXlXA 8 U U U U U U U T FXfXfXgXaXgXfXgXFX T U U U U U U U 8 k SXgXgXgXgXzXgXgXgXgXdXgXgXhXgXgXhXgXhXgXgXhXgXhXhXhXgXhXgXhXGX: L I U U U U U U U GXhXhXhXhXhXhXhXhXhXhXhXhXhXkXhXhXhXkXhXhXhXhXhXkXzXLX + + + + + + + + G GXhXSXkXkXkXCXSXCXSX U U U U U U U H SXSXSXSXLX< . R U U U U U U P 8XSXSXDXSXDXCXSXFX8X R U U U U U U Y I.SXSXDXSXDXDXSXDXDXDXDXDXSXSXSXDXDXDX",
"pXpXpXpXpXpXpXpXyXpXyXpXpXpXpXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U I L = FXpXaXpXpXaXaX#X T U U U U U U R o }.sXfXaXfXaXaXaXfXaXfXaXfXfXaXlXz 8 U U U U U Y U T FXgXaXgXgXgXgXgXFX T U U U U U U U 8 k FXgXgXgXgXgXhXgXhXgXgXgXgXhXgXhXhXgXgXhXhXgXzXhXhXhXhXhXgXgXGX- L U U U U U U U U GXkXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXSXhXCXCXhXSXSXhXkXLX U I P I I I I 4 FXSXhXSXkXhXkXkXSXs. Y U U U U U U 9 l LXSXSXSXdXeX T U U U U U U T . I.SXSXDXSXSXCXSXPX< O T U U U U U U P PXSXDXDXSXDXSXDXDXSXSXDXSXDXDXDXSXDXSX",
"pXyXpXpXpXyXpXpXpXpXpXpXpXyXpXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U U L = lXaXpXaXpXaXaX$X T U U U U Y U R o }.aXpXaXaXfXfXaXfXaXfXfXfXfXfXzXA 6 U U U U U U U T FXaXgXfXgXgXgXgXFX T U U U U U U U 8 z FXgXgXgXgXhXgXgXgXgXhXgXhXgXgXhXgXgXhXgXgXhXgXhXgXgXgXhXhXhXGX: L U U U U U U U U X LXhXgXhXhXhXhXhXhXhXkXhXCXhXCXhXZXzXhXhXkXhXhXhXhXhXLX T U U U U U U T SXkXSXkXSXSXSXdXPX 3 T U U U U U R x LXSXSXSXkX8X U U U U U U U R $ GXSXSXSXSXDXGXwX K U U U U U U R $ @ PXDXSXSXDXSXDXSXDXDXDXDXDXSXDXDXDXDXDX",
"yXpXyXpXyXpXpXyXpXpXyXpXyXpXpXpXyXpXpXpXpXpXpXpXpXlX U U U U U U U U L = lXpXaXaXpXaXaX#X T U U U U U U R o {.sXfXaXaXfXaXgXaXaXaXfXgXaXaXzXz 8 U U U U U U U T FXgXgXaXgXgXgXgXFX T U U U U Y U U 9 z kXgXgXhXgXgXhXgXgXgXgXgXhXgXgXgXhXgXhXgXhXgXhXhXgXhXgXhXhXhXGX= L U U U U U U U U LXzXkXhXhXhXhXCXhXhXhXhXhXkXhXhXhXkXzXZXhXhXhXSXSXhXLX R U U U U U U R SXzXhXkXhXkXPX R U U U U U U L GXSXSXSXSXSXPX $ R U U U U U U U I.IXdXdXCXDXeX o Y U U U U U U T I.SXSXDXSXSXDXSXSXDXDXDXSXDXSXDXDXDXDXDX",
"yXpXpXpXpXpXpXpXpXpXpXpXpXpXyXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U U L = FXaXpXaXpXaXpX#X R U U U U U U T o }.pXfXaXfXaXfXaXaXaXgXfXfXgXfXlXz 8 U U U U U U U T FXgXgXfXaXgXfXgXFX T U U U U U U Y 8 k FXgXhXgXgXgXgXgXhXgXhXzXgXhXhXgXgXhXgXhXgXhXgXgXhXhXhXhXgXhXGX= L U U U U U U U U LXkXhXhXhXhXhXhXhXhXhXkXhXhXCXhXhXhXCXhXkXSXhXhXhXkXLX 6 Y U U U U U U R eX8XOX8Xh. Y U U U U U U R O - LXSXSXkXSXSXSXI. I U U U U U U R % < iX8X8X8X o R U U U U U U T 1 IXDXDXSXDXDXDXDXDXSXDXSXDXDXDXGXSXDXSXDX",
"pXyXpXpXpXyXpXyXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXaXlX U U U U U U U I L = lXaXpXpXaXaXpX#X T U U U U U U T o }.aXpXfXfXgXaXfXaXaXfXaXfXaXaXlXA 8 U U Y U U U U T LXgXgXgXaXgXgXgXFX T U U U U U U U 8 k FXfXgXgXgXhXgXgXdXgXhXgXhXgXgXhXhXgXhXgXhXgXhXhXgXgXhXgXhXhXGX: L I U U U U U U U LXzXhXhXhXhXhXhXhXCXhXhXCXhXkXCXCXhXhXCXhXSXCXhXSXhXSXS R U U U U U U U R . . 1 Y Y U U U U U U L wXSXSXSXSXSXSXSXGX+ L Y U U U U U U T K . O R U U U U U U U E O C.DXSXSXDXDXSXDXSXDXSXDXDXSXDXSXSXSXDXDXDX",
"pXpXpXyXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U U L = FXpXaXaXaXpXaX#X R U U U U U U R o }.sXfXfXfXaXfXfXfXaXaXgXaXfXfXkXz 8 U U U U U U U T h.zXgXgXfXgXgXgXGX T U U U U U U U 8 z FXgXgXhXgXgXhXgXgXhXgXgXgXhXhXgXhXzXgXhXgXhXhXgXhXhXgXhXhXzXGX= L U U U U U U U U LXhXhXhXhXkXhXhXhXhXkXZXhXhXhXhXhXSXkXCXhXhXhXSXhXSXSXSX 8 Y U Y U U U U U T T U L I R Y U U U U U U U Y O @ LXSXSXSXSXSXSXSXLX@ T U U U U U U U U R T L P T T U U U U U U U T 3 I.SXDXDXSXDXDXDXSXDXDXSXDXDXDXDXDXDXDXDXDX",
"pXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXFX U U U U U U U U K : lXpXaXpXpXpXfX$X T U U U U U U R o }.aXaXaXfXaXfXgXaXaXfXaXgXfXaXlXz 8 U U U U U U U Y 1 F zXgXgXgXgXgXgXGX T U U U U U U U 8 k SXgXgXgXgXgXhXgXgXhXhXgXhXgXgXhXhXgXhXgXhXhXgXhXhXhXhXhXgXhXLX= L U U U U U U U U LXzXkXkXhXhXCXhXCXhXhXhXkXhXhXSXhXhXhXSXSXhXkXhXSXhXkXSXS U U U U U U U U U U U U U U U U U U U U U T 9 eXFXSXSXSXSXSXSXSXZXPX $ T U U U U U U U U U U U U U U U U U U U U T h.FXSXSXSXDXSXGXDXSXDXDXSXDXDXDXDXDXDXDXDXDX",
"pXyXpXpXpXyXpXyXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXlX U U U U U U U U L : lXaXpXfXfXaXfX$X T U U U Y U U R o }.sXaXfXaXfXaXfXaXaXgXgXfXgXgXkXz 7 U U U U U U U U 4 fXFXgXgXgXgXgXFX T U U U U U U U 8 z FXgXhXgXhXgXgXgXhXgXgXhXgXgXhXgXgXhXgXhXgXhXhXhXgXgXhXhXhXhXGX: L U U U U U U U U LXkXhXhXhXhXkXhXkXhXkXCXhXhXCXhXhXSXhXhXhXhXhXSXhXkXkXSXdX 1 R U U U U U U U U U U U U U U U U U U Y J z LXSXSXSXSXSXSXSXSXSXSXI. L Y U U U U U U U U U U U U U U U U U U E 1 GXDXSXDXDXSXDXSXSXDXSXDXDXDXSXDXSXDXDXDXDXDX",
"yXpXpXyXyXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXFX U U U U U U U U L = FXpXaXaXpXfXpX#X R U U U U U U T o {.aXaXgXaXaXgXfXfXfXfXaXaXgXaXkXD E U U U U U U U R h.zXgXgXgXgXFX T U U U U U U U 8 k FXgXhXgXhXgXgXhXgXhXhXgXhXhXgXhXhXgXgXhXhXgXhXgXhXhXhXhXgXhXGX= L U U U U U U U U LXzXSXhXhXCXCXhXhXSXhXhXSXhXCXhXSXhXSXhXhXSXkXhXSXhXhXSXkXC. 4 Y U U U U U U U U U U U U U U U U R J , PXSXSXSXSXSXSXSXSXSXDXDXLX- . P T U U U U U U U U U U U U U U U U E % C.DXDXDXDXSXAXDXDXDXDXDXDXDXSXDXDXDXDXDXDXSXDX",
"pXpXpXpXpXpXyXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXFX T R R T R T T T P = lXaXaXpXfXaXaX$X W R R R R R T W O I.aXfXfXfXaXfXaXgXaXgXfXgXgXfXfXFX J R R T R R R R T Q 2 e.aXgXgXgXgXGX W T R T R R R T H z FXgXgXgXgXgXhXgXgXhXgXhXgXgXhXgXhXhXhXgXhXhXhXhXhXhXgXhXhXhXGX: P T R R R R T R T LXhXhXhXhXhXhXhXhXhXhXCXhXCXhXCXhXhXSXhXCXCXhXSXhXSXhXSXkXLXG U R U U U U U U U U U U U U Y R # . , PXkXSXSXSXSXSXSXSXSXSXSXSXSXPX@ $ W Y U U U U U U U U U U U U R U o C.LXDXFXSXDXDXDXSXDXSXDXSXDXDXDXDXDXDXDXDXDXDXDX",
"yXyXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXaXaXpXpXpXpXaXFX . . . . . . . @ FXpXaXaXfXaXpX%X o . . . . . . o {.sXfXaXfXfXgXaXfXaXgXaXfXgXfXgXlX, . . . . . . . . F kXgXgXgXgXFX . . . . . . l FXgXgXhXgXgXgXgXhXgXhXgXhXgXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXLX@ . . . . . . . . LXkXhXCXhXhXhXhXhXhXCXkXhXSXhXCXkXZXCXhXSXhXSXkXSXCXhXhXCXSXDXFX. o U T Y U U U U U U Y R T 9 oXLXSXDXCXSXSXSXAXSXSXSXSXSXSXDXZXGXI. K T R U U U U U U U T R Y 1 . eXGXDXDXDXSXDXSXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDX",
"pXpXpXyXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXaXpXpXfX|.|.|.+X|.|.|.|.|.+X+XgXpXaXaXpXaXaXsX|.|.|.|.|.|.|.|.|.|.yXaXfXfXaXgXaXaXgXgXfXgXaXgXgXaXgX%X|.|.OX|.oXOX|.OX|.OXOX$XgXgXgXgXgXkX XOX|.OXOXOXOX XOX X#XhXgXgXhXhXgXhXhXhXgXgXhXhXgXhXgXhXgXhXgXhXgXhXhXhXgXhXhXhXhXkXOXOXOXOXoXOXOXoXOXOXOXSXzXhXhXhXSXhXkXCXhXhXCXhXhXhXSXkXkXhXkXhXSXSXhXhXCXSXSXSXhXCXhXPX8X. o 4 U I I I I I 9 o x dXkXSXSXSXSXSXSXSXSXSXSXDXSXSXSXSXSXSXSXjX< o K I I I I I U 1 O h.GXZXDXDXSXSXDXDXDXSXDXDXSXDXSXDXDXDXDXDXDXDXDXDXDXDX",
"pXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXpXaXpXaXpXaXpXsXsXsXsXsXsXsXsXsXsXsXaXaXaXpXfXaXaXaXsXsXpXaXsXsXaXsXsXfXfXfXfXgXaXaXgXfXgXgXgXgXfXaXgXgXgXgXsXfXfXfXfXfXsXsXaXfXfXgXgXgXgXgXgXgXfXfXfXfXjXfXfXfXfXfXdXhXgXgXgXhXhXgXhXdXgXzXhXgXhXgXhXhXhXgXhXhXhXzXhXhXhXgXhXhXzXhXdXhXdXgXdXdXdXgXdXdXdXkXhXhXkXkXhXCXhXhXkXhXCXSXhXSXhXkXhXhXhXhXSXhXSXCXkXCXSXkXhXSXhXSXdXPXOXy. X X X X X X X x 8XwXIXhXSXSXSXSXSXSXDXSXSXSXSXSXSXSXSXSXDXSXDXZXPX8XwX< X X X X X X X C. XGXDXSXDXSXDXDXDXDXSXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDX",
"pXpXyXpXpXpXpXpXpXpXpXpXpXpXpXpXaXpXaXpXpXaXpXpXpXpXpXpXaXpXaXpXaXpXaXaXaXpXpXaXaXfXfXaXaXfXfXfXpXfXfXfXfXfXfXgXfXfXfXgXgXaXaXgXgXfXfXfXgXfXfXgXgXfXgXgXgXgXgXgXgXfXgXgXgXgXgXfXgXgXgXgXdXfXgXgXdXhXgXgXhXgXgXgXhXhXzXzXzXkXkXzXkXzXkXlXkXkXzXkXzXkXkXzXzXkXkXkXkXkXzXSXzXlXkXkXkXkXzXSXSXkXlXzXkXkXhXkXhXhXSXhXkXhXSXhXhXCXhXCXhXSXSXSXSXkXkXZXCXSXCXSXCXSXSXSXkXSXSXdXFXLXPXLXLXPXLXPXPXGXdXdXSXSXSXSXSXSXSXSXCXSXSXSXSXSXDXSXDXSXSXSXSXSXSXSXBXPXPXPXPXPXPXPXPXPXDXSXDXSXDXSXSXDXSXDXDXDXDXDXSXDXSXDXDXDXDXDXSXDXDXDXDXDXDXDX",
"pXpXpXpXpXpXpXpXaXaXaXaXzXaXaXaXfXfXfXaXaXaXaXgXgXaXfXgXaXgXgXgXfXfXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXgXgXgXgXgXgXgXzXgXgXgXhXgXhXhXgXdXgXhXgXhXgXhXgXgXgXhXhXzXhXhXhXhXhXgXzXhXhXhXhXhXhXhXhXhXhXhXkXhX<X!.V.W.V.V.V.V.R.V.V.R.V.V.R.!.E.!.Q.Q.Q.Q.Q.A.!.E.!.E.V.W.W.R.W.W.V.V.V.V.T./.eXFXSXSXSXSXSXSXSXSXSXSXSXZXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXDXSXSXSXSXDXDXDXSXSXDXSXDXDXDXSXDXSXFXDXDXDXSXDXSXDXDXSXDXSXKXSXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXGXDXDXDXKXGXKXGXLXDXDXDXLXDXLXLXGXDXKXKXKXKXLXKXKXLXDXLXKXKXLX",
"pXpXpXpXpXzXpXzXaXaXaXaXpXaXaXaXaXfXaXgXaXgXaXfXaXgXaXgXfXaXaXgXgXfXfXgXgXfXgXfXfXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXgXgXhXhXgXhXgXhXgXgXhXgXhXgXhXgXhXhXgXhXhXhXgXgXhXhXhXhXhXhXhXhXgXhXhXhXhXzXhXhXhXzX2Xz.q.>.3.2.8.8.2.8.8.q.q.q.9.0.0.9.9.0.x.0.0.0.0.0.9.q.0.9.9.9.q.q.2.q.8.8.2.3.2.5.x.!.dXSXSXSXSXSXCXhXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXSXSXSXSXDXSXSXSXSXSXDXSXDXSXSXSXDXSXDXSXDXSXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXKXDXDXDXAXDXDXLXKXDXDXDXLXDXLXDXDXLXDXKXKXGXKXLXGXKXLXDX",
"pXpXpXpXpXpXpXpXfXpXaXaXaXaXaXaXaXaXfXaXfXfXgXaXgXgXaXfXgXfXgXfXaXgXgXgXgXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXhXgXhXgXgXhXgXhXgXgXgXgXgXhXhXgXhXgXhXgXhXgXhXhXhXhXgXhXgXhXgXhXgXhXhXhXhXhXgXhXhXhXhXhXhXhX/.8.>.1.9.Y.T.R.T.T.T.R.T.T.R.T.R.T.T.T.R.T.T.T.R.R.T.T.T.T.T.T.W.T.T.T.T.T.T.T.U.0.2.1.>.z.iXSXkXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXDXSXSXDXSXDXSXSXSXSXDXSXSXSXSXDXSXDXSXDXDXDXSXDXDXDXSXSXDXSXDXSXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXKXKXDXKXDXDXKXDXLXLXDXDXLXDXKXDXDXGXKXKXKXKXDXLXDXKXLXGXKX",
"pXpXpXpXzXpXzXpXaXaXaXaXaXaXaXaXaXaXgXaXgXfXaXfXaXfXgXaXgXaXgXaXfXgXgXfXfXgXgXgXgXgXfXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXhXhXgXgXgXgXgXhXgXhXzXhXhXgXhXgXhXhXhXhXhXhXhXdXhXhXhXhXhXhXhXhXhXgXkX.X1.>.<.l.E.E.E.E.R.E.R.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.!.!.E.T.9.1.:.z.jXSXZXSXSXSXkXSXSXSXSXSXSXSXSXSXDXSXSXSXSXSXSXSXSXDXSXSXSXSXSXDXDXSXSXDXSXDXDXSXDXSXDXSXSXSXDXDXSXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXSXDXDXDXDXSXDXDXGXDXKXDXDXDXDXDXDXDXDXKXDXGXDXDXKXKXDXGXKXKXLXKXDXKXKXLXLXDXLXKXLXKXKX",
"aXpXaXfXaXfXaXaXaXaXaXfXfXfXfXgXgXaXaXaXaXfXaXfXfXaXgXfXaXgXgXaXgXgXgXaXgXfXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXgXgXgXhXgXgXgXgXhXgXgXhXgXhXgXhXgXgXhXgXhXhXgXgXhXhXgXgXhXhXhXgXhXhXgXhXhXhXhXhXhXhXhXhXhXgXhX7Xq...2.T.Q.E.Y.0.0.9.9.0.0.0.0.0.0.x.l.l.l.l.l.l.l.l.Y.l.l.l.l.x.x.0.0.0.9.0.q.0.0.x.U.Q.E.l.>.>.V.CXSXCXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXDXSXSXSXSXSXDXDXSXDXDXSXDXSXDXSXSXDXDXSXDXDXSXDXDXDXSXDXDXDXSXDXDXSXDXDXSXDXDXDXDXSXDXDXDXDXDXDXDXGXDXDXDXDXDXDXDXKXDXDXKXDXKXDXLXDXDXGXKXKXKXDXDXKXLXKXDXLXDXLXLXLXDXDXLXLX",
"pXaXaXfXfXpXaXaXaXaXfXaXaXaXaXaXfXaXaXgXaXgXgXfXgXaXgXaXgXaXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXgXgXgXhXhXgXgXhXgXgXgXhXgXhXhXgXhXgXhXgXhXgXhXhXhXgXgXhXhXhXhXhXhXdXgXhXhXhXhXhXhXhXCXjXA...<.Y.!.U.9.2.<.2.2.<.8.8.8.8.8.8.8.9.x.9.0.0.0.0.9.9.0.0.q.0.9.8.8.8.8.8.8.2.2.<.2.8.a.T.Q.0.:.2.2XSXSXSXSXSXSXSXSXSXSXSXDXSXSXDXSXSXSXSXSXSXSXDXDXSXSXSXSXSXSXSXSXDXSXDXDXSXSXDXDXSXDXDXSXSXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXKXKXDXKXDXKXDXDXKXDXLXKXDXDXKXLXLXKXKXGXDXLXDXLXDXDXLXLXLXKXGX",
"fXfXaXpXaXaXaXfXaXaXaXfXaXaXaXfXaXfXgXfXfXaXgXaXaXgXgXgXfXgXaXgXgXgXgXfXgXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXgXgXgXgXgXgXhXgXhXhXgXgXhXgXhXgXhXhXhXhXgXgXhXhXhXhXhXhXhXhXhXhXhXgXhXhXhXhXhXhXhXzX1X<.>.x.E.Y.<.<.2.2.2.<.8.8.8.8.8.q.8.9.0.9.9.0.0.0.0.0.0.0.0.0.0.q.q.q.8.8.8.8.2.2.2.8.2.3.8.U.R.<.3.v.CXSXCXSXSXSXSXDXSXSXSXSXSXSXSXSXSXSXSXDXSXSXSXSXSXSXDXDXSXSXDXSXSXSXSXDXSXDXSXSXDXSXDXDXDXDXDXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXLXDXKXGXDXKXDXDXKXGXKXDXDXKXGXKXLXGXKXDXLXGXKXKXKXKXLXDXDXLXKXLXKXKXLX",
"aXaXaXaXaXfXaXaXfXaXfXfXaXgXfXfXgXaXaXaXfXgXaXgXfXaXfXfXgXfXgXgXgXfXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXzXgXgXgXhXgXhXgXhXhXgXgXgXhXgXgXhXgXhXgXgXhXgXhXgXhXhXgXhXgXgXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXkX_...2.U.U.3.>.<.<.8.8.<.8.8.q.8.8.8.q.q.9.0.0.0.0.0.0.0.9.0.q.0.9.8.q.q.8.8.8.8.2.2.8.<.<.<.3.8.R.x.:.q.ZXSXSXSXSXSXCXSXSXSXDXSXSXSXCXDXSXSXDXSXSXSXDXDXDXSXSXDXSXDXSXDXDXDXDXSXDXSXDXDXSXSXDXSXDXDXSXDXDXSXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXKXKXDXDXKXKXKXDXDXKXDXKXDXLXDXLXDXKXKXLXKXLXLXLXKXKXKXLXKX",
"aXfXfXfXaXaXfXfXfXaXgXaXfXgXaXfXaXaXgXgXaXgXaXfXgXgXgXgXaXgXgXgXfXgXgXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXgXhXhXhXgXhXhXhXhXhXgXgXhXgXhXhXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhX!...9.T.2.>.<.<.<.2.2.2.2.2.8.q.8.8.q.8.9.0.9.0.9.0.9.9.0.9.0.0.q.q.q.q.8.q.8.2.2.2.2.2.<.<.>.>.0.T.:.2.tXSXSXSXSXSXSXSXSXSXSXSXSXDXCXSXDXDXSXDXSXSXSXSXSXDXSXDXSXDXDXSXDXSXDXSXSXDXSXDXDXDXDXDXSXSXDXDXSXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXKXKXKXDXDXKXDXGXKXDXDXLXDXLXKXDXLXDXDXKXKXKXDXKXLXKXLXDXDXLXLXLXKXKX",
"aXpXaXaXaXfXaXfXaXaXaXfXfXfXaXgXgXfXaXfXgXfXgXgXgXfXgXaXgXfXgXaXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXhXgXhXgXgXhXhXgXhXhXhXgXgXhXhXgXhXgXhXhXgXgXhXgXhXhXhXhXhXhXhXhXhXhXzXhXgXhXhXhXhXhXhXhXCXhXhXhXdXA.:.9.l.>.3.,.3.<.2.2.8.<.8.8.8.8.q.8.q.q.q.0.0.9.9.9.9.0.0.9.q.q.q.5.8.8.8.8.2.2.2.2.2.<.3.<.>.<.U.2.2.tXSXSXSXSXSXSXSXSXSXSXSXSXDXSXCXDXDXSXSXCXDXDXDXSXDXSXSXSXSXSXSXDXSXDXDXDXDXDXSXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXKXDXDXKXDXDXDXKXDXKXKXKXDXKXLXDXKXDXLXKXKXKXLXGXDXKXLXLXGXKXLXLXLXKXKXLXLXLX",
"aXfXfXaXaXfXaXaXfXfXgXaXaXaXaXfXaXfXaXgXaXgXfXgXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXgXgXgXgXgXgXgXgXhXgXgXgXgXgXgXgXgXhXgXhXgXhXgXhXgXhXhXgXgXhXhXhXhXgXhXgXhXgXhXhXhXhXhXgXhXhXhXhXhXhXhXhXdXA.>.q.8.>.1.<.<.<.2.8.2.2.2.8.q.8.8.8.8.8.q.q.q.0.0.0.0.0.q.q.5.q.q.8.8.q.8.2.2.2.8.2.2.3.1.<.>.<.q.8.2.5XSXSXSXSXSXSXDXSXDXSXSXDXSXSXDXSXSXDXCXDXSXSXSXSXSXSXDXDXDXDXSXSXDXDXDXSXSXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXSXKXDXDXDXGXDXDXDXDXGXKXDXDXDXDXDXDXDXLXDXKXDXLXDXKXKXDXKXDXLXGXKXKXKXKXDXLXLXLXDXLXDXDXLXKXLXLXKXLXDX",
"aXaXaXfXfXaXfXaXaXgXfXaXgXgXaXgXgXaXgXfXgXfXaXgXaXgXfXgXaXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXhXhXgXgXgXgXhXhXgXgXgXgXhXhXgXhXhXhXgXhXgXhXgXhXgXhXgXhXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXdXA.>.q.<.1.3.<.,.3.<.2.2.2.2.2.8.q.8.8.q.8.q.q.q.q.9.q.q.q.q.q.q.q.8.8.8.8.8.2.2.8.2.2.3.<.<.<.>.>.2.8.<.tXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXDXSXDXSXDXDXSXSXDXDXDXSXDXSXDXDXSXDXSXDXDXDXSXSXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXKXKXDXDXDXDXKXKXGXKXDXLXDXDXGXDXDXLXDXLXDXLXKXDXKXKXGXKXLXLXDXLXDXLXLXKXLXKXKXLXLXLXLX",
"pXfXgXaXaXaXfXfXfXaXgXaXfXaXfXgXaXaXgXaXaXgXaXgXgXaXgXaXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXhXgXhXgXgXgXhXgXgXgXhXgXhXgXhXgXhXhXgXhXgXgXhXhXgXhXhXhXhXhXhXgXhXhXhXgXhXhXhXhXhXhXhXCXhXCXhXhXhXhXdXA...2.3.>.>.3.<.1.,.2.8.2.2.2.8.8.8.8.8.8.8.q.q.8.q.q.8.q.9.8.8.8.8.8.q.8.2.2.2.2.2.2.3.<.<.<.1.>.<.2.<.tXCXDXSXSXSXSXSXSXDXSXSXSXSXSXSXSXDXSXSXSXSXDXSXDXDXSXDXSXSXDXDXSXDXSXSXDXDXDXDXDXDXDXDXDXDXSXDXDXDXDXKXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXKXDXKXDXDXDXKXDXDXKXLXLXGXKXDXLXLXDXLXDXLXKXLXDXLXKXDXLXKXLXKXLXKXLXLXKXLXLX",
"aXfXfXfXaXaXaXgXfXaXaXgXaXgXaXgXfXgXfXgXgXgXgXfXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXhXgXgXgXgXgXgXgXgXgXhXhXgXhXgXgXhXhXgXgXhXhXgXhXgXhXhXhXgXhXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXdXA...3.>.1.>.1.<.<.3.2.2.2.2.2.2.8.q.8.8.8.q.8.8.q.q.8.q.q.8.q.8.8.8.8.8.2.<.8.2.2.2.2.1.<.>.>.>.3.>.>.<.5XCXDXSXSXSXSXDXSXSXSXDXSXDXDXSXDXSXDXSXDXSXSXDXSXSXDXSXDXDXDXSXDXDXDXDXDXSXSXDXSXDXSXSXDXDXDXDXDXDXDXDXSXDXDXDXDXDXDXKXDXDXDXLXDXDXKXDXKXDXKXLXDXDXLXKXDXDXDXKXDXKXKXDXLXDXLXDXKXDXLXKXLXLXLXLXKXLXKXLXLXKXLXLXLX",
"fXaXfXaXgXaXaXaXaXgXaXgXgXfXgXfXgXgXgXgXfXgXgXgXgXgXgXgXfXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXhXgXhXhXgXgXgXgXgXhXgXgXhXgXhXgXgXhXgXhXgXhXhXhXgXhXgXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXdXA. .>.>.>.<.>.>.<.1.<.2.2.2.2.2.2.8.8.q.8.8.8.8.8.8.q.8.8.8.8.8.8.9.8.2.2.8.<.2.2.<.<.<.>.>.>.>.3.>.:.1.tXDXSXSXSXSXDXSXSXSXSXDXSXSXSXSXSXSXDXSXDXDXSXSXDXDXSXSXDXSXDXSXDXSXDXSXDXDXDXDXDXDXSXDXDXDXDXKXSXDXDXDXDXDXDXDXDXDXKXKXDXKXDXDXDXKXDXDXLXKXDXDXLXDXKXKXKXDXKXKXDXKXDXKXKXLXKXKXKXLXLXLXDXLXDXKXLXKXLXLXKXKXLXLXKX",
"fXaXfXaXaXfXaXgXaXgXfXaXaXfXgXaXfXaXgXfXgXaXgXaXgXfXgXaXgXgXgXgXgXgXgXgXgXgXhXgXgXgXhXgXgXgXhXhXgXgXgXgXhXhXgXhXgXhXhXhXgXhXgXhXhXgXhXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXZXhXCXhXhXhXdXA. .>.>.>.>.>.3.1.<.3.<.2.2.2.2.2.2.8.8.8.8.8.q.8.8.8.8.8.8.8.9.8.2.2.2.2.2.8.2.2.1.3.<.<.>.<.>.>.>...<.tXSXSXSXSXSXSXSXDXDXSXSXSXSXDXDXSXDXSXSXDXSXDXDXSXSXDXDXSXDXSXDXSXSXDXDXDXSXDXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXDXKXDXKXDXGXDXDXDXKXGXDXKXGXDXKXLXDXKXLXKXKXKXGXLXGXKXLXDXDXLXLXLXKXLXLXKXLXLXGXLXLXLXLX",
"fXaXfXaXaXaXgXaXgXaXgXgXfXaXgXgXaXgXgXaXgXgXgXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXgXgXgXgXgXgXhXgXhXgXhXgXgXgXhXgXhXhXgXhXgXgXhXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXkXhXhXCXhXhXhXkXCXhXdXA. ...>.1.>.3.>.>.<.>.,.2.2.2.2.2.2.2.2.8.8.8.q.8.q.8.8.q.8.8.8.2.2.2.2.2.2.2.2.<.>.<.<.>.>.>.>.>.>...1.5XSXSXDXCXSXSXSXSXSXSXSXDXSXSXSXSXSXDXSXDXSXDXSXSXDXDXSXDXDXDXSXDXDXDXDXDXSXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXDXDXKXDXKXDXKXKXDXKXDXLXDXKXLXKXKXKXDXLXDXKXGXGXAXLXLXLXLXDXLXLXLXDXKXLXLXLXLXLXLXLX",
"fXaXgXaXfXgXfXaXfXaXaXfXgXgXaXfXgXgXgXaXaXgXgXgXfXgXgXgXgXgXgXgXgXhXgXgXgXgXgXhXgXhXgXhXhXgXgXhXhXgXhXhXhXgXhXgXhXgXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXgXhXhXgXhXhXhXgXhXhXhXhXhXhXCXhXhXhXhXhXhXhXhXhXhXdXQ. .:.:.>.<.1.>.<.1.<.3.,.<.2.2.2.2.2.2.2.2.2.2.8.2.8.2.2.8.2.2.2.2.2.2.2.2.2.<.<.<.<.>.>.>.>.>.<.....<.tXDXCXDXSXDXSXDXSXSXAXSXSXDXSXDXDXDXSXSXSXDXSXDXDXSXDXSXDXSXDXDXDXDXSXSXDXDXDXDXDXDXSXKXSXDXDXDXDXDXDXKXDXDXGXDXKXDXDXDXKXKXDXLXKXDXKXDXKXGXDXLXKXDXDXLXKXDXGXKXKXLXKXLXKXKXLXLXLXDXLXLXDXLXKXLXLXLXLXKXLXLXKXLXLX",
"aXgXfXgXgXaXfXgXaXgXfXaXgXaXaXgXaXgXgXgXgXfXgXfXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXgXhXhXgXhXgXgXhXgXhXhXgXgXhXgXhXgXhXgXhXhXhXhXhXhXhXhXgXCXhXgXhXhXhXhXhXhXhXhXhXhXkXhXhXhXhXCXhXhXCXdXA. .....:.>.>.3.>.3.1.<.3.<.<.2.2.2.2.2.2.2.2.2.2.2.2.2.2.2.2.2.2.8.2.2.2.2.<.>.<.<.>.>.>.>.>.>.:.....>.5XSXSXSXSXSXSXSXDXDXSXDXSXSXDXSXDXDXSXDXSXDXSXSXSXDXDXDXDXSXDXSXDXDXDXDXDXDXDXSXDXDXDXDXDXSXDXDXDXDXDXDXDXKXDXDXDXKXDXDXDXDXKXKXDXDXKXDXDXKXKXKXDXLXGXDXKXKXDXLXDXKXKXLXDXKXLXLXKXLXLXKXLXKXLXKXKXLXKXKXLXKXLXKXLX",
"fXaXaXfXaXgXfXaXgXaXgXgXgXfXgXgXgXfXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXhXgXhXgXgXgXdXgXgXgXgXgXhXgXhXgXhXgXhXhXgXhXhXgXgXhXhXhXgXhXgXhXhXhXhXhXhXhXhXhXCXhXhXhXhXhXhXhXhXhXhXhXSXkXhXCXCXhXdXQ.X.....:.>.>.>.1.>.3.1.2.>.<.3.2.2.2.2.2.8.2.2.2.2.2.2.8.2.2.2.2.2.2.2.2.1.1.3.<.<.>.>.>.>.3.:.:.:. .<.5XSXDXSXSXSXDXSXSXSXSXDXSXSXDXSXDXSXDXSXDXDXSXDXDXSXSXDXSXDXDXDXDXSXDXSXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXDXDXDXDXDXKXDXKXDXKXDXGXDXGXKXGXKXKXKXDXDXKXDXKXLXDXLXLXDXLXGXKXLXKXLXKXKXKXKXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLX",
"aXfXgXaXaXaXaXgXgXaXgXfXaXgXfXfXgXgXgXfXfXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXgXhXgXgXgXhXhXgXhXgXgXhXgXhXgXgXhXgXgXhXhXhXhXhXhXgXhXhXhXgXhXhXhXhXhXhXhXhXhXhXSXhXhXkXhXhXCXhXkXhXhXhXhXkXCXhXhXA.X.......>.>.>.>.>.>.>.>.<.<.>.<.<.2.2.2.2.2.2.2.2.2.2.2.2.2.2.2.2.2.<.3.1.<.<.1.>.>.<.>.3.>.:..... .1.tXSXSXSXDXSXSXDXSXDXSXSXSXSXSXSXDXSXDXSXSXDXSXSXGXDXDXSXDXDXDXDXSXDXDXDXDXDXDXDXGXDXDXGXDXDXDXDXDXDXDXDXDXDXDXKXDXGXDXKXDXKXDXLXDXLXDXKXDXLXDXKXKXKXKXKXDXLXGXKXDXLXLXDXLXKXGXKXLXKXLXKXLXKXLXKXLXKXLXLXLXLXLXLXLX",
"gXaXaXgXgXgXfXfXfXgXgXgXgXgXgXgXgXfXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXgXgXgXhXgXgXgXhXgXhXgXhXgXhXhXhXhXgXhXhXhXhXhXhXgXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXkXCXhXhXkXhXSXhXhXhXCXdXW. .......:...>.>.>.<.>.>.3.,.<.>.<.<.<.2.2.2.8.2.8.2.8.2.2.2.2.2.<.<.3.,.<.<.3.>.1.3.>.>.>.:...:.....<.5XSXSXSXSXSXDXSXSXSXSXDXSXDXDXSXDXDXSXDXDXDXDXSXDXDXSXDXDXSXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXKXDXKXDXKXDXDXKXDXKXDXKXDXKXKXKXDXLXKXKXKXKXGXLXKXKXKXLXKXKXDXLXLXKXLXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLX",
"fXaXfXfXfXfXgXgXgXaXaXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXzXgXgXhXhXgXhXhXgXhXhXgXgXgXhXhXgXgXhXgXhXgXhXgXhXhXgXhXdXgXgXhXhXhXhXhXhXhXgXhXhXCXgXhXhXhXhXhXhXhXhXhXhXhXhXCXhXhXhXhXkXZXhXCXSXhXCXhXdXA.X.............<.>.>.<.>.>.3.,.2.,.<.<.>.<.<.<.2.2.<.<.2.2.2.,.<.>.<.,.<.1.3.>.1.>.>.<.3.:...........<.5XDXAXSXSXSXSXDXSXDXSXDXDXDXSXSXAXSXDXDXSXSXSXDXDXDXDXDXDXSXDXDXDXDXAXDXDXDXDXDXSXDXDXDXDXDXDXKXDXDXDXKXLXDXLXDXDXDXDXDXLXKXDXKXKXGXKXKXDXLXDXKXDXDXLXKXKXLXDXLXDXDXLXLXLXLXLXDXLXLXKXLXKXLXLXLXLXLXLXLXLXPXLXLXLX",
"aXaXgXgXaXgXaXgXfXgXgXfXgXgXaXgXgXfXfXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXhXgXgXgXhXgXgXhXgXhXgXhXgXgXhXhXgXhXhXhXgXhXgXhXgXhXhXCXgXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXSXhXhXSXhXhXCXhXCXhXhXCXdXQ. .........w.:...>.>.>.>.>.>.>.>.>.<.<.<.<.<.3.>.<.<.<.<.3.3.3.,.<.,.<.3.3.1.3.>.3.1.:.:...:.........3.tXSXSXDXDXDXSXSXDXSXDXSXDXSXSXDXDXDXSXDXDXDXDXDXSXSXDXDXSXDXDXSXDXSXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXDXDXDXDXKXLXDXDXDXKXKXGXDXDXKXGXLXDXKXKXGXKXDXLXKXLXDXLXLXLXKXLXKXKXLXLXLXKXLXKXLXLXKXLXLXLXLXKXLXKXLXLXLX",
"gXaXfXgXaXgXaXfXgXgXaXgXfXgXgXfXgXgXgXgXgXgXgXgXgXhXgXgXgXgXhXgXgXgXgXgXgXgXhXgXgXgXgXhXgXhXhXgXhXgXhXhXgXhXgXhXhXhXhXhXgXhXgXhXhXhXhXhXhXgXhXhXhXhXhXhXhXhXCXhXhXSXhXhXhXCXhXhXhXkXhXCXkXhXSXhXhXCXdXV.| ..w.......w...:.>.>.>.>.3.>.>.>.>.>.<.<.<.<.<.<.>.<.>.<.<.<.<.>.3.>.1.>.>.>.3.>.:...w........... .1.5XDXSXSXSXSXDXDXSXDXSXSXSXDXSXDXDXSXDXSXSXDXDXDXDXDXSXDXDXDXSXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXKXGXDXDXDXKXKXDXDXLXDXKXLXDXLXKXKXKXKXLXKXLXDXLXKXKXKXLXKXLXLXLXKXLXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLX",
"gXfXaXgXgXfXgXaXfXaXgXgXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXhXgXgXhXgXgXgXhXhXgXgXhXgXhXgXhXgXhXhXgXhXhXhXgXhXgXhXhXhXhXgXhXhXhXhXhXhXhXhXCXhXhXhXhXhXhXhXhXhXhXkXhXCXhXCXCXhXCXhXCXhXCXCXhXhXV.| ...........w...:.>.>.<.1.>.<.>.>.>.>.>.>.<.>.<.>.1.<.>.<.>.>.>.>.>.3.>.1.1.>.>.:.w..... .......X.>.tXSXSXDXSXDXSXSXDXSXDXDXDXSXDXDXSXDXDXDXDXSXSXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXKXDXLXDXKXDXDXDXDXKXLXDXKXDXLXLXDXKXKXDXLXDXGXKXKXKXLXDXKXLXDXLXLXKXLXKXKXKXLXLXLXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXKXPX",
"gXgXgXfXaXgXfXgXgXgXgXgXfXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXhXgXgXgXhXhXgXgXhXhXgXgXgXgXhXhXgXhXhXgXgXhXgXhXgXgXhXgXhXgXhXhXgXCXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXkXkXhXhXhXhXCXhXhXhXhXCXhXCXCXjXA.] | .... .........:...:.>.3.>.>.<.<.>.>.>.>.>.>.1.>.>.>.>.>.1.:.>.3.1.>.3.<.:.:................. .X.>.5XSXDXDXSXSXDXDXSXDXSXDXSXSXDXSXSXSXDXDXSXDXDXDXDXSXGXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXLXDXDXKXKXDXLXDXKXGXDXLXLXDXKXKXLXDXLXKXKXGXKXLXDXDXLXKXLXLXLXLXGXLXKXKXLXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLX",
"aXfXaXgXgXgXgXgXgXgXaXgXgXgXgXgXfXgXgXgXgXgXgXhXgXgXgXgXgXgXgXgXhXgXgXgXgXhXgXhXgXgXhXhXgXhXgXhXgXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXhXhXkXhXhXCXCXCXhXkXkXhXSXSXhXSXCXCXdXW.| | | ....w.........:...:.:.>.>.>.3.1.>.>.<.>.>.>.>.>.3.>.>.<.3.1.>.<.>...>.:...:.......w..... .X.X.:.5XDXSXSXDXSXSXSXDXSXDXSXDXDXSXDXDXDXSXDXDXDXSXDXSXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXKXDXDXDXDXLXDXKXDXDXKXGXDXKXDXDXLXDXDXLXDXKXKXGXKXKXKXKXLXKXLXLXKXLXLXDXDXLXLXKXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLX",
"gXfXgXaXfXgXgXgXgXgXgXgXgXgXgXgXgXzXgXgXgXgXhXgXgXgXgXgXhXhXgXgXhXgXgXhXgXgXgXhXgXhXgXhXhXgXgXgXgXhXhXgXhXgXgXhXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXCXhXhXhXhXCXhXhXhXSXhXSXhXhXhXSXSXhXdXW.| | X.X. .....................1.>.1.>.>.>.3.>.>.>.<.>.<.>.<.>.>.>.>.>.:.:.:................. . . .| ..tXSXDXSXSXDXSXDXSXDXDXSXDXSXDXSXDXSXDXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXKXDXDXKXDXLXDXGXKXDXKXKXLXDXLXKXLXDXKXKXLXDXLXLXLXLXKXLXKXLXLXDXLXLXLXLXKXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLX",
"gXfXaXgXgXgXaXfXgXfXgXgXgXgXgXfXgXfXgXgXgXgXgXgXhXgXgXgXgXgXgXhXgXgXhXgXgXhXhXgXgXhXhXgXgXhXhXhXhXhXgXhXhXhXhXhXhXhXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXhXhXhXhXSXkXCXCXhXhXSXhXhXkXhXCXSXCXhXhXSXhXV.| X.| X. . . ...............:.......>.1.>.1.3.>.3.1.3.3.>.>.:.>.>.:....................... . .| | | >.5XDXSXSXDXSXSXDXSXSXDXDXSXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXSXDXDXGXSXDXDXDXDXDXDXDXKXDXKXGXDXDXDXDXDXDXKXKXDXKXKXGXDXKXDXDXKXDXKXGXLXKXGXDXLXLXDXDXLXLXDXLXKXKXLXLXKXKXLXLXLXGXLXKXLXKXLXLXLXPXLXLXLXLXLXLXLXLXPXLXPX",
"gXfXgXgXgXgXgXgXgXfXgXfXgXgXgXhXgXgXgXgXgXgXhXgXgXgXhXhXhXgXgXgXhXgXgXhXhXgXhXgXgXgXgXhXgXhXhXhXhXhXhXgXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXhXhXSXhXhXkXSXhXhXhXhXCXkXhXSXhXSXhXCXhXCXkXCXCXdXA.| X.X.X. .X. .............................:.1.:.1.:.:.:.>.:.:............... .........X. .| | ] | | ..tXSXDXDXSXSXDXDXSXSXDXSXDXSXDXDXSXDXDXSXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXLXDXKXKXDXKXGXKXDXGXKXDXLXDXLXKXKXDXKXKXDXDXKXLXKXDXLXKXLXLXDXLXKXLXKXLXKXLXKXLXKXKXLXLXKXLXLXLXLXLXLXLXLXLXLXLXPXIXLXLXIXLXLX",
"gXgXaXgXgXaXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXhXgXgXgXhXgXhXhXhXhXgXhXgXhXgXhXgXhXgXhXhXhXhXhXgXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXkXhXkXhXhXhXCXhXhXhXSXhXSXhXhXhXCXhXSXCXCXkXCXhXCXdXV.| | X.X.] X.X. . . ......... .....................:.......:.....:..... ............. .| | | . . .| >.tXDXSXSXDXDXDXSXDXDXDXSXDXDXSXDXDXSXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXDXDXKXDXKXDXDXKXDXKXDXKXGXKXKXKXLXKXKXDXLXKXKXLXDXKXLXLXKXKXLXKXLXLXKXKXLXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLX",
"gXgXgXaXgXgXfXgXgXgXgXgXfXgXgXgXgXgXgXhXgXgXgXgXgXhXgXhXgXgXhXgXhXgXhXgXgXhXgXhXhXgXhXgXhXgXhXhXgXhXhXgXhXhXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXkXhXhXhXCXhXhXhXhXhXSXhXhXSXhXCXkXkXCXkXCXhXCXhXhXV.] .X.X. .| | | . . ....... ..... ............................... ............. . . .X.X.X. .| X.X.>.5XSXDXDXSXDXDXDXSXSXDXDXSXDXDXDXSXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXDXGXDXDXDXDXKXKXDXKXDXDXDXLXDXDXLXDXLXDXKXDXLXKXKXLXDXKXKXLXKXLXDXDXLXKXLXDXLXLXGXKXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXLXPXLXLXPXLX",
"aXgXgXfXfXgXgXgXgXgXgXgXhXgXgXgXhXgXgXgXgXgXgXhXgXgXgXgXhXgXhXgXgXhXgXhXgXgXhXgXhXgXhXgXhXhXgXhXhXhXhXhXhXzXhXhXhXhXhXhXkXhXhXhXhXhXhXhXhXkXhXCXhXhXhXhXSXhXkXhXCXhXSXhXhXkXSXhXSXkXkXZXCXkXCXCXCXSXZXV.] | | X.X. .X.| .| . . .w.....w....................... ................... . .X.X.X.] | .| .X.| ..eXSXDXSXDXDXSXDXSXSXDXDXSXSXDXDXSXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXKXGXDXDXKXDXLXKXDXDXLXGXDXLXDXLXDXLXKXLXDXDXLXKXGXKXLXKXLXLXKXLXKXLXLXLXKXLXKXLXLXLXLXLXLXLXIXLXLXLXLXLXIXLXLXLXLXLXLXLXLXLXLX",
"gXfXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXhXgXhXgXhXgXgXgXgXhXgXgXhXgXzXhXgXhXhXgXhXgXhXgXhXhXgXhXhXhXhXgXgXhXhXhXhXhXhXhXhXhXhXCXhXhXhXhXhXhXhXhXCXkXCXhXkXhXhXhXCXCXCXkXCXCXhXCXSXhXkXCXSXkXCXhXhXV.) | | X. .| X. .| | | .X. .w. ....................................... . . .| .| | . . .X. .X.] ] :.4XDXSXDXSXSXSXDXDXDXDXSXDXDXSXDXDXSXDXDXSXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXKXDXKXDXDXKXDXDXKXGXDXDXLXDXLXLXDXKXDXLXKXDXLXLXDXDXLXLXLXDXLXLXLXLXLXKXLXLXLXKXLXLXLXLXLXLXLXKXKXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXPXLXPXLX",
"gXgXgXgXgXgXfXgXgXgXgXgXgXgXgXgXgXgXhXgXgXgXgXgXgXgXgXgXhXgXhXgXgXhXgXhXgXhXhXgXgXhXhXhXgXhXhXgXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXCXCXhXhXhXhXCXCXSXhXkXhXhXSXhXCXhXSXhXSXhXCXSXhXCXCXZXV.) ] [ | | .| .| .| | .| | . ... .w....................... . . . . .| .| | .| .| X. .] X.] ] :.5XSXDXSXDXAXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXKXDXDXDXDXDXKXDXKXDXKXDXLXDXDXDXLXDXKXKXKXDXDXDXKXKXKXKXKXKXKXLXKXKXDXLXKXLXKXLXDXLXLXKXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXPXLXLXLXPXLX",
"gXaXgXgXgXgXgXgXfXgXgXgXgXhXhXgXgXgXgXhXgXgXgXgXhXgXgXhXgXgXhXhXgXhXgXhXhXgXhXhXhXgXgXhXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXkXhXhXhXCXhXhXhXCXSXhXhXSXhXCXhXSXhXhXhXhXCXkXhXSXhXSXhXSXhXSXSXSXhXdXV.] ] ] | | | . .| | | .| | | X. .| .X......... .....X.......| X. .X.| | | | . .| X. . .] | ] ] ] :.4XSXDXSXDXSXDXDXDXDXDXDXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXLXDXDXDXAXDXDXGXDXGXKXDXDXKXLXLXDXDXLXGXKXKXLXLXKXDXLXLXDXLXGXLXKXKXLXDXKXLXKXKXKXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXIXLXLXLXLXPXLXLXLXLXPX",
"gXfXgXgXgXgXgXgXhXgXgXgXgXgXgXgXdXhXgXgXhXgXhXhXhXgXgXhXgXhXgXgXhXgXhXgXgXhXgXhXgXhXhXhXgXgXhXhXgXhXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXkXhXCXhXhXhXhXSXhXhXhXhXhXSXSXCXkXCXSXkXSXhXSXhXSXCXhXhXSXdXV.) ] ] ] ] ] | | . .| | X. .X.| | | | | | .| | | | ..| X.X.| X.| | | | . .| | | .X.| | ] ] ] | ] ..5XDXSXDXDXDXDXFXSXSXSXDXSXDXDXDXSXDXDXDXDXDXSXKXDXDXDXDXDXDXKXGXDXDXDXKXDXLXDXKXKXKXDXKXKXDXLXDXDXLXDXKXKXDXLXDXKXLXLXLXDXLXDXKXKXLXKXLXLXLXKXLXLXLXLXKXLXLXLXLXLXLXKXLXLXIXLXLXPXLXLXPXLXLXPXLXLXLXLXLXLXLXPXLXLX",
"gXgXgXgXgXgXgXgXgXgXgXgXgXhXgXgXfXgXgXgXgXgXgXgXgXgXhXgXhXgXhXgXgXhXgXhXhXhXgXdXhXhXgXhXzXhXhXhXhXhXhXhXgXhXhXhXhXhXhXkXhXhXhXkXhXhXhXhXhXkXCXhXhXkXhXhXhXhXSXSXCXhXSXhXCXkXkXCXCXCXkXhXkXSXSXhXCXSXCXA.) ] ] ] ] ] ] ] | | . .| | | . . . .| | | | | | | | | X.] | | X... . .| | | . .| | | ] | ] ] ] ] w.rXDXSXDXSXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXKXGXDXDXDXKXDXLXDXKXDXDXKXLXDXDXLXLXDXDXGXLXDXLXDXKXLXLXKXLXKXKXLXLXGXLXLXGXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXPXPXLXLXPXLXPXLX",
"gXgXgXgXgXgXgXgXzXgXgXgXgXgXgXgXzXgXhXgXhXgXgXgXhXgXgXhXgXhXgXhXgXhXhXzXhXgXzXhXhXgXhXhXhXhXhXgXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXSXhXhXCXhXhXhXCXCXhXCXkXhXCXhXhXhXSXhXSXhXCXhXSXhXSXCXSXCXhXSXSXkXSXSX/.) ] ] ] ] | | ] ] ] | | . . .| | | X. .| . .| | | ..| | . .X.X.| | | .X. .| | ] ] ] ] ] ] ] ] ' ,.SXSXDXSXDXDXDXDXSXAXDXDXDXSXDXDXDXDXSXDXDXDXDXDXDXDXDXDXKXDXDXDXKXGXDXDXKXDXDXLXDXDXKXDXGXDXLXKXKXDXKXKXKXKXKXLXLXGXLXKXLXLXKXKXLXLXLXDXLXIXKXGXLXKXLXKXLXLXKXLXLXIXLXLXLXLXLXLXLXPXLXPXLXLXLXLXLXLXLXLXPXLXLXLXPX",
"fXdXgXgXgXgXgXgXgXgXgXgXgXhXgXgXhXgXhXgXhXgXhXdXgXhXhXhXhXgXhXhXhXgXhXdXgXhXgXdXhXhXhXhXgXhXhXdXhXkXhXzXhXhXhXhXhXhXhXkXhXhXhXhXhXhXhXhXSXhXCXhXhXkXhXhXhXkXSXhXSXhXCXhXSXhXCXCXkXSXkXkXSXSXhXSXCXCXSX4X4.' ' ] ] ] ] ] ] ] ] ] | | | . .| . .| X. . . . .X.X. .X.X. . .| .| ] | | ] ] ] ] ] [ ] ] ] ' ] V.DXDXDXDXDXSXGXAXDXSXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXGXDXAXDXDXDXDXDXKXKXDXDXDXKXLXKXKXLXDXKXKXKXKXDXLXGXDXLXDXLXAXLXKXKXDXLXDXLXKXLXDXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXIXLXLXLXPXLXLXLXLXPXPXLXLXLXPXLXPXLXLX",
"gXgXgXgXgXgXgXgXgXgXdXgXdXgXgXgXgXgXgXgXgXgXgXhXhXgXgXgXgXhXhXgXgXhXhXgXhXhXzXhXhXgXhXgXhXhXhXhXhXdXhXhXhXhXhXhXhXkXhXdXhXhXhXCXCXhXhXSXhXhXhXSXSXhXZXkXCXCXhXCXhXSXkXSXhXSXSXhXhXhXSXZXhXSXkXZXCXSXSXCXH.( ' ] ] ] ] ] ] | | ] ] ] ] | | | | | | . .| X.X. .X.X. .X.X.| | | | ] ] ] ] ] | | ] ] ] ] ' } $.iXSXAXSXDXSXDXDXSXDXDXDXDXDXDXDXDXDXDXAXDXDXDXDXDXDXDXDXGXDXKXDXKXKXDXDXAXKXDXDXDXDXDXDXKXKXLXAXGXKXKXKXLXDXGXKXLXLXLXLXLXKXKXLXKXKXLXLXKXLXLXKXDXLXIXLXLXLXLXLXLXLXLXLXLXPXLXLXLXPXLXLXLXLXLXIXLXLXPXLXPXLXPXLXLXPX",
"gXgXgXgXhXzXgXgXgXhXhXzXgXgXgXhXzXgXhXgXhXgXhXgXgXgXgXhXhXgXgXhXgXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXhXCXhXkXhXhXkXhXhXhXCXSXhXCXhXhXkXkXkXSXhXSXhXCXSXCXSXSXkXhXSXSXkXCXCXCXSXjXp.( ' ' ] ] ] ] ] ] | | ] ] ] ] ] ] | | | | | | | | | X.X.] ] ] ] ] ] ] | [ ] ] ] ] ] ] ' ] ' ' ^.DXDXDXSXDXSXSXDXDXSXAXGXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXKXDXKXDXDXDXDXKXDXLXGXDXLXKXDXLXDXLXGXGXGXKXKXKXKXKXLXKXLXKXKXDXKXLXLXKXLXLXLXKXLXDXLXLXLXLXLXLXKXLXLXLXLXIXLXKXLXLXLXLXPXLXLXLXIXPXLXLXLXPXLXLXLXLXLXIXPXPXLX",
"gXgXgXgXgXgXgXgXgXgXgXgXgXgXgXgXhXfXdXhXgXhXgXhXgXhXhXgXgXhXhXgXhXgXhXhXhXgXgXhXhXgXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXkXhXkXhXhXhXCXhXkXZXCXkXhXhXkXSXSXhXSXZXhXSXCXCXkXhXSXCXhXSXSXkXSXSXCXSXCXCXCX5X4.' ' ' ] ' ' ] ] ] ] ] ] | ] | ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] | ] | ] ] ] ] ] ' ] ] ' ' } ' V.DXDXSXDXDXDXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXLXKXGXDXKXDXDXKXDXKXGXDXLXDXKXLXDXKXKXKXDXKXLXKXKXLXDXLXKXLXKXLXLXGXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXIXLXPXLXLXLXLXLXLXPXLXLXLXPXLXLXLXPXPXLXLXLXPXLX",
"gXgXgXgXgXgXgXgXgXgXgXgXgXgXhXgXhXgXhXgXhXgXhXgXhXgXhXhXgXhXhXhXhXgXhXhXgXhXhXgXCXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXhXCXhXhXhXhXhXCXCXkXCXhXhXhXSXhXSXkXSXhXSXSXCXhXCXSXhXSXhXSXSXkXCXkXCXSXSXkXCXSXCXSXSXCXSXSXeXv.' ( ' ' ' ' ] ' ' ] ] ] | ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ' ' ' ' ' ( ,.~.DXDXSXSXGXDXSXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXKXDXDXKXDXDXKXDXGXKXDXKXDXDXDXLXDXLXLXDXDXGXDXLXLXDXLXKXLXDXLXKXLXKXKXKXLXKXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXLXLXLXPXLXLXLXLXPXLXLXLXPXLXLXLXPXIXLXLX",
"gXgXgXgXgXgXgXhXhXgXhXgXgXhXgXgXgXgXgXgXhXgXgXhXgXhXhXgXhXgXgXhXhXhXgXhXhXhXhXhXgXhXhXgXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXCXhXSXkXhXhXhXhXkXCXkXhXCXhXhXhXSXhXhXkXSXCXhXSXhXCXkXCXSXCXSXSXhXSXCXCXSXSXkXSXSXSXhXSXdX~.k.,.[ [ [ [ [ [ | ] ] ] ] | ] | ] ] | | ] ] | ] ] X.] ] ] ] ] ] [ [ [ [ [ [ w.7.v.1XDXSXDXDXDXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXGXDXDXDXDXKXDXDXDXLXDXLXDXDXDXKXKXDXLXKXKXDXKXDXKXKXLXKXLXGXLXDXLXLXLXKXLXLXKXLXLXLXKXKXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXPXLXLXLXPXLXPXLXLXPXLXIXPXPXLXLXPXPXPX",
"gXgXgXhXgXhXgXgXgXgXgXgXgXgXhXgXhXdXhXgXhXgXhXgXhXgXgXhXgXhXgXhXhXgXhXgXhXgXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXkXhXhXhXhXhXhXhXhXhXhXCXhXhXhXhXkXSXhXCXhXhXSXhXSXCXSXhXSXSXSXhXhXSXhXSXkXSXSXCXkXSXSXkXSXSXSXkXSXSXZX*X_._._._._.G.4.] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] ] [ v._._._._._..XrXGXSXDXSXDXDXDXDXDXDXDXSXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXKXDXDXLXDXDXDXDXLXLXDXKXLXDXKXLXGXKXKXLXDXKXDXKXKXLXDXDXLXLXDXKXLXKXLXKXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXLXPXLXPXLXLXLXPXPXLXLXPXPXPXPXLXLXLX",
"gXgXgXgXgXgXhXgXgXhXgXhXhXgXhXgXgXhXgXhXgXhXgXhXgXhXgXhXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXhXhXkXhXhXhXhXhXhXSXhXhXSXhXhXhXSXCXSXhXCXhXhXSXSXhXCXSXhXCXhXSXSXhXhXSXSXSXSXSXSXCXhXSXSXSXSXSXCXCXSXSXSXSXSXSXSXFXSXSXDXSXdXa.( ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ..XGXDXDXDXDXGXDXDXSXDXDXDXSXSXDXDXSXDXDXDXDXDXDXDXDXGXDXDXDXDXDXDXDXDXDXDXKXDXKXDXDXLXDXKXDXLXLXDXDXDXKXDXLXDXKXKXGXKXKXLXKXLXKXLXLXKXGXLXLXLXLXLXLXKXLXKXKXLXLXLXLXLXLXIXLXLXLXLXLXLXLXPXLXLXLXLXLXPXLXLXPXLXLXLXLXPXLXPXLXLXLXLXLXLXLXPXLXPX",
"gXgXgXhXgXgXgXhXgXgXgXhXhXgXhXgXgXgXhXgXgXhXgXgXhXhXhXhXgXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXkXhXhXhXhXhXhXCXhXhXkXhXhXhXSXSXhXhXCXCXCXhXSXSXhXSXhXCXhXSXkXCXSXhXSXkXSXSXkXCXCXhXSXSXSXSXSXSXkXkXSXSXSXSXSXSXSXSXSXSXSXSXSXrXp.' ' ' ' ' ' ' ' ' ' ' ) ' ' ' ' ' ' ' ' ' ) [ .XCXDXDXSXSXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXAXLXDXKXDXDXKXGXKXDXKXDXKXDXLXDXDXDXLXDXLXLXDXKXDXKXDXKXKXLXDXLXKXLXDXLXLXLXLXKXKXLXDXLXLXKXLXLXLXKXLXLXLXLXLXLXLXLXPXLXLXLXLXPXLXLXLXPXLXLXPXLXPXLXPXLXPXLXLXLXPXPXLXPXLXPXLXPXPX",
"gXhXgXgXgXgXgXgXhXhXgXgXgXgXhXgXhXgXgXhXhXgXhXhXhXgXgXhXhXhXgXhXhXhXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXkXhXhXCXhXCXhXCXhXSXhXSXCXhXSXhXCXhXCXkXSXhXkXSXhXhXCXSXSXCXkXSXSXCXSXkXSXSXkXSXSXkXSXCXhXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXuXp.' ' ' ' ' } ' ' ' ' ' ' ) ' ' ' ) ' ' ' ' ' [ _.DXSXSXDXDXDXDXSXSXDXSXDXDXDXSXDXDXSXDXDXDXDXDXDXDXDXDXDXDXGXDXDXDXDXDXDXDXDXDXDXKXDXKXDXDXLXKXDXLXDXDXKXLXKXKXLXKXGXKXLXLXDXKXLXLXDXKXDXLXKXLXLXLXLXLXLXKXLXLXLXLXLXIXLXLXLXIXLXLXLXLXLXLXLXLXLXLXLXLXLXIXLXLXLXLXPXLXPXLXPXLXPXLXLXLXPXLXLX",
"gXgXhXhXzXhXgXhXgXgXgXhXgXhXgXhXhXhXgXhXhXhXhXhXgXgXhXhXgXhXgXhXhXhXhXgXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXhXhXhXSXhXhXSXhXhXhXhXSXhXkXhXCXCXhXSXhXSXCXCXhXSXkXhXhXSXkXCXSXkXCXSXSXSXSXkXSXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXrXk.} ' ' ' } ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' [ (.DXSXDXDXDXSXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXDXDXDXKXDXLXDXDXDXKXDXKXGXKXKXGXKXGXKXDXKXLXDXGXKXLXKXKXLXLXDXKXLXKXKXLXKXLXLXKXLXKXLXLXGXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXPXLXPXLXPXLXPXLXLXLXPXLXPXLXPXLXLXPXLXIXPXPX",
"gXgXgXgXhXgXgXgXgXhXhXgXhXgXgXhXgXhXgXhXgXgXgXhXhXhXhXgXhXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXSXCXhXSXhXhXhXCXhXhXSXSXhXhXSXhXSXSXkXSXkXSXkXSXkXSXkXSXSXSXkXSXSXSXkXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXFXSXSXSXDXSXuXk.( } ' ' } } ' ' ' ' ' ' ' ' ' ' ' ' ' ' ) ( [ ).DXDXGXSXDXDXDXGXDXSXDXGXDXDXDXDXDXDXDXDXGXDXDXLXDXDXGXDXDXDXGXDXDXKXGXDXKXLXGXLXDXKXGXKXDXKXDXLXLXKXDXLXKXLXDXKXKXKXKXKXLXKXKXGXLXLXLXKXLXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXPXLXLXLXLXPXLXLXLXLXPXPXLXLXPXIXLXPXLXPXLXPXPXPXLX",
"hXgXgXgXgXhXgXhXgXhXgXgXgXgXhXgXhXgXzXhXdXgXgXhXgXhXhXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXkXhXkXhXCXhXhXhXhXhXkXhXhXhXhXkXCXhXCXCXhXCXkXhXeXeXeXeXeXeXeXeXeXeX6XeXeX4XeXeX4XeXeXeXeX6XeXtXtXtXtXeXeX6XeXtXeX6XtXrXtXtXtXrXtXiX=X6.( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ] H.rXrXrXrXrXrXrX6XiX6XrXrXrXrXrXrXrXxXrXrXuXrXuXuXiXuX6XiXuXuXiXrXuXuXuXuXrXuXuXuXuXrXxXDXLXGXKXDXLXLXKXLXDXDXLXLXLXDXLXKXLXLXKXLXKXKXLXKXLXKXLXLXKXLXLXLXLXLXPXLXIXLXLXLXLXPXLXLXLXPXLXPXLXLXPXPXLXLXLXLXPXLXPXLXLXPXPXLXPXLXPXLXIXLXPXPXLXPX",
"gXgXhXgXhXgXgXhXhXgXhXgXhXhXgXhXgXhXhXhXhXhXhXhXhXhXgXhXhXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXhXhXhXCXhXCXhXSXhXhXSXSXCXhXCXSXhXhXSXdX=XA.i.6.6.6.6.6.-.6.6.6.6.6.=.6.6.6.6.6.6.6.6.7.6.6.6.7.6.6.6.7.6.6.6.7.6.6.6.6.6.6.6.6.4.{ ^ ^ / ( ^ ( ( ^ ( ( ^ ( ^ ^ ( ( ( / ^ ^ ( / ( $.7.i.6.6.6.7.6.7.7.7.7.6.6.7.7.7.6.6.6.7.7.7.7.7.7.7.7.7.7.7.7.7.6.7.6.7.7.7.7.7.7.7.7.!.-XAXLXDXLXDXKXKXLXKXLXDXKXLXLXDXDXLXLXKXLXKXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXPXLXLXPXLXPXLXLXLXPXLXPXLXPXPXLXLXPXLXPX",
"gXgXgXhXgXgXgXgXgXhXgXhXgXhXhXgXhXgXhXhXgXgXhXzXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXhXhXSXhXSXhXCXhXhXhXhXSXhXhXCXSX4Xn.' ^ ] w.$.1.1.1.:.1.1.:.:.1.1.,.1.1.1.1.1.$.$.:.1.1.1.1.1.1.1.$.1.1.1.,.1.1.1.:.1.1.1.$.1.1.,.,.,.1.,.,.1.,.1.1.1.1.,.,.,.,.1.1.,.,.,.,.,.1.1.1.1.:.1.,.1.1.1.1.1.1.1.1.,.1.1.:.:.1.,.1.$.:.1.1.1.$.:.,.:.1.1.1.1.1.1.1.1.1.1.w.] / / V.5XLXDXLXKXKXDXLXDXKXLXKXLXDXLXKXKXLXLXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXLXLXLXPXLXPXLXLXPXLXLXLXLXPXLXPXPXLXLXLXPXLXPXPXPXPXPXLX",
"gXhXgXhXgXhXhXgXhXgXhXgXhXhXgXhXgXhXgXgXhXhXhXgXhXgXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXkXhXSXhXhXkXhXhXhXSXhXhXhXhXhXCXSXhXkXhXSXhXSX<X$./ [ 2.9.0.a.a.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.a.a.x.x.a.x.x.x.x.x.x.a.a.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.x.a.x.0.9.,.[ / ,.3XGXLXGXLXKXKXLXLXDXLXLXLXLXLXKXLXKXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXIXPXLXLXLXLXLXPXLXPXLXPXPXLXPXLXPXLXPXPXLXPXLXPXLXLXPXPX",
"gXgXgXhXhXgXgXhXgXhXhXgXgXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXgXhXhXhXhXhXhXhXhXhXkXhXhXhXhXkXhXhXhXCXhXSXhXhXhXSXSXhXhXSXhXhXkXeX,.( w.9.0.1.] ( ~ ~ ^ ~ / / / ~ / / ~ / / / / / / / / / / / ~ / / / / / / / / / ~ / / / / / / ~ ~ / / / ~ / ~ / / / / / / / / / / / / / / ~ / / / / / / / ~ ~ / / / / ~ ~ / / / / ^ ~ ~ / / / / / / / / / ~ ~ / / / / ~ / / / / / ( ] >.0.q.>.^ $.vXLXKXLXDXLXKXKXLXKXKXLXKXLXLXKXKXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXPXLXLXLXPXLXLXLXPXLXPXLXPXLXLXPXLXLXLXIXLXPXLXLXLXPXPXLXLXIXLXPXPXPXPXLX",
"gXhXhXgXgXhXhXgXgXgXhXgXhXgXgXhXhXhXgXhXhXgXhXhXzXhXhXgXhXhXhXhXhXhXhXhXCXhXhXhXhXhXhXhXhXhXhXCXkXCXhXCXhXCXhXSXhXhXhXSXhXSXSXSXn./ >.a.>.( / ^ ( ( ( ( ^ ( ( ( ( ( ( ( ( ( ( ( ( ^ ( ( ( ( ( ( ^ ^ ^ ( ( ( ( ( ( ( ( ( ^ ( ^ ( ( ( ( ( ( ( ( ( ( ( ^ ( ( ' ^ ' ( ' ( ( ( ( ' ^ ' ^ ( ( ( ( ( ( ^ ^ ( ( ( ( ( ( ( ^ ( ( ( ( ^ ( ( ( ( ( ( ( ( ( ^ ^ ( ( ( ( ( ( ( ^ ( ^ ^ ~ 1.l.:./ V.AXLXDXLXKXLXLXKXLXKXLXDXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXKXPXLXIXLXLXLXLXPXLXLXLXPXPXLXLXLXPXLXPXLXLXPXPXLXPXLXLXPXPXLXLXPXPXPXPXPXLXPXPXPX",
"hXgXgXhXgXgXgXhXhXhXhXhXgXhXhXgXhXgXhXgXgXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXhXCXCXhXhXkXhXhXhXhXhXSXhXkXSXhXSXhXkXhXkX=Xo.] q.w.^ ^ ( ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ( ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ~ ~ ( ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ( ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ | a.] ^ rXLXKXLXLXGXKXKXKXLXKXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXPXLXIXLXPXLXLXLXPXLXPXPXLXPXLXPXPXPXLXPXPXLXLXPXPXLXLXPXLXPX",
"gXgXhXgXhXhXgXgXhXgXgXhXhXgXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXhXhXhXkXhXhXCXhXhXSXSXhXhXSXhXhXSXhXCXkXkXSXA.( 5.w./ ^ ( ^ ^ ( ( ^ ( ( ( ( ( ( ( ( ( ^ ( ` ( ( ( ( ( ` ( ( ( ( ( ( ( ^ ` ( ( ( ( ( ( ( ^ ( ( ( ( ( ( ( ( ( ( ( ( ( ( ^ ( ` ( ' ( ( ^ ^ ' ^ ' ^ ( ' ^ ( ^ ^ ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ` ( ( ( ( ( ( ( ( ( ( ( ( ` ( ( ( ^ ( ( ( ^ ^ ^ 1.2.' ~.DXLXLXDXLXKXLXLXLXLXKXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXPXLXLXLXPXLXPXLXPXLXLXLXLXLXLXLXLXPXPXLXLXPXLXLXPXLXPXLXPXLXPXLXPXPXLXPXLXPXPXPXLXPX",
"gXhXgXgXhXhXgXhXgXhXgXhXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXgXhXhXhXhXhXhXhXhXCXhXhXhXCXhXkXhXhXhXkXhXSXhXSXkXhXSXhXCXCXSXhXhXSXk.] :.] ^ ( ( ( ^ ^ ( ^ ( ^ ^ ^ ( ^ ( ' ^ ^ ^ ( ^ ^ ^ ( ^ ( ^ ^ ^ ( ^ ( ^ ` ^ ( ^ ^ ( ^ ( ^ ( ^ ( ^ ( ^ ( ^ ^ ( ^ ^ ( ( ( ( ^ ^ ( ^ ( ^ ( ( ^ ( ^ ^ ( ^ ^ ^ ^ ( ^ ` ^ ( ^ ^ ( ^ ( ^ ( ^ ( ^ ( ^ ^ ^ ^ ( ^ ( ^ ^ ^ ( ^ ( ^ ( ^ ( ^ ^ ( ^ ^ ^ ^ ( ( ^ 9.] j.AXLXKXLXKXKXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXIXPXLXLXLXLXPXLXPXIXLXPXLXIXLXPXPXPXLXPXLXPXPXPXLXPXLXPXPX",
"hXgXhXhXgXhXhXgXhXhXhXgXhXhXhXhXgXhXhXgXhXgXgXhXhXhXhXhXhXzXhXhXhXhXhXhXkXhXhXhXhXCXhXCXhXCXSXhXhXCXhXhXhXhXCXhXCXkXSXhXCXSXdX6.:.[ ~ ~ ~ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ~ ^ ^ ^ ~ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ / ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ~ ^ ~ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ / ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ / ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ :.] $.VXLXLXLXLXLXLXLXLXKXLXKXLXKXLXLXKXLXLXLXLXLXLXLXLXLXLXPXPXLXPXLXPXLXLXPXLXLXLXPXLXLXPXPXLXLXPXLXPXPXLXPXLXPXPXLXPXLXLXPXLXPXLXPXPXPXLXPX",
"gXhXgXgXhXgXgXhXhXgXhXgXgXhXgXgXhXgXhXhXhXhXzXhXhXgXhXhXhXhXkXhXhXhXhXhXhXhXhXCXkXhXhXhXCXhXCXCXSXhXSXSXCXCXCXCXhXSXSXCXSXSXjX6. .] ~ ( ( ^ ^ ( ( ^ ^ ( ( ^ ` ' ^ ( ^ ( ( ( ^ ' ^ ( ( ( ^ ( ^ ( ( ^ ( ^ ( ( ( ^ ( ^ ^ ` ^ ^ ( ( ^ ( ^ ( ( ^ ( ^ ( ^ ^ ' ( ( ( ^ ( ^ ( ^ ^ ^ ^ ( ( ^ ( ( ( ^ ^ ( ( ( ( ^ ( ^ ( ^ ^ ( ^ ` ^ ( ( ^ ` ( ^ ( ^ ( ^ ( ( ^ ^ ( ^ ^ ( ( ( ^ ( ` ( ^ ^ ^ ^ ) [ 4.VXLXKXKXKXGXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXLXLXLXLXLXPXPXLXPXLXLXPXPXLXPXLXLXPXLXPXPXLXPXLXLXPXLXPXLXPXPXPXPXPXPXPXPXPX",
"hXgXhXgXhXhXhXgXhXgXhXhXhXhXhXhXhXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXkXhXhXhXCXhXhXhXhXCXhXkXhXkXhXhXkXhXhXhXhXkXkXCXkXhXkXhXSXjX-.' ( ~ ( ^ ^ ^ ^ ^ ^ ^ ( ^ ^ ^ ^ ^ ^ ^ ^ ~ ^ ^ ~ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ~ ' 4.VXLXLXKXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXPXLXLXPXLXLXLXPXLXLXLXLXPXPXLXPXLXLXPXPXPXLXPXPXPXPXPXLXPXLXPXLXPXLXPX",
"hXgXhXhXgXgXgXhXgXhXhXgXgXhXhXgXhXgXhXhXhXhXhXhXhXhXkXhXhXhXhXhXhXhXhXhXkXhXhXhXhXhXSXSXhXCXkXhXhXhXhXSXSXhXSXhXSXhXCXCXCXCXjX6.^ ^ ^ ~ ~ ~ ^ ~ ~ ^ ~ ~ ^ ~ ~ ^ ^ ~ ~ ~ ~ ~ ~ ^ ~ ~ ^ ~ ^ ~ ~ ~ ~ ~ ~ ^ ~ ~ ^ ~ ~ ~ ^ ^ ^ ~ ~ ~ ^ ~ ~ ~ ~ ^ ~ ~ ^ ~ ~ ~ ~ ~ ^ ~ ~ ^ ~ ^ ~ ^ ~ ~ ~ ~ ~ ^ ~ ^ ~ ~ ~ ^ ~ ~ ^ ~ ~ ~ ~ ^ ^ ~ ^ ~ ^ ~ ~ ^ ~ ~ ~ ~ ~ ^ ^ ~ ~ ~ ^ ~ ~ ~ ~ ~ ~ ^ ~ ~ ^ ^ ~ ~ ( 4.VXLXLXLXKXLXLXKXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXIXLXLXIXPXPXLXPXLXLXPXLXPXLXLXLXPXPXLXLXLXPXLXPXLXLXPXLXLXLXPXPXPXLXPXPXLXPXPXPXPXPXLXPXPX",
"gXhXgXgXhXhXgXhXhXgXhXhXhXdXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXkXhXhXCXCXhXkXhXCXkXCXhXSXhXhXkXCXhXSXSXSXhXCXhXSXhXSXhXSXSXhXCXCXjX-.~ ~ ^ ^ ^ ^ ^ ^ ~ ~ ( ~ ^ ^ ^ ~ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ~ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ~ ^ ^ ^ ^ ^ ^ ^ ^ ^ ~ ^ ^ ~ ^ ^ ^ ^ ^ ^ ^ ^ ~ ^ ~ ^ ^ ^ ^ ^ ^ ~ ^ ^ ^ ^ ^ ~ ^ ^ ^ ^ ^ ^ ^ ^ ~ ^ ^ ^ ^ ^ ^ ^ ~ ^ ^ ^ ^ ^ ~ ^ ^ ^ ~ ^ ^ ^ ~ ^ ^ ~ ^ ^ ^ ^ ~ ^ ^ ~ ;.VXLXLXLXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXLXLXLXLXLXLXLXLXPXPXLXLXLXPXPXLXPXLXPXPXLXPXPXPXLXLXPXLXPXPXLXPXLXPXLXPXPXPXPX",
"hXgXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXhXkXhXhXhXhXhXCXhXhXkXhXCXCXhXhXhXhXSXCXhXkXCXhXCXhXSXCXSXhXCXCXCXCXCXjX6.~ ^ ^ ^ ~ ~ ^ ^ ` ~ ^ ^ ^ ^ ( ^ ^ ~ ^ ^ ^ ^ ~ ~ ~ ~ ^ ~ ~ ^ ~ ~ ^ ~ ~ ~ ^ ~ ~ ^ ~ ^ ^ ~ ~ ^ ~ ^ ~ ^ ~ ^ ~ ~ ^ ~ ~ ^ ~ ~ ^ ~ ~ ~ ~ ~ ^ ~ ^ ~ ^ ^ ^ ~ ^ ~ ^ ^ ~ ~ ^ ^ ~ ^ ~ ^ ~ ^ ~ ^ ^ ~ ^ ^ ~ ^ ^ ^ ^ ^ ^ ~ ^ ^ ^ ^ ^ ^ ^ ^ ^ ` ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ 4.VXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXPXLXLXPXLXLXLXPXLXPXPXPXLXLXPXPXLXLXPXLXPXLXPXPXLXPXLXLXPXLXPXLXLXPXPXPXPXPXPXPXLXPXPXPXPXLXPX",
"gXhXhXgXhXhXhXgXhXgXhXhXgXhXhXgXhXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXCXhXhXhXhXhXSXhXhXCXkXSXhXhXhXSXCXhXCXCXkXhXSXhXSXCXCXSXhXSXiX-.~ ^ ^ ^ ^ ` ^ ^ ^ ^ ^ ^ ^ ^ ~ ^ ^ ^ ^ ~ { ;.i.p.k.6.i.i.i.i.i.i.i.i.i.i.i.i.i.i.6.6.k.6.k.7.i.i.i.i.i.i.i.i.i.k.i.i.p.i.i.p.i.i.p.i.i.k.i.i.i.7.p.i.i.k.7.k.7.k.i.i.i.i.i.i.i.p.i.i.i.i.i.i.i.i.7.k.7.7.k.,.{ ~ ~ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ~ ^ ^ -.VXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXLXLXLXLXPXLXLXPXLXLXLXLXLXIXLXPXLXLXLXPXLXPXLXPXLXPXLXPXPXPXPXIXLXPXPXPXLXLXPXLXPXPXPXPXPXLXPXPXPX",
"hXgXhXgXhXhXgXhXgXhXgXhXgXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXkXSXhXSXhXhXSXhXhXSXhXSXhXhXhXSXhXhXCXkXCXkXhXCXSXSXCXCXSXCXSXSXjX6.~ ~ ~ ^ ^ ^ ~ ~ ^ ~ ~ ^ ~ ~ ~ ^ ^ ~ { p..XjXGXGXGXGXFXDXGXGXGXGXFXFXGXGXGXGXGXGXGXGXFXLXGXGXGXGXGXGXGXGXGXGXGXFXLXFXLXGXGXGXGXGXLXGXGXGXGXGXGXLXLXLXGXLXGXLXLXLXLXLXLXLXGXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXbX).k.{ ! ^ ~ ~ ^ ~ ^ ^ ~ ^ ~ ^ ~ ^ ~ ^ ~ ^ ;.VXPXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXPXIXLXLXPXLXLXLXLXLXPXLXLXLXPXLXPXLXPXLXLXPXLXLXPXLXLXPXIXPXPXLXPXPXPXPXPXPXPXPXLXLXPXPXPXPXLX",
"hXhXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXkXhXhXCXhXhXhXhXhXhXCXhXhXkXhXCXhXhXkXSXhXkXCXhXSXhXCXSXCXkXhXkXCXhXSXCXCXjX6.~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ o.J.SXDXSXSXCXSXSXSXSXSXSXSXSXSXDXSXSXSXSXSXDXSXSXDXSXSXSXDXSXSXDXDXDXSXDXDXDXDXDXDXDXDXDXGXDXDXGXDXDXGXDXDXGXDXDXGXDXDXGXDXDXGXDXGXDXGXGXGXKXGXGXLXDXFXLXGXGXLXDXGXLXGXGXLXLX/.$.~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ 4.VXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXPXPXLXLXPXPXLXLXPXLXPXLXPXLXLXPXPXPXPXPXPXPXLXPXPXPXLXLXLXLXPXLXPXPXPXPXPXPXPXPX",
"gXhXgXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXCXhXCXhXhXhXSXhXhXCXSXhXSXkXhXSXhXhXSXhXSXhXCXCXSXSXSXSXCXCXjX-.~ ^ ~ ~ ~ ~ ^ ~ ~ ^ ~ ~ ~ / ~ / { <XDXSXSXDXSXSXSXSXSXSXSXSXDXSXDXSXDXSXSXDXDXSXSXDXSXDXDXDXDXSXSXSXSXDXSXDXDXDXDXSXDXSXDXSXSXDXDXDXDXDXDXSXDXGXDXDXDXDXGXDXDXDXGXDXDXGXDXKXKXDXAXDXKXDXDXDXGXKXDXLXLXDXLXKXKXDXLX5X{ ~ ^ ~ ~ ~ ~ ^ ~ ~ ^ ~ ^ ~ ~ ~ ~ ;.VXLXLXLXIXLXLXLXLXLXLXLXLXLXLXIXLXLXLXLXPXLXPXLXLXLXPXLXLXLXPXLXLXPXLXPXLXLXLXPXPXPXPXPXPXLXLXPXLXLXPXPXPXPXPXPXPXIXPXPXPXPXPXPXLXPXPXPX",
"hXhXgXhXhXhXgXhXhXhXgXhXhXhXhXhXhXhXhXhXkXhXhXhXhXhXCXhXhXCXhXhXkXhXhXSXSXhXhXCXSXhXCXkXhXCXCXhXSXSXCXSXhXkXSXCXhXhXSXhXCXCXjX6.~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ^ J.DXSXSXSXSXSXSXSXSXDXSXAXSXSXSXSXSXSXDXSXDXSXDXDXSXDXSXSXSXDXDXDXDXDXSXDXSXDXSXDXDXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXGXGXDXLXLXLXDXKXDXLXDXLXKXGXKXLXLXLX-X^ ~ ~ ~ ^ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ,.VXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXPXLXLXLXLXLXPXLXIXLXLXPXLXLXPXLXLXPXPXPXPXLXLXLXPXLXLXPXPXLXPXPXPXLXPXLXPXPXPXPXPXPXPXLXPXPXPXPXPXPX",
"gXhXgXhXhXgXgXhXhXhXhXgXhXhXhXhXhXhXhXhXhXhXkXhXhXCXhXhXhXCXhXhXhXCXhXSXhXkXhXhXhXSXSXhXkXCXkXCXCXSXhXSXhXSXCXCXSXSXSXSXSXSXdX-.! ! b b ! ! ! ! ! ! b ! ! ! ! k.CXSXSXSXSXDXSXSXDXSXSXDXSXSXSXDXDXSXSXSXDXSXSXSXSXSXDXSXDXSXSXDXDXSXSXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXDXLXDXKXDXKXKXDXKXDXKXDXLXDXLXKXDXLXDXKXKXGXKXGXLXLX6.! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ;.AXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXPXLXLXLXLXLXLXPXLXPXLXLXLXPXLXLXLXLXLXPXLXLXPXPXLXPXPXPXPXLXPXPXPXPXPXLXPXPXPXLXPXLXPXPXPXPXPXPX",
"hXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXZXhXhXhXhXhXhXhXhXSXkXhXSXhXCXhXhXhXhXCXSXhXkXhXhXSXhXCXSXhXCXhXSXCXkXCXCXjXeX7X2X2X4X4X;X4.^ ' ' ' ` ' ( ' ` ' ( ' ( ( ( H.uX2X2X4XtXZXSXSXSXSXSXDXSXDXSXDXSXDXDXSXDXSXDXSXDXDXSXDXDXDXDXSXDXDXDXDXDXDXSXDXDXSXSXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXKXDXKXDXDXDXDXDXDXKXKXDXLXDXKXDXKXDXLXDXDXLXDXLXVXuX0X0X0X5X9X^.' ( ( ` ' ' ` ' ` ' ` ' ( ' ( ,.0X0X0X0X0XuXmXLXKXPXLXPXLXPXLXLXPXLXLXLXLXLXLXPXPXPXLXLXPXLXLXPXLXPXPXPXPXPXPXLXPXPXPXLXPXLXLXPXPXPXLXPXLXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXhXhXhXgXhXhXhXhXhXhXhXhXkXhXhXhXhXhXhXhXhXCXSXhXhXhXhXCXhXhXCXhXkXSXCXSXhXSXCXhXCXhXCXCXSXhXSXSXhXkXCXdX=Xv.<.2.2.2.2.8.8.q.x.l.l.l.Y.Y.l.Y.Y.Y.l.0.x.0.0.q.2.<.2.3.9.~.rXCXSXSXDXSXSXAXSXSXSXSXDXSXSXSXDXSXSXDXSXSXSXSXGXDXSXDXSXSXSXDXSXDXDXSXDXDXSXDXDXDXDXDXDXDXGXAXDXDXDXDXDXDXDXDXDXKXDXGXDXKXKXDXKXGXDXLXKXKXDXLXDXLXKXKXLXuX!.a.>.2.3.2.2.q.0.0.x.l.l.l.Y.Y.Y.Y.Y.l.0.0.0.9.8.<.2.2.<.2.T.qXHXLXLXLXLXLXIXLXLXLXLXPXLXPXLXPXLXLXLXPXPXLXPXLXPXLXLXIXPXLXPXPXPXLXLXPXPXPXLXPXLXPXLXPXPXLXPXLXPXPXPXLXPXPXPXPXPXPXPXPX",
"gXhXgXhXhXhXhXhXgXhXhXhXdXzXhXhXhXhXhXhXkXhXhXhXhXhXCXhXCXhXSXhXhXCXCXhXCXhXCXhXhXSXSXkXSXkXhXSXkXhXSXSXZX!.<.<.a.U.U.U.v.T.T.T.T.T.T.T.T.R.T.R.T.T.T.T.T.T.T.U.U.T.U.z.q.:.a.2XDXSXSXSXSXDXSXSXDXSXSXDXDXSXDXDXDXSXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXGXDXDXDXDXDXDXDXGXDXDXDXGXDXKXDXKXDXDXKXDXDXDXLXDXKXDXDXKXDXDXGXLXDXLXDXKXKX5Xq.3.q.z.U.T.T.Y.T.T.T.T.T.T.T.T.T.T.T.T.T.T.T.T.T.T.U.U.T.z.9.<.>.[.HXLXLXPXLXLXPXLXLXPXLXLXPXLXLXLXPXLXPXLXLXIXPXLXLXPXPXLXPXLXIXPXPXLXPXPXLXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXLXPXPXPXPXPX",
"hXgXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXhXSXhXCXhXhXhXhXhXkXhXhXhXCXhXkXhXkXCXhXCXCXCXSXhXkXCXCXkXSXCXkXSXkXSX^.3.q.T.E.T.R.R.R.T.T.T.R.R.R.R.R.R.R.T.R.R.R.R.R.T.T.T.R.T.T.E.R.0.>.9.5XFXSXDXSXSXDXSXDXSXSXDXDXSXDXSXDXSXSXDXDXSXDXSXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXKXDXDXDXKXDXKXDXKXKXDXLXKXDXLXDXKXKXDXLXKXLXuX2.2.U.Q.R.T.T.T.R.R.R.R.T.R.R.R.R.R.R.R.T.T.R.R.R.T.R.T.T.T.E.E.U.2.>.'.LXLXPXLXLXPXLXLXLXPXLXLXPXPXLXLXLXPXIXLXLXPXLXPXLXPXPXLXPXPXLXIXLXPXPXPXLXPXLXPXLXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXhXhXhXhXhXhXhXhXhXhXCXhXhXhXhXhXhXhXhXhXkXhXhXSXhXhXkXSXhXhXhXSXhXhXSXkXkXhXSXSXhXkXkXSXhXhXSXkXSX1X5.q.R.T.x.8.<.3.2.8.8.8.8.q.q.q.9.9.9.9.9.9.9.8.8.8.8.8.<.<.2.0.U.!.l...V.ZXDXSXDXDXSXSXSXDXSXSXSXDXSXDXSXDXDXDXSXDXDXDXDXDXSXDXDXSXDXSXDXSXDXDXDXDXDXDXDXDXDXDXGXDXDXDXDXDXDXDXDXKXDXKXKXDXLXDXDXKXDXKXKXDXKXLXDXLXDXLXKXa.3.T.E.a.q.2.2.<.8.8.8.8.8.q.9.9.9.9.9.9.0.0.q.8.8.2.8.8.<.2.q.Y.R.T.<.>.mXLXLXLXLXLXLXPXLXLXLXIXLXLXLXPXPXLXLXPXPXLXIXPXPXLXLXPXLXPXPXPXLXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXgXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXhXCXSXhXCXhXhXCXCXkXSXhXSXhXCXCXhXSXCXCXhXSXhXSXCXSXSXSXkXCXSXv.<.T.z.<.3.2.2.2.8.8.8.q.8.0.0.0.0.0.0.0.0.0.0.q.q.q.8.q.8.8.2.<.<.l.T.q.3.;XFXSXSXDXAXSXDXSXSXDXDXSXDXSXDXSXDXSXDXDXSXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXDXDXDXLXDXKXDXDXDXDXDXGXKXDXDXKXDXKXDXDXDXLXDXKXKXLXGXuX>.a.T.8.>.2.2.2.2.8.8.8.q.8.0.0.0.0.0.0.0.0.0.9.q.q.8.8.8.2.2.2.>.8.T.l.<.[.KXPXPXLXLXPXLXPXLXLXPXPXLXPXLXLXPXPXLXLXPXLXPXLXPXPXLXPXPXPXLXPXPXLXPXPXLXLXPXPXPXPXPXPXPXLXPXPXPXPXLXPXPXPXPXPXPX",
"hXhXhXgXhXhXhXhXhXhXhXhXhXhXhXhXSXhXhXCXhXhXhXhXhXSXCXhXCXhXhXkXCXCXCXhXkXhXSXhXSXhXSXhXSXhXCXCXCXSXZXx.x.l.2.1.1.2.2.2.8.8.8.8.8.9.9.9.0.0.0.0.9.9.0.9.8.8.8.8.8.<.8.<.3.>.l.z.:.~.DXDXSXSXDXSXSXDXDXDXSXDXDXSXDXDXSXDXDXSXDXDXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXLXDXDXDXDXKXLXGXKXDXDXDXLXKXGXKXDXLXKXGXKXLXLXKXDX`.2.R.2.3.<.<.2.2.2.8.8.8.8.q.9.0.9.9.0.0.9.0.0.q.q.8.8.8.2.2.2.8.<.>.q.T.<.0.MXLXLXLXPXLXLXPXLXPXLXLXPXLXPXPXLXLXPXLXPXPXLXPXLXLXPXPXLXPXPXPXLXPXPXPXPXPXPXPXLXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXhXhXhXhXhXhXhXhXkXhXhXhXCXhXhXhXhXhXhXSXhXCXhXSXhXhXSXhXSXCXhXSXhXSXhXSXkXCXhXSXhXSXCXSXhXkXSXkXeXq.Y.8.>.3.<.2.2.2.2.8.q.8.8.q.9.0.9.0.9.0.9.0.q.q.8.8.q.8.<.2.2.<.>.>.8.0.2.!.DXSXSXDXDXDXDXSXDXSXDXSXDXDXSXSXDXDXSXDXDXSXDXSXDXDXSXDXDXDXDXDXDXSXDXDXDXDXKXDXDXDXDXDXDXDXDXLXDXLXDXGXDXLXKXDXKXDXKXDXKXLXKXKXDXLXDXDXLXAX~.8.a.>.>.<.<.2.2.2.8.8.8.8.q.q.9.0.0.0.0.9.0.9.8.q.8.8.q.5.2.2.2.<.<.:.U.q.3.nXLXPXPXLXLXLXPXLXLXPXLXLXLXPXLXPXPXLXPXLXPXLXPXPXLXPXPXLXPXPXLXPXIXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXgXhXhXhXhXhXhXhXhXhXhXhXhXkXhXkXSXhXCXhXhXhXCXhXhXkXhXkXhXkXSXhXhXhXSXhXCXkXSXhXhXSXhXSXSXSXSXSX*X5.8.2.>.>.<.<.2.2.<.8.8.8.8.8.8.q.9.x.9.0.0.q.q.8.q.8.8.2.2.8.8.<.<.<.>.q.2.!.GXDXSXDXSXSXDXSXSXDXSXDXDXSXDXDXSXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXKXKXGXDXDXDXDXKXKXDXDXKXKXKXDXKXKXDXKXLXDXLXDXKXLXLXDX!.q.8.3.>.<.>.2.2.2.2.8.8.8.q.8.q.9.9.9.9.9.9.8.q.8.8.q.8.2.2.2.<.<.<.>.8.q.>.cXLXLXLXLXPXLXLXPXPXLXLXPXPXLXPXLXLXPXLXPXPXPXLXPXPXPXLXPXLXPXPXPXPXLXLXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXzXhXhXhXhXhXhXCXCXhXhXhXhXhXhXhXhXhXhXkXCXhXSXhXCXhXSXhXCXhXhXSXSXSXhXSXSXhXhXSXSXkXSXkXSXhXCXSX;X5.2.<.>.3.,.3.2.8.2.2.8.q.8.8.q.8.8.9.q.q.q.8.8.8.8.8.2.2.2.2.<.<.1.>.>.2.1.!.SXDXDXSXSXDXSXDXDXSXDXSXDXSXSXDXDXDXDXDXSXDXDXSXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXDXDXKXDXLXKXDXDXKXDXDXDXLXDXKXKXKXKXGXGXKXLXLXLXLXLXAX!.q.>.>.>.<.<.<.2.2.2.8.8.8.8.q.q.8.q.q.q.q.8.8.q.8.8.8.2.2.2.2.>.>.<.>.>.8.:.cXPXLXLXPXLXPXLXPXLXPXLXPXLXPXLXPXPXPXLXPXIXLXPXLXPXLXPXPXPXLXPXLXPXPXLXPXPXLXIXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXhXhXhXhXhXkXhXhXhXhXhXhXkXSXhXhXSXhXCXhXkXkXhXCXhXSXhXhXSXkXCXhXSXhXCXSXhXSXSXhXSXCXhXSXSXSXSXSX;X5.<.,.>.>.<.<.<.2.2.2.2.8.8.8.8.8.q.8.8.8.q.q.8.8.8.8.8.2.2.2.<.<.<.>.>.<.:.!.GXSXSXSXDXDXDXSXDXDXDXSXDXDXDXDXDXSXDXDXDXDXDXDXDXGXDXDXDXDXDXDXDXDXDXDXGXDXDXDXKXDXDXKXDXDXDXLXDXKXDXKXLXKXLXDXKXGXGXKXKXKXKXKXDXLXDXDXLXKX!.2.>.>.>.<.<.>.2.8.2.2.8.8.q.8.8.q.8.q.8.q.8.8.8.8.8.2.2.2.2.2.<.<.>.>.>.<.:.cXLXPXLXPXLXLXPXLXLXIXPXLXPXLXPXLXLXPXPXLXLXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXLXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXhXhXhXhXhXCXCXhXhXhXCXhXhXhXkXhXhXSXhXhXCXCXhXCXSXhXSXhXhXSXhXSXSXhXSXkXSXhXhXSXkXSXkXCXSXCXSXSX;X5.>.1.>.>.>.<.<.<.2.2.2.8.q.8.8.8.8.8.8.q.8.8.8.8.8.8.2.2.2.2.<.3.>.>.>.,...!.SXSXDXDXDXSXDXSXDXDXSXSXDXDXDXSXDXDXDXSXSXDXDXDXSXDXDXDXDXDXDXDXDXDXKXDXDXKXKXDXKXDXKXDXDXKXDXDXKXDXDXGXKXKXKXKXKXGXKXGXKXDXKXKXLXDXLXLXDXKX!.>.>.>.>.>.<.<.<.2.2.2.2.8.8.8.8.q.8.8.8.8.q.8.8.q.2.2.2.2.2.3.<.<.>.>.>.:...cXPXLXLXLXPXLXLXPXPXLXPXLXPXLXLXPXPXPXLXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXhXhXhXhXhXhXhXhXkXhXkXhXhXCXkXZXCXhXhXkXSXhXkXhXhXCXhXSXCXkXhXSXhXSXhXSXSXCXSXCXSXCXhXSXCXSXSXSX;X5...>.1.3.>.<.<.<.2.2.2.<.2.8.8.8.8.8.q.8.8.8.8.8.2.2.2.2.<.<.<.<.>.>.3.>. .!.GXSXDXSXSXDXDXDXSXDXDXDXDXSXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXKXDXDXKXKXDXKXKXDXLXLXDXKXDXDXKXDXKXKXKXLXKXDXLXKXKXLXKXLXAX!.....>.>.<.>.<.>.<.2.2.2.2.2.8.8.8.8.8.8.8.8.8.8.2.2.2.2.8.<.,.<.>.>.>.>.....mXPXLXPXLXLXPXPXLXLXPXLXPXLXPXPXLXLXLXPXPXPXPXLXPXIXLXPXLXPXLXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXhXhXhXhXhXhXhXhXSXhXhXhXhXhXkXhXhXkXhXCXhXkXhXSXhXhXCXkXhXSXSXhXSXhXSXCXhXSXSXkXSXSXSXSXCXhXSXSX*X8...>.>.3.>.>.<.<.<.<.2.2.8.2.<.8.8.8.8.8.8.8.2.2.2.2.2.<.<.1.<.1.>.>.>.:. .!.DXDXSXDXSXSXSXDXDXDXSXDXDXDXDXDXDXSXDXSXDXDXSXDXDXDXDXDXDXDXDXGXDXLXDXKXDXDXGXDXDXDXGXDXLXDXKXGXLXDXLXDXKXKXKXKXDXKXDXLXLXGXLXLXDXKXDXLXLXKX!.>...<.>.>.<.<.<.<.2.2.2.2.2.2.2.8.8.8.q.8.8.2.2.2.2.2.2.<.,.<.>.>.>.<.:.:...mXLXPXLXPXLXPXLXPXPXLXLXPXPXPXLXIXPXLXPXLXPXLXPXLXLXPXPXPXPXPXLXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXhXhXhXhXhXCXhXhXhXhXSXhXhXkXhXkXSXhXkXCXhXCXhXSXSXSXCXSXSXhXhXSXCXSXhXCXkXSXCXSXhXhXSXCXSXSXkXSX;X5.....>.1.>.>.>.<.<.<.2.2.2.2.2.2.8.2.2.2.<.2.2.2.2.2.2.3.<.3.3.>.>.>.>.:.X.!.GXDXDXSXDXDXDXSXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXGXDXDXDXDXDXDXDXDXDXDXDXDXDXKXKXDXDXLXKXDXDXDXDXDXLXDXDXLXDXKXLXKXLXDXLXKXDXLXDXLXLXGXLXLXKXKX!.......>.>.>.>.>.<.<.>.2.2.8.2.2.2.2.2.<.8.<.2.2.2.2.2.<.3.<.<.>.>.>.>.:... .mXPXLXPXLXPXLXPXLXLXPXPXLXPXLXPXPXPXPXPXLXPXPXPXLXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXkXhXhXhXhXhXhXhXCXhXhXCXkXCXkXhXSXCXhXhXSXhXCXkXSXhXhXhXSXCXhXhXSXSXhXSXkXCXCXSXSXhXSXSXSXhXSXSXSXXX5. ...:.>.3.1.>.<.<.<.<.2.2.2.2.2.2.2.2.2.2.2.2.2.2.2.<.<.,.3.>.>.>.>..... .!.DXSXDXSXSXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXLXDXDXKXDXKXGXDXDXDXDXDXKXDXLXDXLXDXLXDXLXDXLXDXKXDXLXDXLXLXDXLXKXDXLXKXKXLXDXLXKX~.......>.>.>.>.>.<.<.>.<.2.2.2.2.2.2.2.2.2.<.8.2.2.2.3.,.<.<.>.>.1.3.:.w.....mXPXLXPXLXLXLXPXPXPXLXPXPXPXLXPXPXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXCXhXCXhXhXCXhXhXCXhXhXhXhXhXkXhXCXhXSXhXkXkXCXCXhXSXSXhXSXSXSXhXSXSXCXSXCXSXhXSXSXSXhXSXSXSXSXSX;X5. .....:.>.>.>.>.1.3.1.<.>.2.2.2.2.2.2.2.2.2.2.2.<.,.3.,.3.>.>.>.>.>.w...X.!.GXSXSXDXDXDXSXSXDXDXSXDXDXSXSXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXDXKXDXDXDXDXDXLXKXDXKXDXDXDXLXDXKXDXKXDXLXDXKXGXLXDXDXLXKXKXGXKXLXKXLXLXKXLXLXHX!.......>.>.>.>.>.>.>.<.<.>.<.2.2.2.2.8.2.2.8.2.<.3.<.<.1.3.>.>.3.>.:.:.......xXLXPXLXPXLXPXPXLXLXPXPXLXPXPXLXLXLXLXLXPXPXLXPXPXLXPXLXPXLXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXhXCXCXhXSXhXkXCXhXCXhXCXSXhXkXhXhXSXhXCXCXhXCXhXhXSXhXSXkXCXhXSXSXhXSXkXSXhXSXSXSXSXSXSXSXSXSXSX*X8.......w.:.>.>.1.3.1.<.3.<.<.3.>.<.<.3.<.<.<.<.<.3.,.>.>.>.>.>.>.:.w... .X.!.GXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXSXDXDXDXDXDXDXDXGXDXDXDXDXDXDXDXDXDXDXDXDXLXKXLXKXDXDXKXLXDXLXDXKXLXKXKXKXKXLXDXLXKXLXKXLXLXKXLXLXLXAX!...........>.>.>.>.>.>.<.<.>.<.3.<.<.<.<.<.<.1.<.1.<.1.3.>.>.>.>.:...:.......mXPXLXPXLXPXLXLXPXLXPXPXLXLXPXPXPXLXPXPXPXPXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXhXhXhXhXhXhXhXhXSXhXCXhXhXCXCXCXCXhXSXCXhXSXCXkXCXCXkXCXCXSXCXSXCXCXkXSXSXSXCXCXSXSXhXSXkXSXSXSX;X4. .........1.3.3.1.3.1.>.>.<.<.<.<.<.<.<.<.,.3.,.3.>.>.>.<.>.>.>.........X.!.GXSXDXSXDXSXSXDXDXSXDXDXSXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXKXKXKXDXKXKXDXDXDXGXDXLXKXDXLXDXLXDXGXKXKXKXLXDXLXKXLXDXLXKXKXKXGXLXLXKXQ.........:.:.>.>.>.<.>.>.>.<.<.3.<.<.<.<.<.<.3.<.<.3.>.>.>.<.>.:.:......... .mXPXPXLXPXLXPXPXLXPXLXPXPXPXLXLXPXPXPXLXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXhXhXhXhXhXhXCXhXSXhXhXkXkXCXkXhXCXCXhXCXhXSXCXSXhXSXhXSXkXhXCXSXCXSXSXSXhXSXhXSXSXkXSXSXSXSXSXSX;X<...w.w.....w.:.>.>.>.>.3.>.>.>.<.<.<.<.<.>.>.>.>.>.>.>.>.>.....:.........| Q.GXSXDXSXDXDXDXSXDXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXKXDXKXGXDXDXLXLXDXDXKXKXKXKXDXDXKXLXDXLXGXKXKXLXDXLXLXDXLXKXKXLXLXLXKX!...........:...>.>.>.>.>.>.>.<.<.>.<.<.<.<.<.>.>.>.>.>.>.>.>.:.............| mXLXPXLXPXLXPXPXPXLXPXPXLXPXPXPXLXPXPXLXPXLXPXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"CXhXhXCXkXCXSXhXhXCXhXCXSXhXCXhXCXkXCXkXCXCXCXkXkXCXhXCXSXSXCXSXSXhXSXhXSXhXSXSXSXSXCXSXCXSXSXCXSXSX;X<.] ...... .......:.>.1.>.>.>.>.>.>.>.>.>.>.>.>.>.<.>.>.>.:.w.:......... .] Q.GXDXDXSXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXLXDXDXDXLXKXGXDXKXKXDXKXDXLXDXDXKXLXKXKXDXLXKXLXDXLXLXDXLXLXLXKXLXLXKXKXLXLXLXKXLXKXKXQ. .X.............:.>.>.>.>.>.>.>.>.1.>.>.>.>.>.>.<.>.>.>.>...............| | cXPXPXPXLXLXPXLXPXLXPXPXLXPXLXPXPXPXLXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXhXCXhXhXhXhXCXhXhXhXkXCXhXSXSXhXSXCXSXhXSXSXCXkXSXhXSXhXhXSXSXSXCXSXCXSXSXSXSXSXSXSXCXSXSXSXSXSX;X<.X.| ..........w.:...>.>.>.>.>.>.>.>.>.>.>.>.>.>.>.>.>............... .| ) !.GXSXDXDXDXDXSXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXLXDXKXDXDXKXKXDXKXDXDXKXKXKXLXGXDXKXDXLXDXLXKXLXLXDXLXKXDXLXLXKXLXLXLXLXLXKXLXLXLXKX!. .| X...........:.:...>.>.>.>.>.>.>.<.>.>.>.>.>.>.>.>.:.:...w.........X.X.| cXPXLXLXPXPXPXLXLXPXPXPXPXPXPXPXLXPXPXPXPXPXLXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXSXhXCXhXkXSXhXSXhXSXhXhXSXhXhXSXhXhXhXSXhXCXSXCXSXSXhXSXSXSXhXSXhXSXSXkXSXCXkXSXSXCXSXSXSXCXCXSX=X<.| X.X. .w.......w.......:.>.>.>.>.>.>.>.>.>.>.>...:.:............. .| | | !.GXDXDXDXSXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXKXGXDXDXDXDXDXDXKXDXGXDXKXKXKXKXDXKXKXDXKXKXKXGXLXDXLXDXLXDXKXLXDXLXKXLXKXKXLXKXGXKXDXLXLXHXQ. .X.| X. ...........:...:.:.>.>.>.>.>.>.>.>.>.>.:.w.................| X.X.X.mXPXLXPXPXPXLXPXPXPXLXLXPXPXLXPXPXPXLXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"kXhXhXhXCXhXhXhXCXCXSXhXCXCXhXSXSXhXSXCXhXSXSXhXhXSXkXCXSXCXSXhXSXSXSXhXSXSXSXSXSXCXSXCXSXCXSXSXSXFX;X<. . .X.X. .........w.........:...:.:.:.:.:.w.w...:............... .X.X. .| Q.GXDXDXDXDXSXDXDXDXDXDXSXDXDXDXDXGXDXDXKXDXDXDXLXDXDXKXDXLXDXDXKXDXKXKXDXDXKXDXKXDXLXKXKXKXKXKXKXKXKXLXDXLXLXKXKXLXLXLXKXKXLXLXLXLXLXLXLXLXKX!. . . .| . .w...........w...w.:.:.:...:.:.....:...:......... ...X.| .X.X. .cXPXLXLXLXLXPXPXLXLXPXLXPXLXPXLXPXLXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXCXCXhXhXSXhXSXhXhXhXkXCXkXCXhXhXhXhXSXhXSXhXSXSXCXCXSXkXSXCXSXkXSXSXkXCXSXCXSXSXSXSXSXSXSXSXSXSXSX;X<.X.] X.X.] X. ....... .w.............w................... ... .| X.X.X.X.] !.LXSXDXSXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXGXDXDXDXKXDXKXDXDXKXKXKXLXDXLXDXKXDXGXKXKXKXDXLXKXLXLXDXKXLXDXLXKXLXLXKXKXDXLXLXLXLXIXKXQ. .| X.| X.| .....................:.........:.................X. .| | X. .| cXPXPXPXPXLXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"CXhXhXkXhXhXSXhXSXhXhXCXhXhXSXhXSXSXhXSXSXSXSXCXhXkXSXhXCXSXhXCXSXSXSXSXSXSXSXCXSXSXSXSXSXSXSXSXSXSX;X1.] X.X.X. .X. .X. ............. ..................... ... . . .| [ | X.X.] Q.GXDXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXDXKXDXKXDXGXKXLXDXGXKXKXGXDXKXLXKXKXDXLXLXKXLXDXKXLXLXLXDXKXLXKXLXKXLXLXLXLXLXLXLXAXQ. .| | X. .X.X.| | ........................w............. . .| | .| X. .| ] cXPXPXLXPXPXPXPXPXPXPXLXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXSXhXCXSXhXhXCXkXCXSXhXSXSXCXCXhXCXSXhXSXhXhXSXSXSXCXSXSXCXSXSXCXCXSXCXSXSXkXSXSXCXSXSXSXSXSXSXSXDX.X1.] X.X.X.X.X.X.| .| .....................w......... .X. .| | | .X.X.[ ) Q.DXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXKXDXDXDXDXKXDXDXLXKXDXKXDXLXDXKXDXLXDXDXDXLXKXKXDXKXGXLXLXDXLXLXDXLXKXLXKXLXLXLXLXLXGXLXLXLXLXLXLXLXLX!.] ] .| | .X.| . .| ...w. ............. ......... . .| | .X.| .| | | ] mXPXLXPXPXLXPXPXLXPXLXPXPXPXPXPXLXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXCXhXkXhXSXSXhXkXCXSXhXSXhXCXCXhXkXCXSXCXSXSXhXCXkXSXCXCXkXCXSXSXCXSXCXSXCXSXSXSXSXSXSXSXSXSXSXSXSX;X,.] ] | | .| X.X.X. .X.X. .X..... ....... ... . .X.] .| | X. . .| | ] ] ) !.GXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXLXDXDXDXKXDXGXDXDXDXKXKXGXDXKXDXKXDXLXGXKXLXKXKXLXDXKXKXKXGXKXKXKXKXKXKXLXKXLXLXLXLXKXKXLXLXLXLXLXLXKXLXIXQ.] ] ] X.X. .X. .| .| | X.| . ..... .......| .X. .X. .X.| | .| .| ] | ] mXPXLXPXPXPXLXPXPXPXLXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"kXhXCXhXSXhXhXCXCXhXhXCXhXSXkXCXSXhXSXhXSXhXSXCXSXSXCXkXCXSXSXSXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSX4X4.] ] | ] ] | . .X.X.X. .| | | | | .| .X.X.X.X.X. .| .| .| | | ] ] ] ) A.GXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXKXDXKXKXKXDXDXDXLXDXLXDXKXDXKXKXKXGXDXLXLXGXKXLXKXLXKXLXKXLXKXLXLXKXKXLXKXLXLXLXKXLXLXKXLXLXLXKX!.] | ] ] ] X.X.| X.| .X. .| .| | . . .| .| | .X.X.X.X. .X.| X.] ] ] ] w.mXPXPXLXPXPXLXPXLXPXPXLXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXSXhXSXhXhXCXCXSXhXkXhXhXSXCXSXCXSXhXSXSXhXSXSXhXSXSXSXSXSXSXhXSXSXCXSXCXSXSXSXSXSXSXSXSXSXSXSXSXDXjX6.] ] ] ] ] ] .X.X. .X.| | | | .| .| .X.[ X.X.| | | .| X.] ] ] ] X.] ) ~.GXDXAXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXKXDXKXKXDXDXKXLXLXDXKXDXLXKXDXKXKXKXKXLXKXKXKXKXLXLXDXLXKXLXLXLXKXKXKXKXLXLXLXLXLXLXLXLXLXLXLXLXKX~.| ] ] | ] ] X.X.| X.| X.| | | | .| | | X.| | | X.| X.[ X. .X.| ] ] | ] ] 5.UXPXPXPXPXPXPXPXPXPXLXPXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"CXhXhXSXhXSXhXkXhXSXCXSXSXhXSXhXSXhXSXSXkXSXSXhXCXSXCXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXCXSXSXSXSXSXSXGXv.' ] ] ] ] ] ] ] ] ] X.| X. .X. .X.| | .X.X.X.X. . .| | | ] ] ] ] ] ] ] ,.;XDXDXDXDXDXDXDXDXDXDXDXGXGXDXDXDXDXKXKXDXKXDXDXLXDXDXKXDXDXDXKXGXLXDXKXKXKXKXKXKXDXLXKXGXLXDXKXGXLXLXKXLXLXKXLXLXLXLXKXLXKXLXLXLXLXLXLXLXLXLXvX' ] ' ] ] ] ] ] ] | .| . .| .| | .X.| . . .| X.| X.| ] ] ] ] | ' ] ] !.IXLXPXLXPXPXLXPXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"kXCXkXkXCXkXCXCXhXSXSXCXhXSXhXSXSXhXSXhXCXSXSXSXSXCXSXkXCXSXSXSXCXSXCXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXDX;X$.' ] ] ] ] ] ] ] | ] | | .| | .| | | | .| .| | ] ] ] ] ] ] ] ] ] ( v.CXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXKXDXLXGXDXLXDXDXLXDXLXKXKXKXGXLXDXLXKXKXLXKXKXDXLXLXKXKXLXLXKXLXKXLXLXLXKXLXLXLXLXPXLXLXLXPXLXHXa.' ] ] ] ] ] | ] ] ] | .| . .| . .| .| | | X.| | ] ] ] | ] ] ] ] ' [ uXPXPXPXPXPXLXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXCXhXCXkXhXSXhXCXCXhXhXCXSXkXCXCXCXCXSXkXSXhXCXCXSXSXSXSXSXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXGXA.] ' ] ] ] ] ] ] ] ] ] ] ] | [ ] ] ] | ] ] ] ] ] ] | ] ] ] ] ] ] ' ( 4.7XDXGXAXDXDXDXDXDXDXDXDXDXDXKXDXDXDXLXKXDXKXDXLXKXDXKXDXDXLXDXLXKXKXLXDXGXKXKXKXKXLXDXLXLXKXDXLXLXKXKXLXLXKXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXmXw.' ' ] ' ] ] ] | ] ] ] ] ] ] ] ] ] ] | ] ] ] ] [ ] ] ] | ' ] ] ' ' ' /.IXPXLXPXPXLXPXPXPXPXPXLXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXhXCXCXhXSXCXhXSXhXhXSXkXSXSXCXkXSXSXSXSXSXSXCXCXSXhXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXDXSXQ.w.' ' ' ] ' ] ' ] ] | ] ] | | ] | ] ] | | ] ] [ ] ' ' ] ] ' ' ' 5.5XGXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXLXDXDXDXKXGXDXDXDXKXDXKXKXKXKXDXKXKXDXLXDXLXKXKXKXLXLXDXDXLXLXLXKXLXKXLXKXLXKXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXIXLXLXLXuX,.] ' ' ] ' ] ] ' ] ] ] ] ] ] ] ] ] ] ] | ] ] ] | ] ' ' ] ' ' ' [ /.PXPXPXPXLXPXPXPXPXPXLXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"CXSXkXCXSXhXSXCXkXSXkXSXCXhXSXCXSXCXCXhXSXkXkXSXSXSXSXSXSXSXSXCXSXSXSXSXSXSXSXSXSXSXSXDXSXSXSXDXSXSXSXSXSXSXtXk.[ [ [ [ [ .[ ] ] ] ' ] ] ] ] ] ] ] ] ' ] ' ] ..[ [ [ [ ,._.BXDXSXDXDXDXDXDXDXDXDXDXKXDXKXDXDXDXDXGXKXDXDXDXKXKXGXDXLXDXLXDXDXLXKXDXLXDXLXDXLXKXLXDXKXLXLXKXLXKXKXLXLXDXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXAX~.4.[ [ [ [ [ w.] ] ] ] ] ] | ] ] ] ] ] ] ] ] ] [ ..[ [ [ [ v.mXPXPXLXPXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"CXhXSXkXhXSXhXSXSXhXSXSXCXSXZXkXSXSXhXSXkXSXSXSXkXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXDXSXDXSXSXSXSXDXSXrX2X7X7XtX:X;.b b ! ! f ! ! f ! ! ! ! ! f i.2X5X5X2XvXSXDXKXSXDXKXDXDXDXDXDXDXGXDXDXDXDXDXDXKXDXDXDXLXKXDXGXKXKXDXKXLXDXDXLXDXGXKXKXKXKXKXLXKXKXLXLXDXKXKXKXGXKXLXKXLXLXLXKXIXLXLXGXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXIXLXnX6X0X0X9X0X$.b b b / ! ! / ! ! / ! ! ! ! ] 3X9X0X0XxXIXIXPXLXPXPXPXPXLXPXPXPXIXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXhXhXSXCXSXhXhXSXSXhXSXhXSXhXSXkXSXSXCXSXCXSXSXCXSXSXSXCXSXSXSXSXSXSXDXSXSXDXSXSXSXDXSXSXSXSXSXSXSXDXDXDXSXSXSXSXDXSXSXDXhXB y y y p p p p p p p r r p t u.ZXSXDXDXDXDXDXDXDXDXDXDXDXDXAXDXKXDXDXDXKXDXKXKXDXLXDXDXDXKXDXKXDXDXLXDXKXKXKXDXLXKXKXKXKXDXLXKXKXLXDXLXLXGXLXLXIXLXLXLXKXGXKXLXLXLXLXLXLXLXIXLXLXLXIXLXLXLXLXPXLXLXLXLXPXLXLXLXPXLXLXPXLX#.y y y r p t y r r y p t p y B HXLXPXPXPXPXLXPXPXPXLXLXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXCXkXSXhXSXkXCXSXhXCXkXSXSXhXSXhXSXSXhXSXCXCXSXSXSXhXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXDXDXSXDXSXSXSXSXDXSXDXSXDXDXDXjXO.r y p y p y r y p y y y p r 7.bXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXDXDXDXDXDXDXDXKXGXKXKXKXKXDXKXKXDXKXLXDXLXDXKXKXLXDXLXGXKXLXKXKXDXLXKXLXLXKXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXIXLXLXLXLXLXLXIXLXPXLXPXPXLXLXHXO.p p y y p p y r y y p p y y _ UXPXPXLXPXLXPXLXPXPXPXPXPXLXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXhXCXCXSXCXhXSXCXkXSXSXhXSXSXSXSXSXCXSXSXCXSXSXSXSXSXSXSXCXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXSXSXSXSXSXSXSXDXDXSXDXDXSXDXAXSXDXLX&.y p y p p y p p y p p p p t =.BXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXLXDXKXDXDXLXGXKXKXDXKXDXDXKXDXKXGXKXLXDXDXKXKXLXGXLXDXLXLXKXKXKXKXGXLXLXLXLXLXKXLXLXKXLXLXKXLXLXLXLXLXIXLXLXKXLXLXLXLXLXLXLXPXLXLXPXLXLXLXLXPXLXLXPXPXKX+.y p p p y p y p p p y y p y _ AXPXPXIXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXhXSXCXkXhXSXCXCXSXkXCXSXCXSXSXSXSXSXkXSXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXSXDXSXSXSXDXSXSXSXSXDXSXSXSXDXSXDXSXDXDXSXSXDXGXu.r p y p p p p p p p p p p r c.GXDXDXKXDXDXDXKXDXDXGXDXKXDXGXDXDXGXDXKXDXDXDXDXKXDXKXKXDXKXLXGXKXGXLXDXLXLXKXLXDXKXKXLXKXKXKXKXLXLXKXKXLXLXLXLXLXKXKXLXLXLXLXLXKXPXLXLXLXLXLXLXLXPXLXIXLXLXLXIXLXPXLXLXLXLXPXLXLXPXLXLXIXb.d p p p p y p p p p p p p p j.IXPXPXPXPXPXPXLXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"kXSXhXSXCXSXkXSXCXSXCXSXCXkXSXhXhXSXSXSXSXCXSXSXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXSXSXSXCXSXSXSXSXSXCXBXCXSXSXSXCXSXSXSXDXK.f y p y y p p r p p y y p y K.GXCXAXSXSXSXAXSXSXSXAXSXSXAXDXDXDXAXDXDXLXKXDXLXDXDXKXDXKXDXDXKXDXKXKXKXDXGXKXKXKXLXKXDXLXLXGXLXLXLXLXLXKXLXDXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXKXKXKXLXIXLXLXHXLXLXIXHXLXJXLXLXIXLXLX).a y p p p p y p p r p y p p ^.PXIXPXLXIXLXLXIXJXPXIXIXIXIXLXIXIXPXIXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"CXCXSXhXhXkXCXSXSXkXSXSXSXCXSXSXSXSXkXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXSXSXSXSXSXSXkX=Xb.c.b.b.b.b.b.b.b.b.b.b.b.N.b.b.b.b.b.m.&.f y r r y r p r y y y y y h *.N.b.b.b.N.b.b.b.N.n.b.N.b.b.b.c.b.b.b.K.iXAXLXGXDXKXKXKXGXLXKXKXLXKXKXDXLXKXLXLXLXKXKXLXLXKXKXLXDXKXKXLXLXLXKXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXAX&Xb.n.n.b.m.m.m.m.m.m.m.m.m.m.m.n.n.n.n.n.p y y y y y y y y y p y y p j.M.n.n.m.M.m.M.n.m.n.n.M.M.M.M.n.n.n.n.j.).HXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXSXhXSXSXSXCXCXSXhXSXhXSXSXCXSXZXSXSXSXhXSXSXSXCXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSX.XC y a b b b b b b b b b ! ! ! b b b b b ! ! ! ! ! ! ! / ! ! / b ! ! b b ! ~ ! ! ! ! b ! ! ! b ! ! b b ! b b ! ! m y c b.BXLXDXKXDXDXKXGXKXDXKXGXKXLXKXKXDXLXDXGXLXDXKXKXLXLXKXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLX).f p a ! ! b b ! b b b b b b b b ! b b ! b ! b ! ! b ! ! b ! ! b / ! ! ! ! b ! b ! ! b ! ! ! b ! b ! b ! b ! ! ~ f d h G.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXhXSXCXCXSXSXSXSXCXSXSXSXCXCXCXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXDXSXSXSX=Xv p ..Y.l.8.2.<.2.<.2.2.2.2.2.2.2.2.2.2.2.2.2.2.3.2.2.2.2.2.2.2.2.2.2.2.3.8.2.3.8.3.2.2.2.2.2.2.2.2.2.2.2.2.2.2.q.z.q.! r &.DXDXKXKXKXKXDXKXKXKXKXKXKXKXGXKXKXKXLXLXLXLXGXKXKXLXKXLXLXKXLXLXLXLXKXLXLXLXLXLXLXLXLXLXPXLXLXJ.y a 3.U.0.<.2.2.2.2.2.3.2.2.8.3.2.3.5.2.2.2.2.2.2.2.2.2.2.2.2.2.3.2.2.2.2.3.2.2.2.2.2.2.2.2.2.<.2.2.3.2.2.2.2.2.0.T.<.f r B.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"kXCXhXSXSXhXSXhXhXSXhXSXkXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXSXSXSXSXZXV p 9.:.s p p p p p p p p p p p p y p p y y p p y p p p p y p p p p p p p p p p p p p p p p p p p p p p p p y y p p p ( 0.{ r M.PXGXDXKXDXKXKXGXKXKXKXDXLXKXLXLXKXDXLXLXDXLXLXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXxXp s Y. .a p p p p y p p p p p p p p y p p p y p p p p y p p p p p p p p p p p p p p p y p p p p p p p p p p p p p p p | 0.m y >XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"CXSXSXCXSXSXCXSXSXCXSXSXCXSXSXCXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXN.y 1.^ p y y y y p y p y p p y y y y y y y p y y y p y p y p y y y p p y y y p y y y p p r r p y y y y y y y y y y y p r ! 3.! #.SXKXDXLXGXKXLXKXGXKXLXLXDXLXDXDXKXLXLXKXLXDXLXLXKXLXLXKXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXAXb.p 8.~ y p y p y p y y p p r y p y y p y y y y y y y p r p p y p r p r p y p y y y y y y y y y p y y p r p y y y p r y y ! 2.f c.HXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"CXCXkXSXCXkXSXSXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXDXSXSXSXSXDX%.b ( a y y y p y y p y y y y p y y p p y p r p p p y y y p r p p p y y y p y y p y p y y y p y p y y p p y p y p p p y y r ` [ v =XLXKXDXLXKXDXKXKXKXDXLXLXLXKXLXLXDXKXKXLXLXLXLXKXKXKXLXLXLXLXLXLXLXLXLXLXPXLXLXLXPXLXLXAXO.b ' y y p p p y p p p y p p p p p p p p p p p p y p p p y p p p p p p p p y p p p p p p p p p p p y p p p p p p y p p p r ' ! +.cXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXkXSXCXSXCXSXCXCXSXSXSXSXCXSXSXSXCXSXSXSXSXSXSXCXDXSXSXSXSXSXSXSXSXSXSXSXSXM ^ s r p r y y y y y y y y y y y y r y y y y y p r y y y y y y y y y y y y r y y y r y r p y y y y y y r y y y y r y y y r d b B &XLXLXDXLXKXKXKXKXLXDXKXLXKXLXLXKXLXLXLXKXLXKXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXnX` ) y y y p y y y y p y y p y y p p y p y p y y p p p y y p y p y p p p y y y p y p y y p y y p r p p y p y y p y y p y y y p / ` 9XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"CXSXCXSXSXSXSXhXkXSXhXSXSXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXDXSXDXSXSXDXM ! d r y y y y y y y r y y y r y y y y y y y y r y y y y r y y y y y r y y y y y y r y y r y y y r y y y y y y y y y y y y r p _ =XLXGXLXDXKXKXLXKXKXLXLXKXGXKXLXDXLXLXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXnXB ! r y y y y y y y y y y y y y r y r y y y y y r r y r p r r y r y r r y y y y y y y y r p r y r y y r y y y y y y y y y y r b N 9XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXCXhXkXSXSXSXCXSXSXSXSXSXSXSXSXSXSXCXSXSXSXSXSXSXDXSXSXDXSXSXSXSXDXSXGXV r y y y y y y y y y y y y y y y y y y y y y p r y y y y p y p r y y y y y y y y y y y y y y y y y y y y y y y y y y y y y r p V =XLXDXLXDXKXGXDXLXKXLXGXLXKXKXLXLXKXLXLXDXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXPXLXLXnXB y y y y y y y y y y y y y y y y y y y y y y y y y y y r y r p y y y y y y y y y y y y r y p r p r y y y y y y y y y y y y y y C 9XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXSXhXSXSXSXSXSXSXSXSXSXSXSXSXSXAXSXSXSXDXSXSXSXCXDXSXSXSXDXSXSXDXSXSXSXSXDXV e y y y y y y y u y y y y y r y r y y r r r r y y y y r r r r y r y r y y y r y y y r y y r y y y y r y y y y y r u y y y r r M =XLXLXKXKXLXDXLXKXLXKXKXKXLXLXLXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXKXPXLXLXLXLXnXB y y r p y y y y p y y y y y r y r y r y y y y y y y r p r y r y y y y r y r y y y y y y y r y r y y y y y y y y y y y y y y y C 9XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXSXCXSXSXSXSXSXCXSXSXSXSXSXSXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXDXDXSXDXV u y y y y y y y y u y y y u y y y y y y y y u y y y y y y y y y y y y y u y y y y y y y y y y y u y y y y y y u y y y r y y e C =XFXLXGXKXLXLXDXKXLXKXKXLXKXLXKXLXLXKXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXLXLXPXPXnXV y y y y y y y y y y y y y y y y p y y y y d y p y y d y y y y y y y y y y d y y y y y p y y y y p y y y y y y y y y y y y y y C 9XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXCXCXhXSXCXSXSXSXSXSXSXCXSXSXSXSXSXSXDXSXSXDXSXSXDXSXDXSXSXSXDXSXSXSXDXDXM e u y y e r r e y y y y u v f.b.j.b.h.c.c.b.c.b.c.h.c.h.c.h.b.h.c.b.c.b.c.h.b.b.b.b.c.b.b.b.g.b.b.#.y u y y y y r u r y r y e C =XLXGXKXLXDXLXLXLXKXKXLXKXKXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXnXV y y y u y y y y y y y r p v b.n.b.b.m.b.b.N.b.n.m.b.b.N.m.N.b.N.m.n.N.N.b.n.n.N.N.N.b.n.n.n.n.n.j.C y y y u y y y y y y y y r n 9XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXSXSXSXSXSXSXSXSXSXSXSXDXDXSXSXSXSXDXV e y r e y r y r y y r e b.jXZXDXCXSXAXDXCXSXSXAXSXSXDXSXAXDXDXDXAXSXSXDXDXDXDXAXSXDXAXSXDXDXDXDXDXGX<XV e y y r r e y u r r e C =XLXDXKXLXKXKXKXKXKXLXKXLXLXLXLXLXLXKXKXLXLXLXLXLXLXLXLXLXLXLXPXIXLXLXLXLXLXPXLXPXPXPXLXnXV r u y e y r y e y r u a F.IXLXLXJXLXPXIXLXIXIXJXIXIXIXIXLXIXIXLXIXPXJXIXIXJXJXIXIXPXJXIXIXIXIXIXIXJX^.y u y r y r e y u y e y n 9XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXkXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXDXSXDXSXDXSXSXSXDXDXSXDXM r y y u y u y y y r e Z.SXDXDXDXDXGXSXDXDXDXDXSXDXGXAXDXDXDXDXDXKXAXGXDXGXAXGXDXKXDXDXDXDXGXAXDXLXGXGX5XB e u y y y y y y y r M =XLXLXLXDXLXLXLXKXKXLXLXKXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXLXLXLXPXbXV y y u y r y u y e e y :XIXPXPXPXPXLXPXPXPXLXLXLXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX&Xh e y e r y u r r y e C 9XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXSXSXCXSXSXCXSXSXSXSXSXDXSXSXSXSXSXSXSXDXSXSXDXSXSXDXSXSXSXSXDXDXSXDXDXDXSXV e e y y y r r y u e #.eXDXDXDXDXSXSXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXGXDXDXDXDXKXDXDXDXDXDXLXDXDXDXKXDXGXLXL.y y y r y r r y u e C =XLXLXGXLXKXLXKXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXLXLXLXLXLXPXLXLXnXV y r y y y e y y y y u.LXPXPXLXIXLXPXPXPXPXLXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXb.y e y u y y y u y y C 9XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXSXSXSXSXSXCXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXSXSXDXSXSXSXSXSXSXSXDXM e e e u e r r e y t P.GXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXKXDXLXDXDXDXLXKXKXKXGXLXrX#.t r r u r r r y e C =XLXLXLXLXKXLXLXKXKXLXKXLXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXPXPXLXPXPXLXLXPXnXV r u r y y y e r u a uXPXLXPXPXLXPXPXLXLXPXPXPXLXPXPXPXPXLXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX9Xv e y r r y r r y y n 9XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"hXSXSXSXSXSXCXSXSXSXSXSXSXSXSXDXSXSXSXSXDXSXSXDXSXSXSXDXSXDXDXSXSXSXSXSXSXGXM w e e e e e e e e y <XDXSXSXDXDXDXDXDXDXSXSXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXDXGXDXDXDXLXDXLXKXDXDXDXDXKXDXAXu.t e e e e e e e t C =XLXLXLXLXKXKXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXPXLXLXLXPXLXLXLXLXLXPXLXAXV r y e u r r e e e h LXPXLXPXPXPXLXPXLXLXPXLXPXPXPXPXLXPXLXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXC e y e e r e y y u n 9XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXSXSXSXSXSXSXSXDXSXSXSXSXSXDXSXDXSXSXDXSXSXDXSXDXSXSXSXbXXX/./.XX`.-X:.( ' ' ) ( ) ' ( ^ [ !.XX).`._.3XSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXDXDXDXLXLXDXKXGXKXDXKXDXGXnXXX`.`.'.XX`.7.^ ( ' ( } ( ' ' ( w.E.-X'.`.`.3XKXKXLXLXKXLXKXLXLXLXLXLXLXLXLXKXPXLXLXLXLXLXIXPXLXLXLXPXLXLXLXLXIXqX'.'.'.,X`.:.} ' ' } ' ' ' ' ' ] ,XXX'.'.'.>XIXPXPXPXPXPXPXLXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXIX0X'.'.,X,X,Xw.( ' ' ' ' } ' ' ' w.[.,X'.'.'.qXIXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXSXSXSXSXSXSXSXSXDXSXSXSXSXDXDXSXDXSXDXSXSXSXDXSXSXSX!.2.8.0.0.0.0.0.x.x.0.Y.0.Y.l.l.x.0.a.x.0.9.0.8.3.l.tXKXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXKXDXGXKXDXKXDXDXGXDX`.5.<.0.x.0.0.x.0.0.0.Y.Y.l.l.l.0.0.0.0.0.0.q.8.<.x.9XPXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXKXLXLXLXPXLXPXLXPXLXPXLXLXqX0.5.q.x.0.0.x.x.x.0.0.Y.l.l.Y.l.0.l.l.0.0.0.9.2.0.>XPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX0Xl.<.q.0.0.0.0.0.0.0.Y.l.l.l.Y.l.0.0.x.0.0.0.9.2.8.,XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXSXSXSXCXSXSXSXSXSXSXSXDXSXSXSXSXSXSXSXDXSXDXSXSXAXW.<.q.T.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.Q.E.E.E.R.x.>.2.9XDXDXDXDXDXDXDXDXDXKXDXDXKXGXDXDXDXKXDXDXKXDXLXLXAX!.>.0.R.E.E.E.E.E.E.Q.E.E.E.E.E.E.E.E.E.E.E.E.E.R.l.>.q.>XLXLXKXLXLXLXLXLXLXLXLXLXLXPXPXLXLXLXLXLXLXIXLXLXLXLXLXqX<.<.z.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.T.8.2.qXPXPXPXPXLXPXPXLXPXPXPXPXPXPXPXLXPXPXPXPXPXPXPXPXPX0X8.>.U.R.E.R.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.E.T.8...,XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXIXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXSXSXSXSXSXSXSXSXAXSXSXSXSXSXDXSXSXSXSXSXDXSXSXDXXX<.Y.E.z.q.8.q.q.q.q.0.x.0.l.x.0.0.0.9.q.q.q.8.q.l.R.l.:.R.BXDXDXDXDXDXDXDXKXDXKXDXDXDXDXLXDXKXKXKXAXKXDXLX,X2.x.E.z.q.8.8.q.q.9.q.0.0.l.x.x.0.l.0.9.q.9.8.q.x.R.T.>.z.UXLXLXLXLXKXLXLXLXLXLXPXLXLXLXIXLXLXLXLXLXLXPXLXLXPXmX8.<.R.T.x.8.8.q.q.q.0.9.x.0.0.0.0.0.0.9.9.q.8.8.9.z.E.8.2.MXPXPXLXPXPXLXPXPXPXLXPXPXPXPXPXPXPXIXPXPXPXPXPXJXq.>.T.T.l.8.8.q.q.q.q.0.0.l.l.l.0.x.x.0.q.q.8.8.9.U.R.9.<.9XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXCXSXSXSXSXSXSXSXSXAXFXSXSXSXSXDXSXSXSXDXDXSXSXDXDXSXx.q.T.q.<.2.<.8.5.8.8.9.9.0.9.9.0.0.9.q.q.8.8.2.2.2.8.R.9.2.5XDXDXDXDXDXDXGXDXDXAXDXDXKXDXDXLXDXKXDXGXKXGXGX!.q.U.q.<.3.<.8.8.8.8.9.9.0.0.q.0.0.9.q.8.8.2.2.2.<.8.U.z.2.;XPXLXLXLXLXLXLXLXLXIXLXLXLXLXLXPXLXLXPXPXLXLXLXLXPX,X3.z.Y.<.8.2.<.8.8.8.q.9.0.x.9.x.9.9.8.8.8.8.2.<.2.3.8.R.2.XXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX,X<.U.l.<.2.2.2.8.8.8.q.0.9.0.9.9.9.9.q.q.8.8.2.<.2.<.9.R.3.].IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXSXSXSXSXSXSXDXSXDXSXSXDXSXAXSXSXSXSXDXDXSXDXSXSX9.v.8.>.>.2.2.2.8.8.8.q.9.9.0.9.9.0.9.q.q.8.2.2.2.<.<.q.l.<.:XDXDXDXDXDXDXDXDXDXDXDXDXKXDXKXDXKXDXKXDXLXLXVXW.x.x.>.1.2.2.2.8.8.q.q.9.q.q.0.0.q.q.q.q.8.8.2.2.<.1.8.x.q.`.LXLXLXLXLXLXLXLXPXLXLXLXPXLXLXLXLXLXLXPXLXLXPXPXHXE.<.T.>.>.<.2.2.q.8.8.q.q.0.0.9.0.9.9.9.8.8.8.2.<.8.>.1.0.x.T.PXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT.2.U.2.>.<.8.2.8.8.8.q.9.0.9.0.9.9.0.q.8.8.8.2.2.2.<.>.0.q.E.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXSXSXSXSXSXSXSXSXSXSXSXSXDXSXSXSXDXSXSXSXDXSXDXDXq.a.3.1.<.2.2.2.q.8.8.q.q.9.0.9.0.q.q.8.8.q.2.2.2.3.<.:.l.3.;XKXLXDXDXDXDXDXKXDXGXKXDXDXKXDXKXDXKXKXGXDXDXVXE.8.<.>.<.2.2.2.8.8.8.q.q.q.0.9.0.9.q.q.8.8.8.2.2.2.<.3.q.0.[.PXLXLXLXLXLXLXLXLXLXLXLXLXLXPXPXLXLXPXLXLXLXLXLXHXE.8.9.>.<.<.2.2.2.8.8.8.q.q.9.0.9.9.q.8.q.8.8.2.8.<.,.3.>.z.z.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT.8.8.3.>.<.2.2.2.8.8.q.q.q.9.9.x.9.8.8.8.8.8.2.2.2.<.>.>.9.R.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXSXDXSXSXSXSXDXSXSXSXDXSXDXSXDXSXSXDXDXSXSXDXSXDXq.8.<.>.<.<.2.2.2.8.q.8.q.q.q.q.q.q.q.8.8.2.2.8.2.1.>.>.q.:.;XDXDXDXDXKXGXDXLXDXDXDXKXKXDXKXDXLXDXLXLXDXLXVXQ.3.>.>.3.<.2.2.2.2.q.8.q.q.q.q.q.q.8.8.q.2.2.2.2.<.<.>.<.q.[.LXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXIXLXLXPXPXLXIXLXHX!.q.2.>.<.<.2.2.8.q.8.8.8.q.q.q.q.q.8.8.q.8.2.2.2.<.<.>.3.9.z.IXPXPXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT.q.3.>.<.<.2.8.2.8.8.8.8.q.q.q.q.q.8.8.8.q.2.2.2.<.3.>.>.8.R.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXSXSXSXDXDXSXSXSXSXDXSXSXSXSXDXSXSXDXSXDXSXSXSXDX5.1.3.>.,.3.2.2.2.2.8.8.8.8.8.8.8.8.8.8.q.2.2.2.<.<.>.>.3. .;XGXDXDXDXDXDXKXDXDXKXKXGXDXGXDXKXDXKXDXKXDXGXVXW.>.>.3.1.3.2.2.2.8.8.8.8.8.8.8.8.8.q.8.8.2.2.2.2.>.,.>.3.<.`.LXLXLXLXLXLXPXLXLXLXLXLXLXLXPXLXPXLXLXLXLXLXPXLXHXE.>.>.>.>.<.<.2.2.2.q.8.8.8.8.8.8.8.8.8.8.2.2.2.<.3.<.>.>.<.z.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT.<.>.>.>.>.<.2.2.2.q.8.8.8.8.8.8.8.8.8.8.8.2.2.2.<.<.>.>.3.T.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXDXSXCXSXSXSXDXSXSXDXCXDXCXDXSXDXDXSXDXSXSXDXSXSXSXDXq...>.1.>.<.2.2.2.2.2.8.8.8.8.q.8.q.8.8.2.2.2.2.<.>.>.>.<. .;XKXKXDXDXKXKXDXDXLXDXDXKXKXDXKXKXDXKXDXKXKXLXVXT...1.>.>.3.<.2.2.2.2.8.q.8.8.8.8.8.q.8.2.2.2.<.>.<.>.>.>.>.`.LXLXLXLXLXPXLXLXLXPXLXLXLXPXLXLXLXLXLXLXLXLXIXLXHXE.:.1.>.>.<.3.2.2.2.2.8.8.8.8.8.8.8.8.q.2.2.2.2.<.<.>.>.>.:.z.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXIXPXPXPXPXPXIXT.:.>.>.>.<.<.,.2.2.2.8.q.8.8.q.8.8.8.8.2.2.2.<.<.<.>.>.3...U.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXDXSXDXSXSXSXDXSXDXSXDXSXSXDXDXSXSXDXDXSXDXDXSXDX5...>.>.1.3.1.<.2.2.2.2.2.8.8.8.q.2.2.2.2.2.2.<.<.>.>.>.:. .;XDXDXKXKXDXDXKXKXDXDXKXDXKXKXGXDXKXGXLXKXKXGXVXV. .>.>.3.1.>.<.2.2.2.2.2.2.q.8.8.8.2.2.2.2.2.<.<.<.>.>.>.>.[.PXLXLXPXLXLXLXLXLXLXLXLXPXLXLXPXLXPXPXPXPXLXPXPXHXE...:.>.>.<.<.<.<.2.2.2.2.2.q.q.8.2.2.2.2.2.2.<.<.>.>.>.>...z.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT.:.:.>.3.>.<.>.2.8.2.2.2.2.8.8.q.2.2.8.2.2.8.<.<.>.>.>.>...U.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXSXSXSXSXSXSXSXSXDXSXCXDXSXSXSXSXSXDXSXDXSXSXDXDX5...:.>.3.1.<.<.<.2.2.2.2.2.2.2.2.2.2.2.2.2.<.>.<.>.<.....| ;XKXDXDXDXDXGXDXLXDXKXDXLXDXGXDXKXLXKXDXKXKXKXVXT. ...>.1.3.<.<.<.2.2.2.2.2.2.8.2.2.2.2.2.2.<.>.<.>.>.>...>./.LXLXLXLXLXPXLXLXLXPXLXLXLXLXLXLXLXLXLXLXLXPXLXLXHXE...:.3.1.>.>.<.<.<.2.2.2.2.2.2.2.2.2.2.2.<.>.<.<.>.>.>.:...z.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT.....>.>.<.>.<.<.<.2.2.2.2.2.8.5.2.2.2.2.<.<.<.>.>.>.<.>.X.U.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXDXSXSXDXSXDXSXDXSXSXSXDXSXDXSXDXDXDXSXDXSXDXDXSXDXq. ...>.1.3.>.<.1.3.2.2.2.2.2.2.2.2.8.<.<.<.<.>.>.>.>.:...| ;XKXDXKXDXKXKXDXDXKXDXKXDXKXKXLXDXDXDXLXKXKXLXVXT. ...:.<.1.>.>.<.>.<.<.8.2.2.2.2.2.2.2.<.<.>.<.>.>.>.....>.[.PXLXLXLXLXLXLXLXPXLXLXLXPXLXPXLXPXPXLXLXPXLXLXLXHXE.....:.3.>.>.>.<.,.3.2.8.2.2.2.2.8.2.2.<.<.<.>.>.>.>.>.....z.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT...:...>.>.>.>.>.<.<.<.2.2.2.2.2.2.2.<.2.<.>.>.>.>.<.......U.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXSXSXSXDXSXSXDXDXSXSXSXDXDXCXDXAXDXSXSXSXDXSXDXDXSXSXDXq. .....>.>.>.>.3.,.<.<.<.<.<.<.<.<.<.<.>.>.>.>.>.<.:... .X.-XLXKXKXDXDXKXDXDXDXDXDXLXDXKXDXKXKXLXDXLXDXKXVXT. .....>.>.>.>.>.<.<.<.<.<.<.<.2.<.<.<.<.>.>.>.>.>.>.....>.[.LXLXLXLXLXLXLXLXPXLXLXLXPXPXLXLXPXLXLXLXPXLXPXPXHXE.....:.:.>.>.>.>.,.,.<.<.<.<.<.2.<.<.<.<.1.>.>.>.>.:.:.....z.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT.........>.>.>.>.<.>.<.3.<.<.<.<.2.<.<.<.<.<.>.>.<...:... .U.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXDXSXSXSXDXSXDXSXDXSXSXDXSXSXDXSXDXDXSXDXSXSXDXSXDX2. .....:.>.<.>.1.3.>.3.<.<.<.<.<.<.>.<.>.>.>.<.>.:....... .;XDXKXDXDXKXKXDXKXKXLXDXLXKXKXKXDXLXDXLXDXLXLXVXT. .......>.>.>.<.>.>.>.<.<.<.<.<.<.<.>.<.>.>.>.>.:.:... .>.`.LXLXPXLXLXPXLXLXLXPXLXLXIXLXLXPXLXLXPXIXLXPXLXLXHXR.........:.<.>.>.3.3.,.<.>.<.3.<.,.<.<.>.3.>.>.>.:.........l.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT.........:.>.>.>.>.>.<.<.<.<.<.<.<.>.<.>.>.>.>.<...:..... .U.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXDXSXDXSXSXDXSXSXCXDXSXDXDXSXDXSXSXDXDXDXDXSXDXDX<.X...........>.3.>.>.>.>.>.>.>.>.>.>.>.<.>.<.............| -XKXDXLXDXLXDXKXDXLXDXLXDXKXDXGXKXKXLXDXLXKXLXVXv.X...........>.>.>.>.>.>.>.>.>.>.>.>.>.>.>.<.>...w.w.....>.~.PXLXLXPXLXLXPXLXLXPXPXLXLXPXPXLXPXPXLXLXPXLXPXPXKXR. .:.......:.:.>.>.>.>.<.>.>.>.3.>.>.1.>.>.3.>.:.:....... .l.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXIXPXPXPXPXPXU. . .......:.1.<.>.>.>.>.>.>.>.>.>.<.>.>.>.>.>...:.......| U.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXIXPXPXPXPXPXPXPXPXPXPX",
"SXDXDXSXSXSXSXSXSXSXAXSXDXSXDXSXSXDXSXDXSXDXSXDXDXDXSXDX5.X.........:.:.:.>.<.>.>.>.<.>.>.>.>.<.>.:.:.....:..... .] -XLXDXDXDXDXKXGXDXDXKXDXKXKXLXKXKXDXDXLXLXDXLXVXv.] .........:.>.<.>.>.>.>.>.>.>.>.>.>.>.>.:........... ...[.PXLXPXLXLXLXPXPXLXLXLXLXPXLXLXLXLXLXPXPXLXPXLXLXIXR.| | ..........:.<.3.>.>.>.>.>.>.>.>.>.>.>.>.........:.X.X.x.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT.X.X...........:.>.<.>.>.>.>.>.>.>.>.>.>.>.:........... .| z.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXSXSXSXDXSXDXSXSXDXSXDXSXDXDXSXSXSXSXDXSXDXSXDXDXDX2.| X. ...........:.:.1.1.3.>.>.>.>.>...:............. .X.) ;XLXKXKXDXKXDXKXKXDXKXKXDXKXGXKXDXLXKXLXKXKXKXVXv.X.X.............:...:.>.>.>.>.>.>.1.................| ...[.LXLXPXLXLXLXLXLXLXLXPXLXLXLXIXPXPXLXPXLXPXLXPXLXHXE.| X...:.........:.:.:.>.>.>.>.>.>.>.>.:............. .X.| l.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT.| | | ............:.:.>.3.>.>.>.>.>...:.....w....... .X.| U.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXSXDXSXDXSXSXSXSXDXDXSXDXSXDXSXDXDXDXDXSXDXDXSXDXDXSXDX4.X.X.X.| ..............:.:.:.:...:.:..... .w..... . .X.X.| XXKXKXDXKXDXDXLXDXLXDXLXKXKXKXDXLXLXKXDXLXGXLXVXv.| | .| ..............:.:.:.:.:...:............... .| ] ..[.PXLXLXLXPXPXLXPXPXLXLXPXPXLXPXLXLXPXLXPXLXPXLXPXHXW.| | | | ...... .......:.:.:.w.:.:....... .....:...X.| | | l.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT. .| ..| ........ . ...:.:.:.:.:...:.....:......... .X.X.] U.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXSXDXSXDXSXDXSXDXSXDXDXSXDXCXSXDXDXSXDXDXSXDXSXDXDXDX2.| | X.| . .w................... ........... . .] | X.X.) ,XKXDXKXDXKXKXDXDXLXGXKXKXKXKXKXLXDXKXKXKXLXLXVXU.| .| X.| ...... ....... ...................w.| | | | ...[.LXLXPXLXLXLXLXLXLXLXPXLXLXPXLXPXPXLXPXPXLXLXPXPXHXW.| .| | | ......... .......................:.X. . .| . .l.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXz.| | | | | | ..:...............................X.X.X.X.X.| z.NXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXDXSXDXSXSXSXDXDXSXDXSXSXDXSXDXDXDXSXDXSXDXDXDXDXDXSXSX2.' X.X.| | | | | .......... ............. . .X.| . . .X.) XXLXKXKXDXKXGXLXDXDXKXKXKXGXDXLXKXLXDXLXLXDXLXVXz.] | .X.X.] | . ......................... .| | X.X. .] w.~.PXLXLXLXPXPXLXLXPXLXPXLXPXLXPXLXPXLXPXLXPXPXLXPXHXW.] | .X.X.| X. . .........................| | | | X.X.X.] x.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXz.] | | ..| | ..X........................... . .X.X.X.X.X.) z.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXDXSXSXSXDXSXSXGXSXSXDXDXSXDXSXDXSXDXSXDXDXSXDXDXDXCX1.] | X. .| | X.X.| | .X.X..... . . .X. .| | | X. .X.] ] ) XXGXGXKXKXKXDXDXLXLXDXLXKXDXLXLXLXDXLXKXDXLXLXVXz.] ] [ X.X. .X.X.X. . . . . .:... . .X.| | X.| | .| | ] w.~.PXLXLXLXPXPXLXPXPXLXLXPXLXPXLXLXPXLXPXPXPXLXPXPXHXW.] ] | X.X.| | X.| . . .| .....X. . .| .[ X.X.X. .X.] ] x.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXv.] ] | X.X.| | | .| .X. ....... . . .[ X.X.X.X. .X.| | ] z.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXSXDXSXDXSXSXDXDXSXDXSXDXSXSXDXDXSXDXSXDXDXDXDXSXDXDXAX,.' ] ] ] . .X.X.X.X. .X.X.X.X. .] | .] .| . .X.] ] ] ) XXLXKXDXLXDXLXDXKXDXKXDXLXLXLXDXLXKXKXLXLXLXLXVXz.' ] ] ] | .X.X.X.X.] | .| | | | .| | .| X. .| ] | ] [ !.PXLXPXLXLXLXLXLXLXPXPXLXLXLXPXPXLXPXLXLXPXPXLXLXHXE.] [ ] | | . .X.X.| | .| | . .| | X.| | | X. . .] ] ] ] z.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXT.] ] [ | | .X.X.| X.X.| X.| [ .| | | X. .X. .X.X.X.] ] } z.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXSXSXDXSXDXSXDXSXDXDXAXDXSXDXSXDXDXDXSXDXDXDXSXDXDXDXDX6.) ] ] ] ] ] | X.X.X.| .X.X.| X.| ] | | . .| ] ] ] ' ] :.3XKXDXLXDXLXKXLXKXKXLXKXKXKXLXLXKXLXLXKXKXGXLXLXV.) ] ] | ] ] X. . . . .| X. .| X. .X.X.X. . .| | ] ] ] ] :.'.PXPXLXLXPXLXPXPXLXIXLXPXPXLXPXLXPXLXPXPXLXLXPXPXPX'.] ] ] ] ] ] | X. .X. .| | | | .| | . .X. .| X.] ] ] ] [ ].PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX'.w.] ] ] ] ] | X. . .X. .| | X.| | | . .X. .X.X.] ] ] ] } [.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXDXSXSXDXSXDXSXDXSXSXDXDXSXDXDXDXSXDXDXDXSXDXDXDXSXDXDX/.[ ] ] ] ] ] | [ | X.| X. . . . .X. . .| ] | ] ] ] ] ] ' v.BXDXLXDXKXDXDXKXKXKXKXGXKXLXDXDXLXKXKXKXLXLXKXLX:X:.' ] ] ] ] ] ] ] ] X. .| | | .| .X.| ] ] ] ] ] ] | ' p.IXLXLXLXPXLXPXLXLXLXPXLXLXLXPXPXPXLXPXLXPXPXLXPXPXPXcX$.] ] ] ] ] ] ] ] | | | . .| .| .X. .] | ] ] ] ] ] ' w.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXIX:.' ' ] ] | ] | ] ] | | .| . .X. .| ] ] ] ] ] ] ] ] } ] 0XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXSXSXDXSXDXSXDXDXSXDXDXSXDXDXDXDXSXDXDXDXDXDXSXDXDXDXSXDXv.' ' ] ] ] ] ] | ] | | ] | | ] | ] | ] | | ] | ] ' ) $.2XLXGXKXKXDXLXKXKXKXDXKXLXDXLXKXLXDXLXKXKXLXLXDXLXKX!.' ' ] ] ] ] ] | ] | | | | ] ] ] | | | ] ] ] ] ] ] ' $.>XPXLXLXPXLXLXPXLXLXLXPXPXLXPXLXLXPXLXPXPXPXLXPXLXPXLXPXXX' ' ] ] ] ] ] ] | ] ] ] ] ] ] | ] | ] | ] ] ] ] ] ' ] qXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX0Xw.' ' ] ] ] ] | ] | ] | | | ] | ] ] ] ] X.] ] ] ' ' ( '.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXSXSXDXDXSXDXSXSXDXSXDXSXDXSXDXDXDXSXDXSXDXDXKXDXSXDXDXDXZXA.] ' ' ] ) ' ) ] ] ] ] ] ] ] ] ] ] ] ' ] ' ' ' ' a.3XDXDXKXLXDXGXKXKXGXKXLXKXKXLXLXLXKXKXLXKXLXKXLXLXLXLXAX_.[ ) ) ' ] ' ' ] } ] ] ] ] ] ] ] ) ] ] ] ) ' ' ( 7.0XPXLXPXLXPXLXPXLXPXPXLXPXLXPXLXPXPXLXPXPXLXPXLXPXPXPXPXPXPX>X4.) ' ' } ] ' ] .X.X. .X. .X.| ] | ' ' ] ' ' ' <.>XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXqX5.} ' ' ' ] ] } ] ] ] ] ] ] ] ] ] ] ] } ] } } } 1.XXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXDXDXDXSXDXDXSXSXDXDXSXDXDXDXDXDXDXDXDXDXDXSXKXDXDXDXDXDXGXBXrX/._._././././._././././././.`./././././._./.3XBXKXDXLXKXKXKXKXKXKXKXKXGXLXLXKXDXLXKXLXKXGXLXLXKXLXLXLXLXKXuX-X/.`.`.`.`.]./.`.).XX`.`.`.`./.`.`.`.`.`.`.>XnXLXLXPXPXLXLXPXLXLXPXLXPXPXPXLXLXPXLXLXPXPXLXPXPXPXPXPXPXLXPXPXNX3X`.].].XX[.C a d p p p p p y d h '.'.'.].`.qXNXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXMXqX].'.'.].].'.'.].].].].].].].].].].].].].].qXNXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXSXSXSXDXDXSXDXDXDXSXDXDXSXDXSXSXDXSXDXDXSXDXDXDXDXDXDXDXDXGXGXDXSXDXAXDXDXDXDXDXAXAXKXDXAXDXDXDXDXKXDXKXDXLXLXKXKXKXDXDXLXDXKXLXKXKXKXDXLXKXLXKXLXLXKXKXLXLXLXLXLXLXLXLXPXLXKXLXLXLXGXLXIXLXIXKXKXKXIXIXLXLXLXLXIXLXPXPXPXPXLXLXLXLXPXLXPXLXLXPXLXLXLXPXPXLXPXPXPXLXPXLXPXLXLXLXPXPXPXPXPXPXPXPXPXPXJXB > > > 0 > > > & & v PXPXPXPXPXPXPXPXIXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXSXDXSXSXDXSXDXDXSXDXDXSXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXGXDXDXDXKXDXDXDXDXLXGXDXDXKXDXLXDXGXKXKXKXKXKXDXLXKXDXDXLXLXDXLXKXKXDXDXLXKXLXLXKXKXKXKXLXKXLXLXLXLXLXKXLXLXLXLXLXLXPXLXLXLXLXLXPXLXLXLXPXLXLXLXPXLXLXLXLXLXLXPXLXLXPXPXLXLXPXPXLXPXLXLXPXLXLXPXPXLXPXPXLXPXLXPXPXPXPXPX(.;.0.Y.Y.Y.Y.Y.Y.Y.Y.>.{ { [ ] { { ] { ] :.z.Y.Y.Y.Y.Y.Y.Y.Y.l.6.f.HXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXDXSXDXDXSXDXDXDXSXDXSXDXDXSXSXSXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXLXDXDXDXDXDXKXDXDXKXDXKXKXDXDXKXDXKXKXDXKXKXLXDXKXLXLXGXKXLXLXKXLXKXLXLXKXLXLXLXLXKXLXKXKXLXLXLXKXLXLXLXLXLXLXIXLXLXLXLXLXLXLXLXLXPXLXLXPXLXPXLXPXLXLXPXLXLXLXPXLXLXPXLXPXPXPXLXPXPXLXLXPXLXPXPXPXLXPXLXPXPX*X{ 2.f s s s f s s f f f f f f f f f f f f f s s f f s f s f f f ^ x.#.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXSXSXDXSXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXLXDXDXDXDXKXDXKXDXGXDXKXKXKXKXKXKXKXDXDXLXDXKXLXKXKXLXKXKXLXDXKXKXLXKXGXLXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXIXLXLXLXLXLXLXLXLXLXLXLXPXLXPXLXLXPXLXPXPXLXLXPXLXLXPXPXPXPXPXLXPXPXLXPXPXPXPXPXPXnX&...p w 0 q q q q q q q q q q q q 0 q q q q q q q q q q 0 q q q q e m 1.).PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXSXDXDXDXSXDXSXDXAXDXSXDXDXDXDXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXLXDXLXDXKXDXKXDXKXDXDXKXDXLXGXKXLXDXLXDXKXKXLXDXGXLXKXLXLXLXKXLXKXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXPXLXPXPXLXLXLXIXPXIXPXLXLXPXLXLXIXPXLXLXPXLXLXPXPXLXLXIXLXPXPXLXPXPXLXLXPXPXLXPXNX$.d 0 0 q q 0 q 0 q 0 0 0 0 q q 0 q q 0 q q 0 0 q q q 0 0 0 0 0 0 0 q b M.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXDXDXSXSXDXDXDXDXDXDXDXSXDXDXSXAXDXSXDXDXDXDXDXDXDXDXDXDXDXDXKXDXKXKXDXKXDXDXKXDXKXDXDXGXKXDXLXLXDXDXKXKXGXKXKXDXLXLXLXDXDXLXLXLXKXKXKXLXKXKXLXLXKXKXLXLXLXLXLXLXGXLXLXLXPXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXPXPXLXLXPXLXLXPXLXPXLXPXLXPXLXPXLXPXPXLXPXPXLXPXPXPXPXPXPXPXLXPXPXMX_ 0 q 0 q q q q q q q q q q q q q q q q q q q q q q q q q q q q q 0 0 u A.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXSXSXDXDXDXDXSXDXSXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXKXDXKXLXDXKXGXKXKXDXKXLXDXDXKXLXKXKXDXLXDXKXKXDXLXLXLXLXDXKXLXLXKXKXLXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXPXLXLXLXPXPXLXLXLXLXPXPXLXLXPXPXLXPXLXPXLXPXLXPXLXLXPXPXLXPXPXLXPXLXLXPXPXPXPXPXcXv 0 q q q q q q 0 w q q q q q q q q q w q q q q q q q q q q q q q q q w n.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXSXDXDXDXSXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXLXDXGXDXDXKXDXGXDXDXLXDXKXLXDXDXLXDXLXDXKXKXDXLXGXLXKXDXKXLXLXLXKXKXKXLXKXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXIXLXLXLXPXLXPXLXLXIXLXPXLXLXIXPXLXPXIXLXPXLXPXLXLXPXLXPXLXPXPXLXPXPXLXPXPXLXPXPXPXPXPXLXPXPXPXxXv q q q q q q q w 0 0 > > > 5 > 5 0 > > 5 5 5 5 > > > q q q 0 q 0 q 0 q c.JXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXSXDXDXSXDXDXDXSXDXDXSXDXDXSXDXDXDXDXDXDXDXGXDXDXKXDXGXDXKXDXDXDXDXKXKXDXKXDXLXDXDXLXKXDXKXLXDXLXDXLXKXKXLXLXKXKXLXLXLXLXDXKXKXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXKXLXPXLXLXPXLXLXLXLXLXLXPXLXLXPXLXLXLXLXLXPXLXLXPXLXPXPXLXPXLXPXPXLXPXLXLXPXPXLXPXPXLXLXPXPXLXPXPXPXxXv 0 q q q q q q q w B M.N.N.N.N.N.n.N.N.N.M.m.m.N.j.v > q q q q q q q w c.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXDXDXDXSXDXDXSXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXKXDXDXKXDXKXDXKXDXGXDXKXDXKXDXDXKXKXDXKXGXKXLXDXKXKXLXDXDXLXDXLXGXLXKXLXKXLXKXLXKXLXLXKXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXLXLXPXLXLXPXPXLXPXLXPXLXPXLXLXPXPXLXPXLXLXPXPXLXPXLXPXPXPXPXPXLXPXPXPXPXPXcXv q q q q q q > u P.cXJXJXIXIXJXJXJXJXJXIXIXIXJXJXHX0X%.q q q q q q q w b.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXDXSXDXDXDXDXDXDXDXSXSXDXDXDXDXDXDXDXDXDXDXDXDXDXKXDXKXDXDXKXDXDXKXDXLXDXDXKXLXDXKXKXDXGXLXKXKXKXDXLXGXDXKXLXLXKXLXLXKXKXLXKXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXPXLXLXPXLXPXPXLXLXIXLXLXLXPXPXLXPXLXLXPXIXPXLXPXLXPXLXPXPXLXPXLXLXPXPXPXPXPXLXPXPXPXLXPXPXPXPXPXPXPXPXxXv q q q q q q w %.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXxXi q q q q q q w c.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXSXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXDXDXDXKXDXGXKXKXDXKXKXDXLXLXDXKXKXGXKXLXKXKXLXLXLXDXLXLXDXLXKXLXLXLXLXLXKXLXKXKXLXLXLXLXLXLXLXLXLXLXLXLXLXKXLXLXLXLXLXLXLXLXLXPXLXPXLXLXLXPXLXLXLXPXLXLXPXLXLXPXLXPXLXPXLXPXPXPXLXPXLXPXPXLXPXLXPXLXPXPXPXLXPXPXPXPXnXx & > & > > > i 3XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX@.> > > & > & > b.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXDXDXDXSXDXSXDXSXKXDXDXDXDXDXDXDXDXDXDXGXDXDXDXKXKXDXDXKXKXGXDXKXDXLXDXDXLXDXDXLXDXLXDXLXDXLXDXKXLXDXDXLXLXKXLXLXKXLXDXKXLXKXLXKXLXLXLXLXLXKXLXLXLXLXLXLXLXLXPXLXLXPXLXLXPXLXPXLXLXPXLXLXLXLXPXLXLXPXPXLXLXPXPXLXLXPXLXPXLXPXLXPXPXLXPXPXLXPXLXPXPXPXPXPXPXPXPXPXPX0X[.].].[.{ ~ ^ ^ ^ ~ ~ ` E.].qXPXPXPXPXPXPXPXPXPXPXPXPXPXPX'.].].p.~ ~ ^ ^ ^ ~ ~ x.].].[.0XPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXDXSXDXDXSXDXDXSXDXDXDXDXDXDXDXDXGXDXDXDXDXDXDXKXDXDXDXDXKXDXGXKXDXDXKXKXDXDXLXKXKXKXGXKXKXKXKXLXLXDXLXKXLXKXKXKXLXKXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXPXLXLXPXLXLXLXLXPXPXLXLXLXPXPXLXLXPXPXLXPXLXPXLXPXLXPXLXPXPXLXPXLXPXPXLXPXPXPXPXPXPXPXLXPXPXPXIX[.q.x.l.l.Y.l.0.Y.Y.Y.l.l.0.l.0.8.E.PXPXPXPXPXPXPXPXPXPXPXJXU.8.l.l.Y.0.0.Y.Y.l.l.0.Y.Y.l.q.9.[.JXJXIXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"KXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXKXDXDXKXKXDXLXKXKXDXLXKXDXKXDXLXDXDXLXLXKXDXLXLXKXLXKXLXGXLXLXKXKXLXKXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXLXPXLXPXLXLXPXLXLXPXLXPXLXPXLXPXLXPXLXLXPXLXPXPXPXPXLXLXLXLXPXPXPXPXPXPXPX0X2.z.z.z.z.U.U.T.T.T.T.U.U.U.Y.U.U.2.].PXPXPXPXPXPXPXPXPXPX[.<.T.z.z.U.U.T.U.T.T.T.U.U.U.z.T.l.<.NXJXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXSXDXSXDXDXDXSXDXDXDXDXDXDXDXDXDXDXDXLXKXDXDXKXKXGXGXDXKXDXDXDXKXDXKXDXKXDXKXKXKXKXKXKXLXKXKXKXKXGXDXLXLXKXLXKXKXKXLXGXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXPXLXLXLXLXLXLXLXLXLXPXLXLXLXLXIXLXLXLXLXPXLXLXPXPXLXPXLXPXLXLXPXPXPXLXPXPXLXPXLXLXPXPXPXPXPXPXLXPXPXPXPXHX[.q.z.8.q.9.0.x.0.l.l.0.9.9.9.8.0.Y.9.x.PXPXPXPXPXPXPXPXPXJXY.z.0.q.q.9.9.9.l.l.l.l.0.9.9.q.9.z.8.].MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXGXSXDXDXDXDXDXDXDXDXDXDXKXDXDXDXDXDXKXDXDXKXKXDXDXKXDXLXLXDXDXLXKXGXKXKXGXKXGXLXDXLXKXGXKXKXKXLXDXLXKXKXGXKXLXLXLXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXKXLXLXLXLXLXPXLXPXLXLXLXPXLXLXPXLXLXPXIXLXPXLXPXPXLXLXPXLXPXLXPXPXLXPXLXPXPXPXPXPXLXPXPXPXLXPXPXPXPXPXLXLXPXHXE.l.3.>.8.<.8.8.q.q.q.9.8.8.8.<.3.2.l.8.PXPXPXPXPXPXPXPXPXJXY.l.>.>.2.8.8.8.q.q.q.q.8.8.2.2.>.2.9.[.MXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXGXDXDXDXKXDXDXDXLXDXKXDXDXKXLXDXLXDXDXLXDXLXDXKXKXDXDXLXLXAXLXKXLXGXKXLXLXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXPXLXLXLXIXLXPXLXPXLXLXLXPXLXPXLXLXPXLXLXLXPXLXPXLXPXPXLXPXLXPXPXLXPXLXPXLXLXLXLXPXPXPXPXLXPXPXPXPXPXLXPXPXPXHXE.8.>.<.<.8.8.q.8.8.q.8.q.q.2.2.<.>.8.8.PXPXPXPXPXPXPXPXPXJXl.2.>.<.2.2.8.q.8.8.8.q.8.2.2.<.<.>.8.[.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXDXSXDXDXDXDXDXDXAXDXDXKXGXDXAXGXDXKXGXKXDXKXDXKXDXDXGXDXKXKXDXKXDXLXLXDXLXDXKXLXLXKXLXKXGXLXLXLXKXLXLXKXLXKXKXLXKXLXGXKXLXKXLXLXLXLXLXLXLXLXLXKXLXLXLXLXLXPXLXLXLXLXPXLXPXLXLXLXPXLXPXPXLXLXPXLXPXLXLXPXLXPXLXPXPXLXPXPXPXPXPXPXLXPXPXPXPXPXLXPXLXPXPXPXPXPXHXR.>.>.>.<.<.2.2.8.8.8.8.2.2.2.,.3.>.>.8.PXPXPXPXPXPXPXPXPXIXl.>.>.>.<.2.2.2.8.8.8.8.2.2.8.<.<.>.>.[.IXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXDXDXDXDXDXDXDXDXGXDXDXDXDXKXDXDXKXDXDXDXDXKXKXDXKXKXKXLXDXLXKXLXKXDXLXKXDXLXLXDXKXLXGXKXLXKXDXDXLXKXLXKXLXKXLXLXKXLXLXLXLXLXLXLXLXLXLXLXLXLXLXPXLXLXPXLXPXLXLXLXLXLXLXLXLXLXLXPXLXPXLXPXLXPXPXPXLXPXPXLXLXPXPXPXPXLXPXLXLXPXLXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXUXR...>.3.1.<.<.2.2.8.8.8.2.2.<.<.,.3...5.PXPXPXPXPXPXPXPXPXJX0.:.3.>.<.<.2.2.8.8.2.2.2.2.<.<.>.>...[.JXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXDXDXDXDXDXDXDXDXDXDXDXDXDXDXKXKXDXDXDXDXLXDXKXGXKXDXDXKXKXDXKXDXDXLXDXKXDXLXLXDXKXKXLXKXGXKXLXLXLXLXLXLXLXGXLXKXLXKXLXLXLXLXLXLXLXLXLXLXLXIXLXLXLXLXKXLXLXKXLXLXPXLXLXIXPXLXLXIXLXLXLXIXLXIXIXLXLXLXLXIXPXLXLXIXLXPXPXLXPXIXPXPXLXIXIXLXLXPXIXLXPXPXIXPXPXPXMXR...>.,.>.3.<.<.2.<.<.3.2.<.,.3.>.>. .2.PXPXPXPXPXPXPXPXPXJXl.:.:.>.>.3.<.<.<.<.2.2.<.3.>.>.>.>...[.PXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXDXDXDXDXDXDXDXDXDXDXDXKXDXDXDXGXGXKXDXDXKXLXDXLXDXLXDXKXKXKXLXLXDXLXKXKXKXLXKXLXGXKXGXLXLXLXGXLXLXLXGXLXKXLXKXLXLXKXIXLXKXKXLXLXJXHXLXLXLXLXLXHXLXLXHXLXGXLXIXLXIXLXIXLXLXLXHXIXLXLXIXLXLXJXKXIXLXIXLXLXIXLXIXIXIXIXLXIXLXJXIXLXPXLXIXPXIXPXJXJXJXJXJXIXIXLXMXT.....:.:.3.>.>.<.<.<.,.3.>.<.>.:.....2.PXIXJXIXPXPXPXIXPXHX0.:...:.3.>.<.>.<.<.<.<.>.<.>.>.:. ...[.IXPXPXPXPXPXPXPXPXIXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXDXDXDXDXDXDXDXKXGXDXDXDXDXGXKXDXDXDXKXDXDXDXGXLXKXDXKXGXKXDXDXDXLXDXKXGXDXKXDXKXKXKXKXLXKXKXKXLXAXKXKXAXHXGXKXKXHXKXAXLXKXKXGXJXGXKXHXGXLXHXKXKXHXAXAXHXAXAXUXAXAXUXAXHXAXHXHXAXHXAXHXAXAXHXAXHXHXHXHXHXHXHXKXHXKXHXKXHXHXHXHXHXHXHXHXHXHXHXHXMXJXJXJXJXJXJXMXT. .......1.>.>.<.>.>.3.>.>.>.:..... .<.IXJXJXJXJXJXJXJXIXMX9...:...:.:.>.3.<.>.>.>.3.>.:.:.:... .[.IXJXJXIXPXIXIXIXIXJXJXIXIXPXIXIXPXPXJXJXPXIXIXIXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXDXDXDXDXDXGXDXDXAXDXKXKXDXLXDXLXDXLXDXKXDXKXDXDXAXDXDXKXDXKXAXDXAXDXDXAXGXAXAXDXKXHXKXAXAXKXAXAXAXAXAXAXAXAXVXAXAXAXAXAXAXHXAXAXAXAXAXAXAXAXVXUXVXVXnXnXnXnXnXnXnXbXnXbXbXnXnXnXnXnXnXnXnXnXbXnXbXnXnXnXbXnXnXnXnXnXnXnXnXnXmXMXmXMXnXnXnXnXNXNXcXNXnXnXMXMXcXT.X. .........>.:.>.>.:.:.>.:..... .X.>.JXMXMXMXMXMXMXMXMXMXq.X.X.:.:...:.:.:.>.>.:.:.:...:.:. .X.E.MXJXJXJXJXJXJXJXJXJXJXJXJXJXJXJXIXJXJXJXJXJXJXJXJXJXPXIXIXIXPXIXPXPXIXJXPXJXIXJXJXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"SXDXDXDXDXDXDXDXDXDXGXDXDXDXDXAXDXAXDXDXKXDXDXAXDXAXDXDXAXDXVXAXDXAXAXAXVXAXVXAXDXAXVXVXAXBXVXBXBXbXbXbXbXbXbXvXmXbXbXbXbXmXbXvXnXbXbXbXnXnXvXvXvXxXxX9XuXiX6X6X5X9X5XuX6X9X6X9X6X6XuX6X6X6XuX6X9X9XuX9X9XrX9X9X6XxX9X9X9X9XuX9XuX9XuX9XuX9X9XuX9X9X9X9XuX9X9XxX0XY.X.X. .............:........... .X.X.>.cX9X9X9X9X9X9XxX9X9Xq.X.X.X.X.........:.:.:.......X.X.X.X.E.MXNXMXMXMXMXMXMXMXMXMXMXMXMXMXMXMXMXMXMXMXMXHXMXMXMXJXJXJXIXIXJXJXJXJXJXHXJXJXJXJXJXJXIXIXIXPXIXPXIXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXDXDXDXKXDXDXDXAXGXDXDXSXSXDXAXFXAXSXAXDXVXVXDXVXVXAXVXZXZXZXbXbXbXvXvXbXvXbXvXbXvXvXvXvXiXiXuXrXrXrX6X4X6X6X6X5X6X6X6X5X6X6X9X6X6X9X6X9X6X6X4X4X3X1X1X:X:X:X;X;X:X*X*X:X;X*X:X:X:X-X:X-X-X:X;X:X*X:X:X:X-X:X:X-X:X-X:X:X-X:X-X:X:X-X:X-X:X:X>X:X-X:X-X:X-X>X'.x.| . .| . . ........... . .X.X.X.] :.>X:X:X:X,X:X:X>X:X,X2.X.X.X.X.X.X.w.w...:...X.X.X.X.X. .| V.9X9X9X9X9X9X9X9X9X9X9X9X9X9X9X9X9X9X9X9XxX9XcXNXNXNXNXNXMXMXMXMXMXMXMXMXMXMXMXMXMXMXMXMXMXJXJXJXJXJXJXJXIXJXIXJXPXPXIXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPXPX",
"DXDXDXDXDXDXDXAXSXDXDXVXAXAXAXAXBXVXBXbXbXvXvXvXvXvXvXiXvXuXvXrXrXrXrX4X4X6X6X5X5X6X5X5X5X5X4X7X7X:X1X:X:X=X:X=X=X:X*X*X*X:X=X:X*X*X*X*X*X*X&X&X&X).).(.^.P.L.L.L.L.J.L.^.G.L.L.J.J.J.J.L.L.^.J.L.G.^.^.L.L.L.L.G.^.L.L.^.J.^.^.^.J.^.^.^.^.^.^.G.^.^.^.^.^.^.^.G.9.] ] | | | | | . . .| .| .X.X.[ ] :.^.^.^.^.^.^.~.^.^.^.,.{ X.} X.X.X.X.X.X.X.X.X.X.X.X.[ | ] z.-X:X-X:X-X>X>X:X:X:X:X>X,X>X:X>X,X>X:X:X>X>X>X>X3X9X9X9X9X9X9X9X9X9X9X9X9X9XcXcXcXNXNXNXNXNXMXMXMXMXMXMXHXMXJXHXHXJXJXJXJXJXIXPXIXPXPXIXPXPXPXPXPXPXPXPXPX",
"DXDXDXDXSXAXAXCXAXBXBXvXvXvXvXvXvXvXiXiXtX6XrXtXeX4X4XeX7X7X<X7X=X=X=X:X=X=X*X=X=X*X*X=X*X&X&X&X(.(.P.L.L.L.L.L.J.J.L.L.L.L.J.J.J.J.J.J.J.J.G.G.G.H.F.F.B.B.B.m.m.m.m.n.n.m.n.m.m.n.n.m.m.n.n.m.n.M.n.n.n.n.n.n.n.n.n.n.n.n.n.n.M.n.n.M.n.n.n.n.n.B.n.n.n.n.B.n.M.9.' ] ] ] | .X.| | | | .| ] ] | ] ] ,.B.n.n.n.B.n.n.n.B.n.,.} X.{ X.X.X.X.X.X.X.X.X.X.X.X.} ] ] v.G.^.!.L.^.^.~.^.^.^.^.^.^.^.^.~.^.^.^.^.^.).).).&X&X-X-X-X:X:X:X:X:X,X>X>X>X>X3X3X3X9X3X9X9X9XxX9XcXcXcXcXNXMXMXMXMXMXMXMXMXHXJXJXIXPXIXPXPXPXPXPXPXPXPXPX",
"DXAXCXAXVXZXbXbXiXiXiXiXiXrXrX4X4X4X4X7X1X1X1X=X=X=X&X=X&X&X.X.X(.P.P.L.P.L.J.J.J.J.G.J.G.K.H.F.F.Z.M.M.m.m.n.m.b.n.m.b.n.b.n.m.n.m.n.N.n.n.b.b.c.j.g.g.f.u.=.u.=.*.*.=.*.*.*.=.*.=.=.*.=.=.=.*.*.=.*.=.=.*.=.=.=.=.=.*.=.=.*.=.=.=.=.=.=.=.=.*.=.=.=.=.=.=.=.=.=.=.w.' ] ] ] | | | | | | | | ] ] ] ] [ 4.=.=.=.=.=.=.=.=.=.=.-.w.} } X.} X.X.X.X.X.X.X.X.X.} X.} 1.c.n.n.n.n.B.n.B.n.B.B.n.n.B.B.n.B.n.B.n.B.B.B.F.F.F.G.G.!.^.^.^.^.^.^.^.^.^.^.^.).).).'.-X>X:X:X>X>X>X>X3X3X0X9X9X9XxXxXNXNXNXMXNXMXMXHXJXJXPXIXPXPXPXPXPXPX",
"SXSXVXBXvXiXiXrX4X4X7X7X1X<X*X=X.X=X.X.X X_.P.J.J.K.K.K.K.H.Z.A.Z.Z.m.m.m.m.b.m.m.N.m.b.b.b.c.c.g.g.f.u.f.*.*.*.*.*.*.*.*.*.u.*.=.=.*.*.*.=.&.*.&.&.%.@.@.#.#.+.O.O.O.O.O.O.O.O.O.O.O.+.+.+.+.+.O.+.O.+.O.O.O.O.O.O.+.+.O.+.O.O._ +.+._ +.+._ +.+.+.+._ +.+.+._ +.+.+.{ [ [ [ [ [ [ [ [ [ [ [ [ [ [ { o.+.O.+.O.o.+.o.+.o.+.O.+._ [ [ [ [ [ [ [ [ [ [ :.[ [ [ :.[ &.&.&.=.&.=.=.=.=.=.=.=.=.=.=.*.=.=.=.=.=.=.f.f.k.k.j.j.n.n.n.n.B.n.n.B.n.B.B.B.B.B.G.F.G.G.G.^.^.^.^.^.).).).-X-X-X>X>X3X3X3X9X9X9XxXNXNXMXMXHXJXIXPXPXPXPXPX",
"AXVXvXiXrXeX7X1X<X=X.X X.XP.L.L.K.K.K.Z.Z.Z.m.Z.N.N.m.b.c.c.h.u.f.u.u.u.*.u.*.*.*.*.*.*.*.*.%.&.%.@.@.#.O.+.O.#.#.O.O.O.O.O.O.O.O.O.O.O.O.O.O.O.O.B B B B N N N N N N N M M N N N N M N M M M N M M M M N N N M N N M M M M M N N N N N N N N N N N N N n N N N M N N N ` ` ` N ` ` ` N ` ` N ` ` ` B N N N N N M M N N N N M M N ` ` ` N ` N ` ` ` ` _ _ ` ` _ _ _ +.+.+.+.+.+.+._ +.+.+._ +.+.+.+.+.o.+.+.+.+.@.@.&.&.&.=.&.=.=.=.=.=.=.=.=.=.=.=.f.j.j.n.n.n.n.B.B.B.B.B.F.G.G.G.^.^.^.).).'.-X:X>X>X3X9X9XNXMXHXJXJXIXPXPXPX",
"BXvXiX6X7X=X.X XL.L.K.H.Z.Z.N.N.b.b.c.g.g.g.u.u.u.u.u.-.%.-.&.%.@.@.#.#.#.O.O.+.O.O.#.O.O._ _ B B B B N N V M M V M M M M M M V M M M N M M C C M n C n n c c c m c c c c c c c c c c c c c c c c c c c c c c c c c c c c c f m c c c c c c c c c c c c c c c c c c c c c v c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c c v c v v n n n N n N N N N N N N N N N N N N N N N N N N B B B _ o.O.O.O.+.+.+.+.+.+.+.+.+.+.@.&.&.&.&.=.=.=.=.=.k.k.j.j.j.n.B.B.B.F.F.G.!.^.^.).-X>X3X9XcXMXMXJXJXPXPXPX",
"BXiXeX1X=X(.J.H.F.N.b.b.j.g.g.f.u.u.%.u.%.@.@.#.O.#.O.O.O.O.B B B B V N N M M M M M N M M M C n n m m v m c c c c c c c c c c c c c c c v c c c c s c c s h h s s a h a a a a a a a a a a a a a a a a s a s s s s a s s s a s s s s s a a a s s s a s s s s s s s a s s a s s s s a s s s s s s a s s a s s s s s s s s s s s s s s a s s s a s a s a a s s s s c c c c c f c c c f c c c c c c c c c c c m m m n n n n n n N N N N N N N N N N B B B ` _ _ O.+.+.+.+.@.@.@.&.&.&.=.=.=.f.j.j.j.n.B.B.G.G.).-X>X9XcXMXJXIXPXPXPX",
"BXrX7X=XP.K.Z.N.c.u.u.u.u.%.%.@.@.#.#.B _ B B V V V M M M M C n n n n c m v m v v v m c v c c c v c c a s h a h s a a h a s a s s a s s s s s a a a a a a d a a a a a a p a p a d d d p p a p p p p d d p d p p a p a p p a p p p a p a p a p p p a p p a p p a p a p p p p a p p p a p a p p a p p p p a p p a a p p s p p p p a p a p p a p a a a a p a a a a a a a a s s a s a s s s a a s a a a a a a s s s s c s c c c c c v m c v m n c m m n n n n N N N N N B B N _ _ +.+.+.+.@.&.&.&.=.f.j.n.n.B.G.).-X3XxXMXJXIXPXIXPX",
"iXtX1XoXP.F.m.h.u.u.u.%.@.#.#.B B B V B V M M C n n n n v c n h c c h h h h h h h s h s s h a s a d a a a a a a a a a a p a a p a p p a d p a a p a a p d p p p y y p d p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p y p a p p a p p a p a a a a p a p a p a a a a a a a a a a a a a a s s s s s s s s s s s s s c c c c c c c m m m m n n n N N N ` B _ O.+.+.@.&.&.*.f.k.n.F.G.-X>X9XNXMXIXPXPXPX",
"vXtX1X&XJ.Z.b.g.u.u.%.@.@.O.B G B B N V M C C n n n n v m h v h h c c h h a h a h a a a a a a a a a d a d d d a a d p p a p d d d d d y y a y a p p p p p p p p p p p p p p p p p p p p p p p p p d d p p p p p y p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p a p p p p p p p p p p p p p p p p p p p p p p p p p a p p p p p p a a a a a a a a a a a s s a a s s s s s s s s s c s c c c c v c c m m n n M N N N N B B _ O.+.@.@.&.*.=.k.n.B.^.).>X9XNXHXJXIXPXPX",
"BXrX7X=XP.K.Z.b.g.u.u.%.%.;.@.+.O.O._ B B V V V C n n n n n n n n m c v c c c h h h h h h h h s a c h a a c h a a a a a a a p d p d a a p a a a a a a d a d a p d p d d a p p a p a p a a a p a a p d p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p s p p a p a p a p p a a p p p a a a a a a a p a a p a p a a a a a a a a a a a a s s s s s s s c s s s s c s c c c c m m v m n m n n n n N N N N B _ _ _ +.+.@.@.&.&.*.=.k.j.n.F.^.'.>X9XNXHXJXPXPXPX",
"bXiX4X1X XJ.H.Z.N.c.g.u.u.u.u.%.%.%.#.#.#.#.O.B _ B B B V V V M V M V C C n n n c v m v v m v m c c c v m c v c v f f h c a s h s s a a s s s s s s s a s s a a a a a a h s s s a s s a a a a a a a a a d d a y p a p p a p p a a p a a p p p a a p p a a p p p p a p a p p a p p a p p a p p p a p p a p a a a a a a a a a a a s s s s s s s s s s s s s s s s s s s s s s s s s s s s s s s s s f c c c c m m v c m c m v m c m m n m n n M M N ` N N N N N _ _ _ _ _ +.+.+.+.@.&.&.&.=.=.f.k.k.n.n.B.F.^.).>X9XcXMXHXJXPXPXPX",
"BXiXiX4X1X=XP.L.K.Z.Z.Z.Z.b.c.j.g.g.f.f.u.u.*.%.%.%.#.#.#.#.#.#.#.O.#.B _ B B B V B N N N N N N N B N N M M C M M n n v v m v c m c v m v v c c v c c v v c c v c m c c c c c v c c c v c c c c s a h a h h h s s s s s s s s s s s a a s s s s s s s s s s s s a s s s s s s s s s s s s s s s s s s s s s s s s s s f c c c c f m c c c c c m c c c m c c c m c c c m c c c c m m c c n m m n n n n M N N N N N N B N N N B N N ` B B B B _ _ O.+.+.@.@.@.@.@.@.@.&.&.&.=.=.=.=.k.k.j.j.n.n.B.F.F.G.^.).&X>X3XxXNXHXJXPXPXPXPX",
"AXBXvXrX6X1X=X=X.X.XP.P.J.K.H.Z.F.Z.M.m.b.b.b.c.j.g.f.f.u.u.f.f.u.u.-.-.&.%.%.@.#.#.#.#.#.+.+.#.+.+.O.+.+.O.O.O._ B B B B N N N N N N N M N N N N N N N N N N N N N N V N N N N N N M M N M n n n n n m m v m m m m c c c c c c c c c m c c m c c c v c c c m m m c c c c c c c c c c m c c c m c c v m c c m c n n n n n n N N N N N N N N N N N N N N N N ` N N N N N N N N N N N N N N N B _ _ _ _ +._ +.+.+.+.+.@.@.@.@.+.+.@.@.@.@.&.&.&.=.=.=.=.=.=.=.f.f.k.j.j.j.n.n.B.B.B.F.F.H.G.G.^.^.^.).-X-X>X3X9XxXMXMXJXIXPXIXPXPX",
"DXAXBXBXiXrX6X4X4X<X;X=X=X.X.X.X(.P.P.L.K.K.G.H.F.Z.Z.Z.M.m.M.N.b.m.b.b.c.g.g.g.f.f.f.=.u.u.u.=.u.u.=.u.=.=.*.&.&.&.%.%.#.@.#.#.#.#.O.#.O.#.+.O.+.+.+.+.+.+.#.#.+.+.+.+.+.+.+.+.+.+.+.O.+._ _ B B V N N N N N N M M N N N N N N N N N ` N N N N N N N N N N N ` N N N N N N N N N N N ` N N N N N N N N N N N ` N N _ B _ _ O.O.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.@.@.@.+.@.@.@.@.&.&.&.=.=.=.=.f.=.=.=.=.=.=.=.=.f.=.j.j.j.j.j.n.n.B.B.B.B.B.B.B.F.G.G.G.G.^.^.^.).).).-X-X,X>X>XqX3X0X9XxXNXMXMXJXJXIXPXPXPXPX",
"DXDXAXAXBXbXvXvXrXrXrXrXeXeX2X7X:X1X=X=X*X=X&X.X.X X_.^.L.L.L.L.L.G.J.G.H.Z.Z.Z.M.M.M.m.m.m.N.N.m.m.m.M.B.n.n.b.c.j.f.g.f.f.=.f.=.f.=.=.=.=.=.=.=.=.=.=.u.u.=.*.=.*.=.=.=.=.=.=.=.=.=.=.*.&.&.@.@.@.@.@.O.+.+.+.+.@.+.+.+.+.+.+.@.+.@.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.+.@.+.+.+.+.+.+.@.+.+.+.+.+.+.+.+.@.+.@.@.@.@.@.;.&.&.&.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.f.=.=.=.=.=.=.f.=.=.f.=.f.f.=.k.j.j.j.n.n.n.B.B.B.B.B.B.B.B.B.B.B.B.B.B.F.G.G.G.G.G.^.^.^.^.^.).).).).'.,X>X>X>X>X>X3X3X3X0X9X9XcXcXNXNXMXMXJXJXJXIXIXPXPXPXPXPX",
"DXAXDXDXDXAXBXVXVXBXvXvXvXuXvXrXiXrXrXrX6X5X4X7X7X1X:X<X:X:X=X=X=X*X*X&X.X.X.X(.P.P.P.^.P.L.P.L.P.L.L.L.J.J.J.G.H.H.F.F.F.M.M.M.M.M.N.B.N.M.M.B.M.M.N.B.M.N.B.B.B.B.B.B.B.B.M.M.B.n.n.n.n.n.j.j.j.f.f.=.f.f.f.=.f.=.=.=.=.=.=.=.=.=.=.=.f.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.=.f.k.j.j.n.n.n.n.n.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.F.G.G.G.G.^.^.^.^.^.^.^.^.^.).^.^.^.).).).).).-X-X>X>X>X>X>X>X>X3X3X3X0X3X9X9X9XxXcXcXcXMXNXMXMXMXMXHXHXMXJXJXIXIXPXPXPXPXPXPXPX",
"KXDXDXAXKXAXDXAXDXVXAXVXVXVXZXBXbXbXbXbXvXvXvXvXxXxXrXuXiX6X6X6X6X6X6X5X4X2X2X:X:X:X1X:X:X:X:X:X:X:X:X:X:X*X*X&X&X.X).^.(.^.^.L.P.L.L.^.L.L.P.^.P.^.P.L.^.^.^.^.L.^.L.^.L.P.P.L.^.^.^.L.G.G.G.F.F.B.B.B.M.B.M.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.F.B.F.F.G.G.^.^.^.^.^.).^.^.^.^.^.^.^.^.^.^.^.).^.^.^.^.^.^.^.^.^.^.^.^.).).).).-X'.-X>X:X,X>X>X>X>X>X>X>X>X>X>X>X>X>X3X3X3X9X9X9X9X9XxX9XxXxXxXNXNXNXNXMXNXNXMXHXMXHXMXJXJXJXJXJXJXJXJXPXIXPXPXPXPXPXPXPXPXPX",
"DXLXDXGXDXKXKXKXGXAXKXAXDXAXKXAXVXDXAXAXAXAXVXVXZXbXBXbXbXbXbXbXbXvXvXvXxXvXuXuX6XiX6XrX6X6X6XuX6X6XiX6X6XuX6X6X5X3X7X2X1X1X:X:X:X:X:X:X:X:X:X:X:X:X:X:X:X1X:X:X:X:X>X:X>X:X>X>X:X:X:X:X-X-X&X).).).^.).^.).^.^.^.^.^.^.^.^.^.).^.^.^.).^.^.^.).^.^.^.).^.^.].^.^.).^.).^.^.^.).^.).^.^.^.).^.^.^.).^.).^.^.).^.^.).).&X'.-X-X-X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X>X3X3X3X9X9X9X9X9XNX9X9XxX9XxXxX9XxXxXcXxXNXNXNXNXNXMXMXNXMXMXMXMXMXMXMXJXMXMXMXMXJXIXIXJXJXJXIXIXPXPXIXIXPXPXPXPXPXPXPXPXPXPXPXPX"
};

280
LICENSE
View File

@ -1,280 +0,0 @@
GNU GENERAL PUBLIC LICENSE
Version 2, June 1991
Copyright (C) 1989, 1991 Free Software Foundation, Inc.,
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
Everyone is permitted to copy and distribute verbatim copies
of this license document, but changing it is not allowed.
Preamble
The licenses for most software are designed to take away your
freedom to share and change it. By contrast, the GNU General Public
License is intended to guarantee your freedom to share and change free
software--to make sure the software is free for all its users. This
General Public License applies to most of the Free Software
Foundation's software and to any other program whose authors commit to
using it. (Some other Free Software Foundation software is covered by
the GNU Lesser General Public License instead.) You can apply it to
your programs, too.
When we speak of free software, we are referring to freedom, not
price. Our General Public Licenses are designed to make sure that you
have the freedom to distribute copies of free software (and charge for
this service if you wish), that you receive source code or can get it
if you want it, that you can change the software or use pieces of it
in new free programs; and that you know you can do these things.
To protect your rights, we need to make restrictions that forbid
anyone to deny you these rights or to ask you to surrender the rights.
These restrictions translate to certain responsibilities for you if you
distribute copies of the software, or if you modify it.
For example, if you distribute copies of such a program, whether
gratis or for a fee, you must give the recipients all the rights that
you have. You must make sure that they, too, receive or can get the
source code. And you must show them these terms so they know their
rights.
We protect your rights with two steps: (1) copyright the software, and
(2) offer you this license which gives you legal permission to copy,
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
Finally, any free program is threatened constantly by software
patents. We wish to avoid the danger that redistributors of a free
program will individually obtain patent licenses, in effect making the
program proprietary. To prevent this, we have made it clear that any
patent must be licensed for everyone's free use or not licensed at all.
The precise terms and conditions for copying, distribution and
modification follow.
GNU GENERAL PUBLIC LICENSE
TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
0. This License applies to any program or other work which contains
a notice placed by the copyright holder saying it may be distributed
under the terms of this General Public License. The "Program", below,
refers to any such program or work, and a "work based on the Program"
means either the Program or any derivative work under copyright law:
that is to say, a work containing the Program or a portion of it,
either verbatim or with modifications and/or translated into another
language. (Hereinafter, translation is included without limitation in
the term "modification".) Each licensee is addressed as "you".
Activities other than copying, distribution and modification are not
covered by this License; they are outside its scope. The act of
running the Program is not restricted, and the output from the Program
is covered only if its contents constitute a work based on the
Program (independent of having been made by running the Program).
Whether that is true depends on what the Program does.
1. You may copy and distribute verbatim copies of the Program's
source code as you receive it, in any medium, provided that you
conspicuously and appropriately publish on each copy an appropriate
copyright notice and disclaimer of warranty; keep intact all the
notices that refer to this License and to the absence of any warranty;
and give any other recipients of the Program a copy of this License
along with the Program.
You may charge a fee for the physical act of transferring a copy, and
you may at your option offer warranty protection in exchange for a fee.
2. You may modify your copy or copies of the Program or any portion
of it, thus forming a work based on the Program, and copy and
distribute such modifications or work under the terms of Section 1
above, provided that you also meet all of these conditions:
a) You must cause the modified files to carry prominent notices
stating that you changed the files and the date of any change.
b) You must cause any work that you distribute or publish, that in
whole or in part contains or is derived from the Program or any
part thereof, to be licensed as a whole at no charge to all third
parties under the terms of this License.
c) If the modified program normally reads commands interactively
when run, you must cause it, when started running for such
interactive use in the most ordinary way, to print or display an
announcement including an appropriate copyright notice and a
notice that there is no warranty (or else, saying that you provide
a warranty) and that users may redistribute the program under
these conditions, and telling the user how to view a copy of this
License. (Exception: if the Program itself is interactive but
does not normally print such an announcement, your work based on
the Program is not required to print an announcement.)
These requirements apply to the modified work as a whole. If
identifiable sections of that work are not derived from the Program,
and can be reasonably considered independent and separate works in
themselves, then this License, and its terms, do not apply to those
sections when you distribute them as separate works. But when you
distribute the same sections as part of a whole which is a work based
on the Program, the distribution of the whole must be on the terms of
this License, whose permissions for other licensees extend to the
entire whole, and thus to each and every part regardless of who wrote it.
Thus, it is not the intent of this section to claim rights or contest
your rights to work written entirely by you; rather, the intent is to
exercise the right to control the distribution of derivative or
collective works based on the Program.
In addition, mere aggregation of another work not based on the Program
with the Program (or with a work based on the Program) on a volume of
a storage or distribution medium does not bring the other work under
the scope of this License.
3. You may copy and distribute the Program (or a work based on it,
under Section 2) in object code or executable form under the terms of
Sections 1 and 2 above provided that you also do one of the following:
a) Accompany it with the complete corresponding machine-readable
source code, which must be distributed under the terms of Sections
1 and 2 above on a medium customarily used for software interchange; or,
b) Accompany it with a written offer, valid for at least three
years, to give any third party, for a charge no more than your
cost of physically performing source distribution, a complete
machine-readable copy of the corresponding source code, to be
distributed under the terms of Sections 1 and 2 above on a medium
customarily used for software interchange; or,
c) Accompany it with the information you received as to the offer
to distribute corresponding source code. (This alternative is
allowed only for noncommercial distribution and only if you
received the program in object code or executable form with such
an offer, in accord with Subsection b above.)
The source code for a work means the preferred form of the work for
making modifications to it. For an executable work, complete source
code means all the source code for all modules it contains, plus any
associated interface definition files, plus the scripts used to
control compilation and installation of the executable. However, as a
special exception, the source code distributed need not include
anything that is normally distributed (in either source or binary
form) with the major components (compiler, kernel, and so on) of the
operating system on which the executable runs, unless that component
itself accompanies the executable.
If distribution of executable or object code is made by offering
access to copy from a designated place, then offering equivalent
access to copy the source code from the same place counts as
distribution of the source code, even though third parties are not
compelled to copy the source along with the object code.
4. You may not copy, modify, sublicense, or distribute the Program
except as expressly provided under this License. Any attempt
otherwise to copy, modify, sublicense or distribute the Program is
void, and will automatically terminate your rights under this License.
However, parties who have received copies, or rights, from you under
this License will not have their licenses terminated so long as such
parties remain in full compliance.
5. You are not required to accept this License, since you have not
signed it. However, nothing else grants you permission to modify or
distribute the Program or its derivative works. These actions are
prohibited by law if you do not accept this License. Therefore, by
modifying or distributing the Program (or any work based on the
Program), you indicate your acceptance of this License to do so, and
all its terms and conditions for copying, distributing or modifying
the Program or works based on it.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the
original licensor to copy, distribute or modify the Program subject to
these terms and conditions. You may not impose any further
restrictions on the recipients' exercise of the rights granted herein.
You are not responsible for enforcing compliance by third parties to
this License.
7. If, as a consequence of a court judgment or allegation of patent
infringement or for any other reason (not limited to patent issues),
conditions are imposed on you (whether by court order, agreement or
otherwise) that contradict the conditions of this License, they do not
excuse you from the conditions of this License. If you cannot
distribute so as to satisfy simultaneously your obligations under this
License and any other pertinent obligations, then as a consequence you
may not distribute the Program at all. For example, if a patent
license would not permit royalty-free redistribution of the Program by
all those who receive copies directly or indirectly through you, then
the only way you could satisfy both it and this License would be to
refrain entirely from distribution of the Program.
If any portion of this section is held invalid or unenforceable under
any particular circumstance, the balance of the section is intended to
apply and the section as a whole is intended to apply in other
circumstances.
It is not the purpose of this section to induce you to infringe any
patents or other property right claims or to contest validity of any
such claims; this section has the sole purpose of protecting the
integrity of the free software distribution system, which is
implemented by public license practices. Many people have made
generous contributions to the wide range of software distributed
through that system in reliance on consistent application of that
system; it is up to the author/donor to decide if he or she is willing
to distribute software through any other system and a licensee cannot
impose that choice.
This section is intended to make thoroughly clear what is believed to
be a consequence of the rest of this License.
8. If the distribution and/or use of the Program is restricted in
certain countries either by patents or by copyrighted interfaces, the
original copyright holder who places the Program under this License
may add an explicit geographical distribution limitation excluding
those countries, so that distribution is permitted only in or among
countries not thus excluded. In such case, this License incorporates
the limitation as if written in the body of this License.
9. The Free Software Foundation may publish revised and/or new versions
of the General Public License from time to time. Such new versions will
be similar in spirit to the present version, but may differ in detail to
address new problems or concerns.
Each version is given a distinguishing version number. If the Program
specifies a version number of this License which applies to it and "any
later version", you have the option of following the terms and conditions
either of that version or of any later version published by the Free
Software Foundation. If the Program does not specify a version number of
this License, you may choose any version ever published by the Free Software
Foundation.
10. If you wish to incorporate parts of the Program into other free
programs whose distribution conditions are different, write to the author
to ask for permission. For software which is copyrighted by the Free
Software Foundation, write to the Free Software Foundation; we sometimes
make exceptions for this. Our decision will be guided by the two goals
of preserving the free status of all derivatives of our free software and
of promoting the sharing and reuse of software generally.
NO WARRANTY
11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS
TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE
PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
REPAIR OR CORRECTION.
12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
POSSIBILITY OF SUCH DAMAGES.
END OF TERMS AND CONDITIONS

10
Makefile
View File

@ -1,10 +0,0 @@
.PHONY: all src man
src:
$(MAKE) -C $@
man:
- $(MAKE) -C $@ &> /dev/null
all: src man

49
README.md
View File

@ -1,52 +1,5 @@
IRPF90
======
[![Gitter](https://badges.gitter.im/Join Chat.svg)](https://gitter.im/scemama/irpf90?utm_source=badge&utm_medium=badge&utm_campaign=pr-badge&utm_content=badge)
IRPF90 is a Fortran90 preprocessor written in Python for programming using the Implicit Reference to Parameters (IRP) method. It simplifies the development of large fortran codes in the field of scientific high performance computing.
Dependencies
------------
- GNU make (>= 3.81 recommended)
- Python > 2.3
- Any Fortran 90 compiler (Intel recommended)
Installing IRPF90
-----------------
``pip install irpf90``
or
``${IRPF90_HOME}`` is the location of your irpf90 directory::
``` bash
cd ${IRPF90_HOME}
make
cat << EOF >> ${HOME}/.bash_profile
export PYTHONPATH=${IRPF90_HOME}/src:${PYTHONPATH}
export PATH=${IRPF90_HOME}/bin:${PATH}
export MANPATH=${IRPF90_HOME}/man:${MANPATH}
EOF
source ${HOME}/.bash_profile
```
Using IRPF90
------------
In an empty directory, run:
``` bash
irpf90 --init
```
This command creates a new Makefile suitable for most irpf90 projects.
Now you can start to program using irpf90.
Web Site
--------
http://irpf90.ups-tlse.fr
Repository for the IRPF90 web site.

1
bin/irpf90
View File

@ -1 +0,0 @@
../src/irpf90_python.exe

40
bin/irpf90_indent
View File

@ -1,40 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import os
import sys
wd = os.path.abspath(os.path.dirname(__file__))
sys.path.insert(0,(wd+"/../src/"))
sys.path.insert(0,(wd+"/../share/irpf90/src/"))
def main():
import irpf90_indent
irpf90_indent.main()
main()

49
bin/irpman
View File

@ -1,49 +0,0 @@
#!/bin/bash
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
# Define auto-completion for bash
case "$0" in
*irpman)
if [[ -z $1 ]] ; then
echo "To activate auto-completion in bash:"
echo "source " $0
else
exec python2 $(dirname $0)/../src/irpman.py $1
fi
;;
*)
_irpman_complete()
{
local cur
COMPREPLY=()
cur=${COMP_WORDS[COMP_CWORD]}
COMPREPLY=( $(compgen -W "`[[ -f tags ]] && cat tags | cut -d' ' -f 1`" -- "$cur" ) )
} && complete -F _irpman_complete irpman
;;
esac

41
bin/profile
View File

@ -1,41 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import os
import sys
wd = os.path.abspath(os.path.dirname(__file__))
sys.path.insert(0,(wd+"/../src/"))
sys.path.insert(0,(wd+"/../share/irpf90/src/"))
def main():
import irpf90
irpf90.main()
import cProfile
cProfile.run('main()')

13
example/Makefile
View File

@ -1,13 +0,0 @@
IRPF90 = python2 ../src/irpf90.py -I input
FC = ifort
FCFLAGS= -O2
NINJA =
SRC=
OBJ=
LIB=
include irpf90.make
irpf90.make: $(wildcard *.irp.f)
$(IRPF90)

22
example/input/input.irp.f
View File

@ -1,22 +0,0 @@
BEGIN_PROVIDER [ integer, d1 ]
&BEGIN_PROVIDER [ integer, d2 ]
&BEGIN_PROVIDER [ integer, d3 ]
&BEGIN_PROVIDER [ integer, d4 ]
&BEGIN_PROVIDER [ integer, d5 ]
print *, 'd1'
read(*,*) d1
BEGIN_TEMPLATE
print *, '$X'
read(*,*) $X
ASSERT ( $X > $Y )
SUBST [ X, Y ]
d2; d1;;
d3; d2;;
d4; d3;;
d5; d4;;
END_TEMPLATE
END_PROVIDER

12
example/irp_example1.irp.f
View File

@ -1,12 +0,0 @@
program irp_example1
! integer :: x(W)
BEGIN_SHELL [ /bin/bash ]
echo print *, \'Compiled by `whoami` on `date`\'
echo print *, \'$FC $FCFLAGS\'
echo print *, \'$IRPF90\'
END_SHELL
print *, 't = ', t
print *, 'v=', v
! print *, u2
end

7
example/irp_example2.irp.f
View File

@ -1,7 +0,0 @@
program irp_example2
print *, "Example 2"
print *, 't = ', t
IRP_WRITE t
end

26
example/uvwt.irp.f
View File

@ -1,26 +0,0 @@
BEGIN_PROVIDER [ integer, t ]
t = u1+v+4
END_PROVIDER
BEGIN_PROVIDER [integer,w]
w = d5+3
END_PROVIDER
BEGIN_PROVIDER [ integer, v ]
v = u2+w+2
END_PROVIDER
BEGIN_PROVIDER [ integer, u1 ]
integer :: fu
u1 = fu(d1,d2)
END_PROVIDER
BEGIN_PROVIDER [ integer, u2 ]
integer :: fu
u2 = fu(d3,d4)
END_PROVIDER
integer function fu(x,y)
integer :: x,y
fu = x+y+1
end function

1
man/.gitignore vendored
View File

@ -1 +0,0 @@
options.rst

12
man/Makefile
View File

@ -1,12 +0,0 @@
RST2MAN=rst2man -d -t
default: man1/irpman.1.gz man1/irpf90.1.gz
options.rst: ../src/command_line.py
python ../src/command_line.py > options.rst
man1/irpf90.1.gz: irpf90.rst options.rst
rm -f $@ ; $(RST2MAN) --title="IRP Fortran 90" irpf90.rst man1/irpf90.1 ; gzip man1/irpf90.1
man1/irpman.1.gz: irpman.rst
rm -f $@ ; $(RST2MAN) --title="IRP man" irpman.rst man1/irpman.1 ; gzip man1/irpman.1

36
man/irpf90.rst
View File

@ -1,36 +0,0 @@
======
IRPF90
======
----------------------------------------------------------
Fortran programming using Implicit Reference to Parameters
----------------------------------------------------------
:Author: Anthony Scemama scemama@irsamc.ups-tlse.fr
:Version: 1.20
:Manual section: 1
SYNOPSIS
========
irpf90 [options]
DESCRIPTION
===========
irpf90 provides a programming environment which simplifies Fortran
programming, via the Implicit Reference to Parameters (IRP) method.
For more details, read the tutorial ditributed with the package
or visit http://irpf90.ups-tlse.fr
OPTIONS
=======
.. include:: options.rst
SEE ALSO
========
* irpman
* http://irpf90.ups-tlse.fr

32
man/irpman.rst
View File

@ -1,32 +0,0 @@
======
IRPman
======
----------------------------------------------------
Developper's documentation in the irpf90 environment
----------------------------------------------------
:Author: Anthony Scemama scemama@irsamc.ups-tlse.fr
:Version: 1.20
:Manual section: 1
SYNOPSIS
========
irpman variable
DESCRIPTION
===========
irpman is a documentation environment for IRPF90. Every IRP
variable (described with a BEGIN_PROVIDER ... END_PROVIDER block)
has an associated manual page. When a provider contains a
documentation block (BEGIN_DOC ... END_DOC), the text entered inside
the block is displayed in the manual page of the variable.
SEE ALSO
========
* irpf90
* http://irpf90.ups-tlse.fr

BIN
man/man1/irpf90.1.gz
View File

Binary file not shown.

BIN
man/man1/irpman.1.gz
View File

Binary file not shown.

9
packages/Makefile
View File

@ -1,9 +0,0 @@
include version
default: version
set -x
NAME=irpf90-$(VERSION)-noarch-src.tar.gz ;\
cd ..;\
git archive --format=tar --prefix=irpf90/ HEAD | gzip > $$OLDPWD/$$NAME;
version: ../src/version.py
./make_version.py > version

7
packages/make_version.py
View File

@ -1,7 +0,0 @@
#!/usr/bin/env python2
import sys, os
wd = os.path.abspath(os.path.dirname(__file__))
sys.path.insert(0,(wd+"/../src/"))
from version import *
print "VERSION=%s"%(version)

280
pip/LICENSE.txt
View File

@ -1,280 +0,0 @@
GNU GENERAL PUBLIC LICENSE
Version 2, June 1991
Copyright (C) 1989, 1991 Free Software Foundation, Inc.,
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
Everyone is permitted to copy and distribute verbatim copies
of this license document, but changing it is not allowed.
Preamble
The licenses for most software are designed to take away your
freedom to share and change it. By contrast, the GNU General Public
License is intended to guarantee your freedom to share and change free
software--to make sure the software is free for all its users. This
General Public License applies to most of the Free Software
Foundation's software and to any other program whose authors commit to
using it. (Some other Free Software Foundation software is covered by
the GNU Lesser General Public License instead.) You can apply it to
your programs, too.
When we speak of free software, we are referring to freedom, not
price. Our General Public Licenses are designed to make sure that you
have the freedom to distribute copies of free software (and charge for
this service if you wish), that you receive source code or can get it
if you want it, that you can change the software or use pieces of it
in new free programs; and that you know you can do these things.
To protect your rights, we need to make restrictions that forbid
anyone to deny you these rights or to ask you to surrender the rights.
These restrictions translate to certain responsibilities for you if you
distribute copies of the software, or if you modify it.
For example, if you distribute copies of such a program, whether
gratis or for a fee, you must give the recipients all the rights that
you have. You must make sure that they, too, receive or can get the
source code. And you must show them these terms so they know their
rights.
We protect your rights with two steps: (1) copyright the software, and
(2) offer you this license which gives you legal permission to copy,
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
Finally, any free program is threatened constantly by software
patents. We wish to avoid the danger that redistributors of a free
program will individually obtain patent licenses, in effect making the
program proprietary. To prevent this, we have made it clear that any
patent must be licensed for everyone's free use or not licensed at all.
The precise terms and conditions for copying, distribution and
modification follow.
GNU GENERAL PUBLIC LICENSE
TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
0. This License applies to any program or other work which contains
a notice placed by the copyright holder saying it may be distributed
under the terms of this General Public License. The "Program", below,
refers to any such program or work, and a "work based on the Program"
means either the Program or any derivative work under copyright law:
that is to say, a work containing the Program or a portion of it,
either verbatim or with modifications and/or translated into another
language. (Hereinafter, translation is included without limitation in
the term "modification".) Each licensee is addressed as "you".
Activities other than copying, distribution and modification are not
covered by this License; they are outside its scope. The act of
running the Program is not restricted, and the output from the Program
is covered only if its contents constitute a work based on the
Program (independent of having been made by running the Program).
Whether that is true depends on what the Program does.
1. You may copy and distribute verbatim copies of the Program's
source code as you receive it, in any medium, provided that you
conspicuously and appropriately publish on each copy an appropriate
copyright notice and disclaimer of warranty; keep intact all the
notices that refer to this License and to the absence of any warranty;
and give any other recipients of the Program a copy of this License
along with the Program.
You may charge a fee for the physical act of transferring a copy, and
you may at your option offer warranty protection in exchange for a fee.
2. You may modify your copy or copies of the Program or any portion
of it, thus forming a work based on the Program, and copy and
distribute such modifications or work under the terms of Section 1
above, provided that you also meet all of these conditions:
a) You must cause the modified files to carry prominent notices
stating that you changed the files and the date of any change.
b) You must cause any work that you distribute or publish, that in
whole or in part contains or is derived from the Program or any
part thereof, to be licensed as a whole at no charge to all third
parties under the terms of this License.
c) If the modified program normally reads commands interactively
when run, you must cause it, when started running for such
interactive use in the most ordinary way, to print or display an
announcement including an appropriate copyright notice and a
notice that there is no warranty (or else, saying that you provide
a warranty) and that users may redistribute the program under
these conditions, and telling the user how to view a copy of this
License. (Exception: if the Program itself is interactive but
does not normally print such an announcement, your work based on
the Program is not required to print an announcement.)
These requirements apply to the modified work as a whole. If
identifiable sections of that work are not derived from the Program,
and can be reasonably considered independent and separate works in
themselves, then this License, and its terms, do not apply to those
sections when you distribute them as separate works. But when you
distribute the same sections as part of a whole which is a work based
on the Program, the distribution of the whole must be on the terms of
this License, whose permissions for other licensees extend to the
entire whole, and thus to each and every part regardless of who wrote it.
Thus, it is not the intent of this section to claim rights or contest
your rights to work written entirely by you; rather, the intent is to
exercise the right to control the distribution of derivative or
collective works based on the Program.
In addition, mere aggregation of another work not based on the Program
with the Program (or with a work based on the Program) on a volume of
a storage or distribution medium does not bring the other work under
the scope of this License.
3. You may copy and distribute the Program (or a work based on it,
under Section 2) in object code or executable form under the terms of
Sections 1 and 2 above provided that you also do one of the following:
a) Accompany it with the complete corresponding machine-readable
source code, which must be distributed under the terms of Sections
1 and 2 above on a medium customarily used for software interchange; or,
b) Accompany it with a written offer, valid for at least three
years, to give any third party, for a charge no more than your
cost of physically performing source distribution, a complete
machine-readable copy of the corresponding source code, to be
distributed under the terms of Sections 1 and 2 above on a medium
customarily used for software interchange; or,
c) Accompany it with the information you received as to the offer
to distribute corresponding source code. (This alternative is
allowed only for noncommercial distribution and only if you
received the program in object code or executable form with such
an offer, in accord with Subsection b above.)
The source code for a work means the preferred form of the work for
making modifications to it. For an executable work, complete source
code means all the source code for all modules it contains, plus any
associated interface definition files, plus the scripts used to
control compilation and installation of the executable. However, as a
special exception, the source code distributed need not include
anything that is normally distributed (in either source or binary
form) with the major components (compiler, kernel, and so on) of the
operating system on which the executable runs, unless that component
itself accompanies the executable.
If distribution of executable or object code is made by offering
access to copy from a designated place, then offering equivalent
access to copy the source code from the same place counts as
distribution of the source code, even though third parties are not
compelled to copy the source along with the object code.
4. You may not copy, modify, sublicense, or distribute the Program
except as expressly provided under this License. Any attempt
otherwise to copy, modify, sublicense or distribute the Program is
void, and will automatically terminate your rights under this License.
However, parties who have received copies, or rights, from you under
this License will not have their licenses terminated so long as such
parties remain in full compliance.
5. You are not required to accept this License, since you have not
signed it. However, nothing else grants you permission to modify or
distribute the Program or its derivative works. These actions are
prohibited by law if you do not accept this License. Therefore, by
modifying or distributing the Program (or any work based on the
Program), you indicate your acceptance of this License to do so, and
all its terms and conditions for copying, distributing or modifying
the Program or works based on it.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the
original licensor to copy, distribute or modify the Program subject to
these terms and conditions. You may not impose any further
restrictions on the recipients' exercise of the rights granted herein.
You are not responsible for enforcing compliance by third parties to
this License.
7. If, as a consequence of a court judgment or allegation of patent
infringement or for any other reason (not limited to patent issues),
conditions are imposed on you (whether by court order, agreement or
otherwise) that contradict the conditions of this License, they do not
excuse you from the conditions of this License. If you cannot
distribute so as to satisfy simultaneously your obligations under this
License and any other pertinent obligations, then as a consequence you
may not distribute the Program at all. For example, if a patent
license would not permit royalty-free redistribution of the Program by
all those who receive copies directly or indirectly through you, then
the only way you could satisfy both it and this License would be to
refrain entirely from distribution of the Program.
If any portion of this section is held invalid or unenforceable under
any particular circumstance, the balance of the section is intended to
apply and the section as a whole is intended to apply in other
circumstances.
It is not the purpose of this section to induce you to infringe any
patents or other property right claims or to contest validity of any
such claims; this section has the sole purpose of protecting the
integrity of the free software distribution system, which is
implemented by public license practices. Many people have made
generous contributions to the wide range of software distributed
through that system in reliance on consistent application of that
system; it is up to the author/donor to decide if he or she is willing
to distribute software through any other system and a licensee cannot
impose that choice.
This section is intended to make thoroughly clear what is believed to
be a consequence of the rest of this License.
8. If the distribution and/or use of the Program is restricted in
certain countries either by patents or by copyrighted interfaces, the
original copyright holder who places the Program under this License
may add an explicit geographical distribution limitation excluding
those countries, so that distribution is permitted only in or among
countries not thus excluded. In such case, this License incorporates
the limitation as if written in the body of this License.
9. The Free Software Foundation may publish revised and/or new versions
of the General Public License from time to time. Such new versions will
be similar in spirit to the present version, but may differ in detail to
address new problems or concerns.
Each version is given a distinguishing version number. If the Program
specifies a version number of this License which applies to it and "any
later version", you have the option of following the terms and conditions
either of that version or of any later version published by the Free
Software Foundation. If the Program does not specify a version number of
this License, you may choose any version ever published by the Free Software
Foundation.
10. If you wish to incorporate parts of the Program into other free
programs whose distribution conditions are different, write to the author
to ask for permission. For software which is copyrighted by the Free
Software Foundation, write to the Free Software Foundation; we sometimes
make exceptions for this. Our decision will be guided by the two goals
of preserving the free status of all derivatives of our free software and
of promoting the sharing and reuse of software generally.
NO WARRANTY
11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS
TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE
PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
REPAIR OR CORRECTION.
12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
POSSIBILITY OF SUCH DAMAGES.
END OF TERMS AND CONDITIONS

2
pip/MANIFEST.in
View File

@ -1,2 +0,0 @@
include irpf90 README.md irpman irp_indent

32
pip/irpf90
View File

@ -1,32 +0,0 @@
#!/usr/bin/env python
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
def main():
import irpf90_libs.irpf90
irpf90_libs.irpf90.main()
main()

32
pip/irpf90_indent
View File

@ -1,32 +0,0 @@
#!/usr/bin/env python
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
def main():
import irpf90_libs.irpf90_indent
irpf90_libs.irpf90_indent.main()
main()

1
pip/irpf90_libs
View File

@ -1 +0,0 @@
../src

64
pip/irpman
View File

@ -1,64 +0,0 @@
#!/bin/bash
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
# Define auto-completion for bash
function run ()
{
cat << EOF | exec python2 - $@
import sys, os
from irpf90_libs.irpf90_t import mandir
filename = sys.argv[1].lower()+".l"
if filename not in os.listdir(mandir):
print "%s does not exist"%(sys.argv[1])
sys.exit(-1)
os.system("man ./"+mandir+sys.argv[1].lower()+".l")
EOF
}
case "$0" in
*irpman)
if [[ -z $1 ]] ; then
echo "To activate auto-completion in bash:"
echo "source " $0
else
run $@
fi
;;
*)
_irpman_complete()
{
local cur
COMPREPLY=()
cur=${COMP_WORDS[COMP_CWORD]}
COMPREPLY=( $(compgen -W "`[[ -f tags ]] && cat tags | cut -d' ' -f 1`" -- "$cur" ) )
} && complete -F _irpman_complete irpman
;;
esac

2
pip/setup.cfg
View File

@ -1,2 +0,0 @@
[metadata]
description-file = README.md

16
pip/setup.py
View File

@ -1,16 +0,0 @@
from distutils.core import setup
setup(
name = 'irpf90',
packages = ['irpf90_libs'], # this must be the same as the name above
version = '1.6.9',
description = 'IRPF90 is a Fortran90 preprocessor written in Python for programming using the Implicit Reference to Parameters (IRP) method. It simplifies the development of large fortran codes in the field of scientific high performance computing.',
author = 'Anthony Scemama',
author_email = 'scemama@irsamc.ups-tlse.fr',
url = 'http://irpf90.ups-tlse.fr', # use the URL to the github repo
download_url = 'https://github.com/scemama/irpf90/archive/v1.6.9.tar.gz', # I'll explain this in a second
keywords = ['programming', 'fortran', 'IRP'], # arbitrary keywords
classifiers = [],
scripts = ["irpf90", "irpman", "irpf90_indent"],
)

6
src/.gitignore vendored
View File

@ -1,6 +0,0 @@
*.o
*.c
*.so
build/*
*~
irpf90.exe

21
src/Makefile
View File

@ -1,21 +0,0 @@
PYTHON=python2
PYVERSION=$(shell $(PYTHON) -c "import sys; print(sys.version[:3])")
HAS_CYTHON=$(shell bash -c "which cython &> /dev/null && echo 1 || echo 0")
ifneq ($(HAS_CYTHON),0)
../bin/irpf90: irpf90.so
rm ../bin/irpf90 ; cd ../bin ; ln -s ../src/irpf90_python.exe irpf90
irpf90.so : $(wildcard *.py) irpf90.c
./cython_setup.py build_ext --inplace
irpf90.c: irpf90.py
cython --embed irpf90.py
else
../bin/irpf90: irpf90_python.exe
rm ../bin/irpf90 ; cd ../bin ; ln -s ../src/irpf90_python.exe irpf90
endif
clean:
rm -f *.c *.so *.pyc *.pyo 2>/dev/null

0
src/__init__.py
View File

73
src/checkpoint.py
View File

@ -1,73 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from irpf90_t import *
from util import *
from variables import variables
from modules import modules
CHECKPOINT_UNIT_NUMBER=63
FILENAME=irpdir+'irp_checkpoint.irp.F90'
def create():
out_write = [ "subroutine irp_checkpoint_write" ]
l = variables.keys()
l.sort
main_modules = filter(lambda x: modules[x].is_main, modules)
for m in filter(lambda x: not modules[x].is_main, modules):
out_write += [ " use %s"%(modules[m].name) ]
out_write += [ " implicit none" ]
out_write += [ " integer, parameter :: iunit = %d"%(CHECKPOINT_UNIT_NUMBER) ]
out_write += [ " open(unit=%d,file='irp_checkpoint.dat',status='UNKNOWN',action='WRITE')"%(CHECKPOINT_UNIT_NUMBER) ]
for v in l:
var = variables[v]
if var.is_main:
out_write += [ " if (%s_is_built) then"%(v) ]
for w in [v]+var.others:
d = variables[w].dim
if d == []:
out_write += [ " write(iunit,*) '%s', 0"%(w) ]
else:
out_write += [ " write(iunit, *) '%s', %d"%(w, len(d)),
" write(iunit, *) %s"%(",".join(
[ "size(%s,%d)"%(w,i+1) for i in range(len(d)) ] ))
]
out_write += [ " write(iunit,*) %s"%(w) ]
out_write += [ " endif" ]
out_write += [ " close(%d)"%(CHECKPOINT_UNIT_NUMBER) ]
out_write += [ "end" ]
out = '\n'.join(out_write)
if not same_file(FILENAME,out):
file = open(FILENAME,'w')
file.writelines(out)
file.close()
if __name__ == '__main__':
create()

70
src/codelet.py
View File

@ -1,70 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from command_line import command_line
import irpf90_t
def run():
template = """
program codelet_%(name)s
implicit none
integer :: i
double precision :: ticks_0, ticks_1, cpu_0, cpu_1
integer, parameter :: irp_imax = %(NMAX)d
%(precondition)s
call provide_%(name)s
double precision :: irp_rdtsc
call cpu_time(cpu_0)
ticks_0 = irp_rdtsc()
do i=1,irp_imax
call bld_%(name)s
enddo
ticks_1 = irp_rdtsc()
call cpu_time(cpu_1)
print *, '%(name)s'
print *, '-----------'
print *, 'Cycles:'
print *, (ticks_1-ticks_0)/dble(irp_imax)
print *, 'Seconds:'
print *, (cpu_1-cpu_0)/dble(irp_imax)
end
"""
name, NMAX, precondition, filename = command_line.codelet
if precondition is None:
precondition = ""
else:
precondition = "PROVIDE "+precondition
file = open(filename,'w')
file.write(template%locals())
file.close()

282
src/command_line.py
View File

@ -1,282 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import getopt, sys
from version import version
import re
description = "IRPF90 Fortran preprocessor."
options = {}
options['a'] = [ 'assert' , 'Activates ASSERT statements. If absent, remove ASSERT statements.', 0 ]
options['c'] = [ 'codelet' , 'entity:NMAX or entity:precondition:NMAX : Generate a codelet to profile a provider running NMAX times', 1 ]
options['C'] = [ 'coarray' , 'All providers are coarrays', 0 ]
options['d'] = [ 'debug' , 'Activates debug. The name of the current subroutine/function/provider will be printed on the standard output when entering or exiting a routine, as well as the CPU time passed inside the routine.', 0 ]
options['D'] = [ 'define' , 'Defines a variable identified by the IRP_IF statements.', 1 ]
options['g'] = [ 'profile' , 'Activates profiling of the code.', 0 ]
options['h'] = [ 'help' , 'Print this help', 0 ]
options['I'] = [ 'include' , 'Include directory', 1 ]
options['j'] = [ 'ninja' , 'Use Ninja instead of make', 0 ]
options['i'] = [ 'init' , 'Initialize current directory. Creates a default Makefile and the temporary working directories.', 0 ]
options['l'] = [ 'align' , 'Align arrays using compiler directives and sets the $IRP_ALIGN variable. For example, --align=32 aligns all arrays on a 32 byte boundary.', 1 ]
options['m'] = [ 'memory' , 'Print memory allocations/deallocations.', 0 ]
options['n'] = [ 'inline' , '<all|providers|builders> : Force inlining of providers or builders', 1 ]
options['o'] = [ 'checkopt' , 'Shows where optimization may be required', 0 ]
options['p'] = [ 'preprocess' , 'Prints a preprocessed file to standard output. Useful for debugging files containing shell scripts.', 1 ]
options['r'] = [ 'no_directives', 'Ignore all compiler directives !DEC$ and !DIR$', 0 ]
options['s'] = [ 'substitute' , 'Substitute values in do loops for generating specific optimized code.', 1 ]
options['t'] = [ 'touch' , 'Display which entities are touched when touching the variable given as an argument.', 1 ]
options['v'] = [ 'version' , 'Prints version of irpf90', 0 ]
options['w'] = [ 'warnings' , 'Activate Warnings', 0 ]
options['z'] = [ 'openmp' , 'Activate for OpenMP code', 0 ]
class CommandLine(object):
def __init__(self):
global options
self._opts = None
self.argv = list(sys.argv)
self.executable_name = self.argv[0]
def defined(self):
if '_defined' not in self.__dict__:
self._defined = []
for o,a in self.opts:
if o in [ "-D", '--'+options['D'][0] ]:
self._defined.append(a)
return self._defined
defined = property(fget=defined)
def include_dir(self):
if '_include_dir' not in self.__dict__:
self._include_dir = []
for o,a in self.opts:
if o in [ "-I", '--'+options['I'][0] ]:
if len(a) < 1:
print "Error: -I option needs a directory"
if a[-1] != '/':
a = a+'/'
self._include_dir.append(a)
return self._include_dir
include_dir = property(fget=include_dir)
def inline(self):
if '_inline' not in self.__dict__:
self._inline = ""
for o,a in self.opts:
if o in [ "-n", '--'+options['n'][0] ]:
self._inline = a
break
return self._inline
inline = property(fget=inline)
def substituted(self):
if '_substituted' not in self.__dict__:
self._substituted = {}
for o,a in self.opts:
if o in [ "-s", '--'+options['s'][0] ]:
k, v = a.split(':')
v_re = re.compile(r"(\W)(%s)(\W.*$|$)"%k.strip())
self._substituted[k] = [v, v_re]
return self._substituted
substituted = property(fget=substituted)
def codelet(self):
if '_codelet' not in self.__dict__:
self._codelet = []
for o,a in self.opts:
if o in [ "-c", '--'+options['c'][0] ]:
buffer = a.split(':')
filename = 'codelet_'+buffer[0]+'.irp.f'
if len(buffer) == 2:
self._codelet = [buffer[0], int(buffer[1]), None, filename]
elif len(buffer) == 3:
self._codelet = [buffer[0], int(buffer[2]), buffer[1], filename]
else:
print """
Error in codelet definition. Use:
--codelet=provider:NMAX
or
--codelet=provider:precondition:NMAX
"""
sys.exit(1)
return self._codelet
codelet = property(fget=codelet)
def preprocessed(self):
if '_preprocessed' not in self.__dict__:
self._preprocessed = []
for o,a in self.opts:
if o in [ "-p", '--'+options['p'][0] ]:
self._preprocessed.append(a)
return self._preprocessed
preprocessed = property(fget=preprocessed)
def touched(self):
if '_touched' not in self.__dict__:
self._touched = []
for o,a in self.opts:
if o in [ "-t", '--'+options['t'][0] ]:
self._touched.append(a.lower())
return self._touched
touched = property(fget=touched)
def align(self):
if '_align' not in self.__dict__:
self._align = '1'
for o,a in self.opts:
if o in [ "-l", '--'+options['l'][0] ]:
self._align = a
return self._align
align = property(fget=align)
def coarray(self):
if '_coarray' not in self.__dict__:
self._coarray = False
for o,a in self.opts:
if o in [ "-C", '--'+options['C'][0] ]:
self._coarray = True
return self._coarray
coarray = property(fget=coarray)
def warnings(self):
if '_warnings' not in self.__dict__:
self._warnings= False
for o,a in self.opts:
if o in [ "-w", '--'+options['w'][0] ]:
self._warnings= True
return self._warnings
do_warnings = property(fget=warnings)
def openmp(self):
if '_openmp' not in self.__dict__:
self._openmp = False
for o,a in self.opts:
if o in [ "-z", '--'+options['z'][0] ]:
self._openmp = True
return self._openmp
do_openmp = property(fget=openmp)
def ninja(self):
if '_ninja' not in self.__dict__:
self._ninja = False
for o,a in self.opts:
if o in [ "-j", '--'+options['j'][0] ]:
self._ninja = True
return self._ninja
do_ninja = property(fget=ninja)
def directives(self):
if '_directives' not in self.__dict__:
self._directives = True
for o,a in self.opts:
if o in [ "-r", '--'+options['r'][0] ]:
self._directives = False
return self._directives
directives = property(fget=directives)
def usage(self):
t = """
$EXE - $DESCR
Usage:
$EXE [OPTION]
Options:
"""
t = t.replace("$EXE",self.executable_name)
t = t.replace("$DESCR",description)
print t
print_options()
print ""
print "Version : ", version
print ""
def opts(self):
if self._opts is None:
optlist = ["",[]]
for o in options:
b = [o]+options[o]
if b[3] == 1:
b[0] = b[0]+":"
b[1] = b[1]+"="
optlist[0] += b[0]
optlist[1] += [b[1]]
try:
self._opts, args = getopt.getopt(self.argv[1:], optlist[0], optlist[1])
except getopt.GetoptError, err:
# print help information and exit:
self.usage()
print str(err) # will print something like "option -a not recognized"
sys.exit(2)
return self._opts
opts = property(fget=opts)
t = """
def do_$LONG(self):
if '_do_$LONG' not in self.__dict__:
self._do_$LONG = False
for o,a in self.opts:
if o in ("-$SHORT", "--$LONG"):
self._do_$LONG = True
break
return self._do_$LONG
do_$LONG = property(fget=do_$LONG)
"""
for short in options:
long = options[short][0]
exec t.replace("$LONG",long).replace("$SHORT",short) #in locals()
def do_run(self):
if '_do_run' not in self.__dict__:
self._do_run = not ( \
self.do_version or \
self.do_help or \
self.do_preprocess or \
self.do_touch or \
self.do_init )
return self._do_run
do_run = property(fget=do_run)
command_line = CommandLine()
def print_options():
keys = options.keys()
keys.sort()
import subprocess
for k in keys:
description = options[k][1]
p1 = subprocess.Popen(["fold", "-s", "-w", "40"],stdout=subprocess.PIPE,stdin=subprocess.PIPE)
description = p1.communicate(description)[0]
description = description.replace('\n','\n'.ljust(27))
print ("-%s, --%s"%(k,options[k][0])).ljust(25), description+'\n'
print "\n"
if __name__ == '__main__':
print_options()

189
src/create_man.py
View File

@ -1,189 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from variable import Variable
from variables import variables
from subroutine import Sub
from subroutines import subroutines
from irpf90_t import *
from util import *
def do_print_short(file,var):
assert type(var) == Variable
print >>file, "%s : %s :: %s %s"%( \
var.line.filename[0].ljust(35),
var.type.ljust(30),
var.name.ljust(25),
build_dim(var.dim) )
######################################################################
def process_doc(file,line):
assert type(line) == str
line = line.strip()
if line == "":
line = ".br"
print >>file, line
######################################################################
def process_deps(file,l):
assert type(l) == list
for v in l:
print >>file, "%s\n.br"%(v,)
######################################################################
def process_types(file,var):
assert type(var) == Variable
vars = [var.name] + var.others
for var in vars:
name = var
var = variables[var]
Type = var.type
dim = build_dim(var.dim)
print >>file, "%s\t:: %s\t%s"%(Type,name,dim)
######################################################################
def do_print(var):
assert type(var) == Variable
filename = var.line.filename[0]
name = var.name
file = open("%s%s.l"%(mandir,var.name), "w")
print >>file, '.TH "IRPF90 entities" l %s "IRPF90 entities" %s'%(name,name)
if var.same_as != var.name:
var = variables[var.same_as]
print >>file, ".SH Declaration"
print >>file, ".nf"
process_types(file,var)
print >>file, ".ni"
if var.doc != []:
print >>file, ".SH Description"
for l in var.doc:
process_doc(file,l)
print >>file, ".SH File\n.P"
print >>file, filename
if var.needs != []:
var.needs.sort()
print >>file, ".SH Needs"
process_deps(file,var.needs)
if var.needed_by != []:
var.needed_by.sort()
print >>file, ".SH Needed by"
process_deps(file,var.needed_by)
print >>file, ".SH Instability factor"
fo = len(var.children)
fi = len(var.parents)
print >>file, "%5.1f %%"%(100.* (fi / (fi+fo+.000001) ))
print >>file, ".br"
file.close()
######################################################################
def process_declaration_subroutine(file, sub):
print >>file, sub.line.text.split('!')[0].strip()
# for line in sub.text:
######################################################################
def do_print_subroutines(sub):
assert type(sub) == Sub
filename = sub.line.filename
name = sub.name
file = open("%s%s.l"%(mandir,sub.name), "w")
print >>file, '.TH "IRPF90 entities" l %s "IRPF90 entities" %s'%(name,name)
print >>file, ".SH Declaration"
print >>file, ".nf"
process_declaration_subroutine(file,sub)
print >>file, ".ni"
if sub.doc != []:
print >>file, ".SH Description"
for l in sub.doc:
process_doc(file,l)
print >>file, ".SH File\n.P"
print >>file, filename
if sub.needs != []:
sub.needs.sort()
print >>file, ".SH Needs"
process_deps(file,sub.needs)
if sub.called_by != []:
sub.called_by.sort()
print >>file, ".SH Called by"
process_deps(file,sub.called_by)
if sub.calls != []:
sub.calls.sort()
print >>file, ".SH Calls"
process_deps(file,sub.calls)
if sub.touches != []:
sub.touches.sort()
print >>file, ".SH Touches"
process_deps(file,sub.touches)
print >>file, ".SH Instability factor"
fo = len(sub.needs)+len(sub.calls)+len(sub.touches)
fi = len(sub.called_by)
print >>file, "%5.1f %%"%(100.* (fi / (fi+fo+.000001) ))
print >>file, ".br"
file.close()
######################################################################
def run():
import parsed_text
import os,sys
pid1 = os.fork()
if pid1 == 0:
for v in variables.values():
do_print(v)
for s in subroutines.values():
do_print_subroutines(s)
sys.exit(0)
pid2 = os.fork()
if pid2 == 0:
tags = []
l = variables.keys()
file = open("irpf90_entities","w")
l.sort()
for v in l:
do_print_short(file,variables[v])
line = variables[v].line
# tags.append( '%s\t%s\t/%s/;"\n'%(v,line.filename[0],line.text.split('!')[0].strip()) )
tags.append( '%s\t%s\t%d\n'%(v,line.filename[0],line.i) )
file.close()
l = subroutines.keys()
for v in l:
line = subroutines[v].line
# tags.append('%s\t%s\t/%s/;"\n'%(v,line.filename,line.text.split('!')[0].strip()))
tags.append('%s\t%s\t%d\n'%(v,line.filename,line.i))
tags.sort()
file = open("tags","w")
for line in tags:
file.write(line)
file.close()
sys.exit(0)
os.waitpid(pid1,0)
os.waitpid(pid2,0)
######################################################################
if __name__ == '__main__':
run()

52
src/cython_setup.py
View File

@ -1,52 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from distutils.core import setup
from distutils.extension import Extension
from Cython.Distutils import build_ext
import os
to_remove = """__init__.py cython_setup.py version.py command_line.py""".split()
ext_modules = []
files = os.listdir('.')
for file in to_remove:
files.remove(file)
for file in files:
if file.endswith(".py"):
module = file.split('.')[0]
ext_modules += [ Extension(module,[file]) ]
setup(
name = 'IRPF90 extensions',
cmdclass = {'build_ext': build_ext},
ext_modules = ext_modules
)

66
src/error.py
View File

@ -1,66 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import sys
from irpf90_t import *
from command_line import command_line
do_warnings = command_line.do_warnings
######################################################################
def fail(line,message):
print """
Error:
-----
"""
print message, '\n'
if line is not None:
assert isinstance(line,Line)
print "file %s ; line %d :\n %s"%(line.filename,line.i,line.text)
sys.exit(1)
######################################################################
def warn(line,message):
if not command_line.do_warnings:
return
if line is not None:
assert isinstance(line,Line)
print """
Warning:
-------
"""
print message, '\n'
print "file %s, line %d:\n %s"%(line.filename,line.i,line.text)
else:
print "Warning: %s"%(message)
######################################################################
if __name__ == '__main__':
line = Empty_line(3,"empty", "testfile")
fail(line, "Message")

89
src/init.py
View File

@ -1,89 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import os
import util
import makefile
import irpf90_t
from command_line import command_line
initialized = False
def init():
global initialized
if initialized:
return
# Create directories
for dir in [ irpf90_t.irpdir, irpf90_t.mandir ]:
try:
wd = os.getcwd()
os.chdir(dir)
os.chdir(wd)
except OSError:
os.mkdir(dir)
for dir in command_line.include_dir:
dir = irpf90_t.irpdir+dir
try:
wd = os.getcwd()
os.chdir(dir)
os.chdir(wd)
except OSError:
os.mkdir(dir)
# Create makefile
makefile.create()
# Copy current files in the irpdir
for dir in ['./']+command_line.include_dir:
try:
os.stat(dir)
except:
print dir,'not in dir'
continue
for filename in os.listdir(dir):
filename = dir+filename
if not filename.startswith(".") and not os.path.isdir(filename):
try:
file = open(filename,"r")
except IOError:
if command_line.do_warnings:
print "Warning : Unable to read file %s."%(filename)
else:
buffer = file.read()
file.close()
if not util.same_file(irpf90_t.irpdir+filename,buffer):
file = open(irpf90_t.irpdir+filename,"w")
file.write(buffer)
file.close()
initialized = True

264
src/irp_stack.py
View File

@ -1,264 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import util
from command_line import command_line
do_debug = command_line.do_debug
do_openmp = command_line.do_openmp
do_memory = command_line.do_memory
import irpf90_t
FILENAME = irpf90_t.irpdir+"irp_stack.irp.F90"
def create():
txt = """
module irp_stack_mod
integer, parameter :: STACKMAX=1000
character*(128),allocatable :: irp_stack(:,:)
double precision,allocatable :: irp_cpu(:,:)
integer,allocatable :: stack_index(:)
logical :: alloc = .False.
integer :: nthread
character*(128) :: white = ''
end module
subroutine irp_enter(irp_where)
use irp_stack_mod
integer :: ithread
character*(*) :: irp_where
"""
if not do_openmp:
txt += """
ithread = 0
"""
else:
txt += """
integer, external :: omp_get_thread_num
integer, external :: omp_get_num_threads
ithread = omp_get_thread_num()
"""
txt += "$1"
if do_memory:
txt+="""
if (.not.alloc) then
"""
if do_openmp:
txt += """
!$OMP PARALLEL
!$OMP SINGLE
nthread = omp_get_num_threads()
!$OMP END SINGLE
!$OMP END PARALLEL
"""
else:
txt += """
nthread = 1
"""
txt += """
print *, 'Allocating irp_stack(',STACKMAX,',',0:nthread,')'
print *, 'Allocating irp_cpu(',STACKMAX,',',0:nthread,')'
print *, 'Allocating stack_index(',0:nthread,')'
endif"""
txt +="""
$2
end subroutine
subroutine irp_enter_f(irp_where)
use irp_stack_mod
integer :: ithread
character*(*) :: irp_where
"""
if do_openmp:
txt += """
integer, external :: omp_get_thread_num
integer, external :: omp_get_num_threads
ithread = omp_get_thread_num()
"""
else:
txt += """
ithread = 0
"""
txt += """
$1
"""
if do_memory:
txt+="""
if (.not.alloc) then
"""
if do_openmp:
txt += """
!$OMP PARALLEL
!$OMP SINGLE
nthread = omp_get_num_threads()
!$OMP END SINGLE
!$OMP END PARALLEL
"""
else:
txt += """
nthread = 1
"""
txt +="""
print *, 'Allocating irp_stack(',STACKMAX,',',0:nthread,')'
print *, 'Allocating irp_cpu(',STACKMAX,',',0:nthread,')'
print *, 'Allocating stack_index(',0:nthread,')'
endif
"""
txt += """
$2
end subroutine
subroutine irp_leave (irp_where)
use irp_stack_mod
character*(*) :: irp_where
integer :: ithread
double precision :: cpu
"""
if do_openmp:
txt += """
integer, external :: omp_get_thread_num
ithread = omp_get_thread_num()
"""
else:
txt += """
ithread = 0
"""
txt += """
$3
$4
end subroutine
"""
# $1
if do_debug:
s = """
if (.not.alloc) then
"""
if do_openmp:
s += """
!$OMP PARALLEL
!$OMP SINGLE
nthread = omp_get_num_threads()
!$OMP END SINGLE
!$OMP END PARALLEL
!$OMP CRITICAL
if (.not.alloc) then
allocate(irp_stack(0:STACKMAX,0:nthread))
allocate(irp_cpu(0:STACKMAX,0:nthread))
allocate(stack_index(0:nthread))
stack_index = 0
alloc = .True.
endif
!$OMP END CRITICAL
endif
stack_index(ithread) = min(stack_index(ithread)+1,STACKMAX)
irp_stack(stack_index(ithread),ithread) = irp_where"""
else:
s += """
nthread = 1
if (.not.alloc) then
allocate(irp_stack(0:STACKMAX,1))
allocate(irp_cpu(0:STACKMAX,1))
allocate(stack_index(2))
stack_index = 0
alloc = .True.
endif
endif
stack_index(1) = min(stack_index(1)+1,STACKMAX)
irp_stack(stack_index(1),1) = irp_where"""
if do_memory:
txt+="""
print *, 'Allocating irp_stack(',STACKMAX,','0:nthread,')'
print *, 'Allocating irp_cpu(',STACKMAX,','0:nthread,')'
print *, 'Allocating stack_index(',0:nthread,')'"""
else:
s = ""
txt = txt.replace("$1",s)
# $2
if do_debug:
txt = txt.replace("$2","""
print *, ithread, ':', white(1:stack_index(ithread))//'-> ', trim(irp_where)
call cpu_time(irp_cpu(stack_index(ithread),ithread))""")
else:
txt = txt.replace("$2","")
# $3
if do_debug:
txt = txt.replace("$3","""
call cpu_time(cpu)
print *, ithread, ':', white(1:stack_index(ithread))//'<- ', &
trim(irp_stack(stack_index(ithread),ithread)), &
cpu-irp_cpu(stack_index(ithread),ithread)""")
else:
txt = txt.replace("$3","")
# $4
if do_debug:
txt = txt.replace("$4","""
stack_index(ithread) = max(0,stack_index(ithread)-1)""")
else:
txt = txt.replace("$4","")
txt += """
subroutine irp_trace
use irp_stack_mod
integer :: ithread
integer :: i
"""
if do_openmp:
txt += """
!$ integer, external :: omp_get_thread_num
!$ ithread = omp_get_thread_num()
"""
else:
txt += """
ithread = 0
"""
txt += """
if (.not.alloc) return
print *, 'Stack trace: ', ithread
print *, '-------------------------'
do i=1,stack_index(ithread)
print *, trim(irp_stack(i,ithread))
enddo
print *, '-------------------------'
end subroutine
"""
txt = txt.split('\n')
txt = map(lambda x: x+"\n",txt)
if not util.same_file(FILENAME, txt):
file = open(FILENAME,'w')
file.writelines(txt)
file.close()

119
src/irpf90.py
View File

@ -1,119 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import vim
import os,sys
try:
wd = os.path.abspath(os.path.dirname(__file__))
sys.path.insert(0,(wd+"/../src/"))
except:
pass
sys.setcheckinterval(1000)
from command_line import command_line
def main():
vim.install()
if command_line.do_help:
command_line.usage()
if command_line.do_version:
from version import version
print version
from init import init
if command_line.do_init:
init()
if command_line.do_preprocess:
init()
from preprocessed_text import preprocessed_text
for filename,text in preprocessed_text:
if filename in command_line.preprocessed:
for line in text:
print line.text
if command_line.do_touch:
from variables import variables
for var in command_line.touched:
if var not in variables:
print "%s is not an IRP entity"%(var,)
else:
print "Touching %s invalidates the following entities:"%(var,)
parents = variables[var].parents
parents.sort()
for x in parents:
print "- %s"%(x,)
if not command_line.do_run:
return
init()
import irp_stack
irp_stack.create()
import makefile
makefile.create()
if command_line.do_codelet:
import profile
profile.build_rdtsc()
import codelet
codelet.run()
from modules import modules, write_module
for m in modules.keys():
write_module(modules[m])
makefile.run()
import touches
touches.create()
# import checkpoint
# checkpoint.create()
import create_man
create_man.run()
if command_line.do_profile:
import profile
profile.run()
if command_line.do_openmp:
import locks
locks.create()
if __name__ == '__main__':
main()

492
src/irpf90.vim
View File

@ -1,492 +0,0 @@
" Vim syntax file
" Language: IRPF90
" Version: 0.1
" URL:
" Last Change: 2011 Nov. 9
" Maintainer:
" Usage: Do :help irpf90-syntax from Vim
" Credits:
" Version 0.1 was based on the fortran 95 syntax file by Ajit J. Thakkar
if version < 600
let b:current_syntax = "fortran"
finish
elseif exists("b:current_syntax")
finish
endif
let b:current_syntax = "irpf90"
syn case ignore
syn match irpf90Identifier "\<\a\w*\>" contains=irpf90SerialNumber
syn match irpf90ConstructName "^\s*\zs\a\w*\ze\s*:"
syn match irpf90ConstructName "\(\<end\s*do\s\+\)\@<=\a\w*"
syn match irpf90ConstructName "\(\<end\s*if\s\+\)\@<=\a\w*"
syn match irpf90ConstructName "\(\<end\s*select\s\+\)\@<=\a\w*"
syn match irpf90UnitHeader "^\s*end\s*$"
syn match irpf90UnitHeader "^\s*end/>"
syn keyword irpf90Type character complex integer
syn keyword irpf90Type intrinsic
syn match irpf90Type "\<implicit\>"
syn keyword irpf90Structure dimension
syn keyword irpf90StorageClass parameter save
syn match irpf90UnitHeader "\<subroutine\>"
syn keyword irpf90Call call
syn match irpf90UnitHeader "\<function\>"
syn match irpf90UnitHeader "\<program\>"
syn keyword irpf90Statement return stop
syn keyword irpf90Conditional else then
syn match irpf90Conditional "\<if\>"
syn match irpf90Repeat "\<do\>"
syn keyword irpf90Todo contained todo fixme
"Catch errors caused by too many right parentheses
syn region irpf90Paren transparent start="(" end=")" contains=ALLBUT,irpf90ParenError,@irpf90CommentGroup,cIncluded
syn match irpf90ParenError ")"
syn match irpf90Operator "\.\s*n\=eqv\s*\."
syn match irpf90Operator "\.\s*\(and\|or\|not\)\s*\."
syn match irpf90Operator "\(+\|-\|/\|\*\)"
syn match irpf90Boolean "\.\s*\(true\|false\)\s*\."
syn keyword irpf90ReadWrite backspace close inquire open rewind endfile
syn keyword irpf90ReadWrite read write print
"If tabs are allowed then the left margin checks do not work
if exists("irpf90_have_tabs")
syn match irpf90Tab "\t" transparent
else
syn match irpf90Tab "\t"
endif
syn keyword irpf90IO unit file iostat access blank fmt form
syn keyword irpf90IO recl status exist opened number named name
syn keyword irpf90IO sequential direct rec
syn keyword irpf90IO formatted unformatted nextrec
syn keyword irpf9066Intrinsic cabs ccos cexp clog csin csqrt
syn keyword irpf9066Intrinsic dacos dasin datan datan2 dcos dcosh
syn keyword irpf9066Intrinsic ddim dexp dint dlog dlog10 dmod dabs
syn keyword irpf9066Intrinsic dnint dsign dsin dsinh dsqrt dtan
syn keyword irpf9066Intrinsic dtanh iabs idim idnint isign idint ifix
syn keyword irpf9066Intrinsic amax0 amax1 dmax1 max0 max1
syn keyword irpf9066Intrinsic amin0 amin1 dmin1 min0 min1
syn keyword irpf9066Intrinsic amod float sngl alog alog10
" Intrinsics provided by some vendors
syn keyword irpf90ExtraIntrinsic cdabs cdcos cdexp cdlog cdsin cdsqrt
syn keyword irpf90ExtraIntrinsic cqabs cqcos cqexp cqlog cqsin cqsqrt
syn keyword irpf90ExtraIntrinsic qacos qasin qatan qatan2 qcos qcosh
syn keyword irpf90ExtraIntrinsic qdim qexp iqint qlog qlog10 qmod qabs
syn keyword irpf90ExtraIntrinsic qnint qsign qsin qsinh qsqrt qtan
syn keyword irpf90ExtraIntrinsic qtanh qmax1 qmin1
syn keyword irpf90ExtraIntrinsic dimag qimag dcmplx qcmplx dconjg qconjg
syn keyword irpf90ExtraIntrinsic gamma dgamma qgamma algama dlgama qlgama
syn keyword irpf90ExtraIntrinsic erf derf qerf erfc derfc qerfc
syn keyword irpf90ExtraIntrinsic dfloat
syn keyword irpf90Intrinsic abs acos aimag aint anint asin atan atan2
syn keyword irpf90Intrinsic cos sin tan sinh cosh tanh exp log log10
syn keyword irpf90Intrinsic sign sqrt int cmplx nint min max conjg
syn keyword irpf90Intrinsic char ichar index
syn match irpf90Intrinsic "\<len\s*[(,]"me=s+3
syn match irpf90Intrinsic "\<real\s*("me=s+4
syn match irpf90Type "\<implicit\s\+real"
syn match irpf90Type "^\s*real\>"
syn match irpf90Intrinsic "\<logical\s*("me=s+7
syn match irpf90Type "\<implicit\s\+logical"
syn match irpf90Type "^\s*logical\>"
"Numbers of various sorts
" Integers
syn match irpf90Number display "\<\d\+\(_\a\w*\)\=\>"
" floating point number, without a decimal point
syn match irpf90FloatNoDec display "\<\d\+[deq][-+]\=\d\+\(_\a\w*\)\=\>"
" floating point number, starting with a decimal point
syn match irpf90FloatIniDec display "\.\d\+\([deq][-+]\=\d\+\)\=\(_\a\w*\)\=\>"
" floating point number, no digits after decimal
syn match irpf90FloatEndDec display "\<\d\+\.\([deq][-+]\=\d\+\)\=\(_\a\w*\)\=\>"
" floating point number, D or Q exponents
syn match irpf90FloatDExp display "\<\d\+\.\d\+\([dq][-+]\=\d\+\)\=\(_\a\w*\)\=\>"
" floating point number
syn match irpf90Float display "\<\d\+\.\d\+\(e[-+]\=\d\+\)\=\(_\a\w*\)\=\>"
" Numbers in formats
syn match irpf90FormatSpec display "\d*f\d\+\.\d\+"
syn match irpf90FormatSpec display "\d*e[sn]\=\d\+\.\d\+\(e\d+\>\)\="
syn match irpf90FormatSpec display "\d*\(d\|q\|g\)\d\+\.\d\+\(e\d+\)\="
syn match irpf90FormatSpec display "\d\+x\>"
" The next match cannot be used because it would pick up identifiers as well
" syn match irpf90FormatSpec display "\<\(a\|i\)\d\+"
" Numbers as labels
syn match irpf90LabelNumber display "^\d\{1,5}\s"me=e-1
syn match irpf90LabelNumber display "^ \d\{1,4}\s"ms=s+1,me=e-1
syn match irpf90LabelNumber display "^ \d\{1,3}\s"ms=s+2,me=e-1
syn match irpf90LabelNumber display "^ \d\d\=\s"ms=s+3,me=e-1
syn match irpf90LabelNumber display "^ \d\s"ms=s+4,me=e-1
if version >= 600 && exists("irpf90_more_precise")
" Numbers as targets
syn match irpf90Target display "\(\<if\s*(.\+)\s*\)\@<=\(\d\+\s*,\s*\)\{2}\d\+\>"
syn match irpf90Target display "\(\<do\s\+\)\@<=\d\+\>"
syn match irpf90Target display "\(\<go\s*to\s*(\=\)\@<=\(\d\+\s*,\s*\)*\d\+\>"
endif
syn keyword irpf90TypeEx external
syn keyword irpf90IOEx format
syn keyword irpf90StatementEx continue
syn match irpf90StatementEx "\<go\s*to\>"
syn region irpf90StringEx start=+'+ end=+'+ contains=irpf90ContinueMark,irpf90LeftMargin,irpf90SerialNumber
syn keyword irpf90IntrinsicEx dim lge lgt lle llt mod
syn keyword irpf90StatementOb assign pause to
syn keyword irpf90Type type none
syn keyword irpf90Structure private public intent optional
syn keyword irpf90Structure pointer target allocatable
syn keyword irpf90StorageClass in out
syn match irpf90StorageClass "\<kind\s*="me=s+4
syn match irpf90StorageClass "\<len\s*="me=s+3
syn match irpf90UnitHeader "\<module\>"
syn keyword irpf90UnitHeader use only contains
syn keyword irpf90UnitHeader result operator assignment
syn match irpf90UnitHeader "\<interface\>"
syn match irpf90UnitHeader "\<recursive\>"
syn keyword irpf90Statement allocate deallocate nullify cycle exit
syn match irpf90Conditional "\<select\>"
syn keyword irpf90Conditional case default where elsewhere
syn match irpf90Operator "\(\(>\|<\)=\=\|==\|/=\|=\)"
syn match irpf90Operator "=>"
syn region irpf90String start=+"+ end=+"+ contains=irpf90LeftMargin,irpf90ContinueMark,irpf90SerialNumber
syn keyword irpf90IO pad position action delim readwrite
syn keyword irpf90IO eor advance nml
syn keyword irpf90Intrinsic adjustl adjustr all allocated any
syn keyword irpf90Intrinsic associated bit_size btest ceiling
syn keyword irpf90Intrinsic count cshift date_and_time
syn keyword irpf90Intrinsic digits dot_product eoshift epsilon exponent
syn keyword irpf90Intrinsic floor fraction huge iand ibclr ibits ibset ieor
syn keyword irpf90Intrinsic ior ishft ishftc lbound len_trim
syn keyword irpf90Intrinsic matmul maxexponent maxloc maxval merge
syn keyword irpf90Intrinsic minexponent minloc minval modulo mvbits nearest
syn keyword irpf90Intrinsic pack present product radix random_number
syn match irpf90Intrinsic "\<not\>\(\s*\.\)\@!"me=s+3
syn keyword irpf90Intrinsic random_seed range repeat reshape rrspacing scale
syn keyword irpf90Intrinsic selected_int_kind selected_real_kind scan
syn keyword irpf90Intrinsic shape size spacing spread set_exponent
syn keyword irpf90Intrinsic tiny transpose trim ubound unpack verify
syn keyword irpf90Intrinsic precision sum system_clock
syn match irpf90Intrinsic "\<kind\>\s*[(,]"me=s+4
syn match irpf90UnitHeader "\<end\s*function"
syn match irpf90UnitHeader "\<end\s*interface"
syn match irpf90UnitHeader "\<end\s*module"
syn match irpf90UnitHeader "\<end\s*program"
syn match irpf90UnitHeader "\<end\s*subroutine"
syn match irpf90Repeat "\<end\s*do"
syn match irpf90Conditional "\<end\s*where"
syn match irpf90Conditional "\<select\s*case"
syn match irpf90Conditional "\<end\s*select"
syn match irpf90Type "\<end\s*type"
syn match irpf90Type "\<in\s*out"
syn keyword irpf90UnitHeaderEx procedure
syn keyword irpf90IOEx namelist
syn keyword irpf90ConditionalEx while
syn keyword irpf90IntrinsicEx achar iachar transfer
syn keyword irpf90Include include
syn keyword irpf90StorageClassR sequence
syn match irpf90Conditional "\<end\s*if"
syn match irpf90IO contains=irpf90Operator "\<e\(nd\|rr\)\s*=\s*\d\+"
syn match irpf90Conditional "\<else\s*if"
syn keyword irpf90UnitHeaderR entry
syn match irpf90TypeR display "double\s\+precision"
syn match irpf90TypeR display "double\s\+complex"
syn match irpf90UnitHeaderR display "block\s\+data"
syn keyword irpf90StorageClassR common equivalence data
syn keyword irpf90IntrinsicR dble dprod
syn match irpf90OperatorR "\.\s*[gl][et]\s*\."
syn match irpf90OperatorR "\.\s*\(eq\|ne\)\s*\."
syn keyword irpf90Repeat forall
syn match irpf90Repeat "\<end\s*forall"
syn keyword irpf90Intrinsic null cpu_time
syn match irpf90Type "\<elemental\>"
syn match irpf90Type "\<pure\>"
syn match irpf90ConstructName "\(\<end\s*forall\s\+\)\@<=\a\w*\>"
syn cluster irpf90CommentGroup contains=irpf90Todo
syn match irpf90ContinueMark display "&"
syn match irpf90Comment excludenl "!.*$" contains=@irpf90CommentGroup
"cpp is often used with irpf90
syn match cPreProc "^\s*#\s*\(define\|ifdef\)\>.*"
syn match cPreProc "^\s*#\s*\(elif\|if\)\>.*"
syn match cPreProc "^\s*#\s*\(ifndef\|undef\)\>.*"
syn match cPreCondit "^\s*#\s*\(else\|endif\)\>.*"
syn region cIncluded contained start=+"[^(]+ skip=+\\\\\|\\"+ end=+"+ contains=irpf90LeftMargin,irpf90ContinueMark,irpf90SerialNumber
syn match cIncluded contained "<[^>]*>"
syn match cInclude "^\s*#\s*include\>\s*["<]" contains=cIncluded
"Synchronising limits assume that comment and continuation lines are not mixed
syn sync linecont "&" maxlines=40
""""IRPF90 specific
syn match irpf90UnitHeader "^\s*begin_shell\s*"
syn match irpf90UnitHeader "^\s*end_shell\s*$"
syn match irpf90UnitHeader "^\s*begin_template\s*"
syn match irpf90UnitHeader "^\s*end_template\s*$"
syn match irpf90UnitHeader "^\s*subst\s*$"
syn match irpf90Comment "^\s*begin_doc\s*"
syn match irpf90Comment "^\s*end_doc\s*$"
syn match irpf90UnitHeader "^\s*&*\s*begin_provider\s*"
syn match irpf90UnitHeader "^\s*end_provider\s*$"
syn match irpf90UnitHeader "^\s*assert"
syn match irpf90UnitHeader "^\s*touch"
syn match irpf90UnitHeader "^\s*soft_touch"
syn match irpf90UnitHeader "^\s*provide"
syn match irpf90UnitHeader "^\s*free"
syn match irpf90UnitHeader "^\s*irp_if"
syn match irpf90UnitHeader "^\s*irp_else"
syn match irpf90UnitHeader "^\s*irp_endif"
syn match irpf90UnitHeader "^\s*irp_read"
syn match irpf90UnitHeader "^\s*irp_write"
"""
if exists("irpf90_fold")
syn sync fromstart
syn region irpf90Program transparent fold keepend start="^\s*program\s\+\z(\a\w*\)" skip="^\s*[!#].*$" excludenl end="\<end\s*\(program\(\s\+\z1\>\)\=\|$\)" contains=ALLBUT,irpf90Module
syn region irpf90Module transparent fold keepend start="^\s*module\s\+\(procedure\)\@!\z(\a\w*\)" skip="^\s*[!#].*$" excludenl end="\<end\s*\(module\(\s\+\z1\>\)\=\|$\)" contains=ALLBUT,irpf90Program
syn region irpf90Function transparent fold keepend extend start="^\s*\(elemental \|pure \|recursive \)\=\s*function\s\+\z(\a\w*\)" skip="^\s*[!#].*$" excludenl end="\<end\s*\($\|function\(\s\+\z1\>\)\=\)" contains=ALLBUT,irpf90Program,irpf90Module
syn region irpf90Subroutine transparent fold keepend extend start="^\s*\(elemental \|pure \|recursive \)\=\s*subroutine\s\+\z(\a\w*\)" skip="^\s*[!#].*$" excludenl end="\<end\s*\($\|subroutine\(\s\+\z1\>\)\=\)" contains=ALLBUT,irpf90Program,irpf90Module
syn region irpf90BlockData transparent fold keepend start="\<block\s*data\s\+\z(\a\w*\)" skip="^\s*[!#].*$" excludenl end="\<end\s*\($\|block\s*data\(\s\+\z1\>\)\=\)" contains=ALLBUT,irpf90Program,irpf90Module,irpf90Subroutine,irpf90Function,irpf90Loop,irpf90Case,irpf90Loop,irpf90IfBlock
syn region irpf90Interface transparent fold keepend extend start="^\s*interface\>" skip="^\s*[!#].*$" excludenl end="\<end\s*interface\>" contains=ALLBUT,irpf90Program,irpf90Module,irpf90Loop,irpf90Case,irpf90Loop,irpf90IfBlock
if exists("irpf90_fold_conditionals")
syn region irpf90Loop transparent fold keepend start="\<do\s\+\z(\d\+\)" end="^\s*\z1\>" contains=ALLBUT,irpf90UnitHeader,irpf90Structure,irpf90StorageClass,irpf90Type,irpf90Program,irpf90Module,irpf90Subroutine,irpf90Function,irpf90BlockData
syn region irpf90Loop transparent fold keepend extend start="\(\<end\s\+\)\@<!\<do\(\s\+\a\|\s*$\)" skip="^\s*[!#].*$" excludenl end="\<end\s*do\>" contains=ALLBUT,irpf90UnitHeader,irpf90Structure,irpf90StorageClass,irpf90Type,irpf90Program,irpf90Module,irpf90Subroutine,irpf90Function,irpf90BlockData
syn region irpf90IfBlock transparent fold keepend extend start="\(\<e\(nd\|lse\)\s\+\)\@<!\<if\s*(.\+)\s*then\>" skip="^\s*[!#].*$" end="\<end\s*if\>" contains=ALLBUT,irpf90UnitHeader,irpf90Structure,irpf90StorageClass,irpf90Type,irpf90Program,irpf90Module,irpf90Subroutine,irpf90Function,irpf90BlockData
syn region irpf90Case transparent fold keepend extend start="\<select\s*case\>" skip="^\s*[!#].*$" end="\<end\s*select\>" contains=ALLBUT,irpf90UnitHeader,irpf90Structure,irpf90StorageClass,irpf90Type,irpf90Program,irpf90Module,irpf90Subroutine,irpf90Function,irpf90BlockData
endif
if exists("irpf90_fold_multilinecomments")
syn match irpf90MultiLineComments transparent fold "\(^\s*!.*\(\n\|\%$\)\)\{4,}" contains=ALLBUT,irpf90MultiCommentLines
endif
endif
if !exists("did_irpf90_syn_inits")
command -nargs=+ HiLink hi def link <args>
" The default highlighting differs for each dialect.
" Transparent groups:
" irpf90Paren, irpf90LeftMargin
" irpf90Program, irpf90Module, irpf90Subroutine, irpf90Function,
" irpf90BlockData
" irpf90Loop, irpf90Loop, irpf90IfBlock, irpf90Case
" irpf90MultiCommentLines
HiLink irpf90Statement Statement
HiLink irpf90ConstructName Special
HiLink irpf90Conditional Conditional
HiLink irpf90Repeat Repeat
HiLink irpf90Todo Todo
HiLink irpf90ContinueMark Todo
HiLink irpf90String String
HiLink irpf90Number Number
HiLink irpf90Operator Operator
HiLink irpf90Boolean Boolean
HiLink irpf90LabelError Error
HiLink irpf90Obsolete Todo
HiLink irpf90Type Type
HiLink irpf90Structure Type
HiLink irpf90StorageClass StorageClass
HiLink irpf90Call irpf90UnitHeader
HiLink irpf90UnitHeader irpf90PreCondit
HiLink irpf90ReadWrite irpf90Intrinsic
HiLink irpf90IO irpf90Intrinsic
HiLink irpf90Intrinsic irpf90Intrinsic
HiLink irpf90Intrinsic irpf90Intrinsic
HiLink irpf90Intrinsic Special
HiLink irpf90StatementOb Statement
HiLink irpf9066Intrinsic irpf90Intrinsic
HiLink irpf90IntrinsicR irpf90Intrinsic
HiLink irpf90UnitHeaderR irpf90PreCondit
HiLink irpf90TypeR irpf90Type
HiLink irpf90StorageClassR irpf90StorageClass
HiLink irpf90OperatorR irpf90Operator
HiLink irpf90Include Include
HiLink irpf90StorageClassR irpf90StorageClass
HiLink irpf90LabelNumber Special
HiLink irpf90Target Special
HiLink irpf90FormatSpec Identifier
HiLink irpf90FloatDExp irpf90Float
HiLink irpf90FloatNoDec irpf90Float
HiLink irpf90FloatIniDec irpf90Float
HiLink irpf90FloatEndDec irpf90Float
HiLink irpf90TypeEx irpf90Type
HiLink irpf90IOEx irpf90IO
HiLink irpf90StatementEx irpf90Statement
HiLink irpf90StringEx irpf90String
HiLink irpf90IntrinsicEx irpf90Intrinsic
HiLink irpf90UnitHeaderEx irpf90UnitHeader
HiLink irpf90ConditionalEx irpf90Conditional
HiLink irpf90IntrinsicEx irpf90Intrinsic
HiLink irpf90Float Float
"Uncomment the next line if you want all irpf90 variables to be highlighted
" HiLink irpf90Identifier Identifier
HiLink irpf90PreCondit PreCondit
HiLink irpf90Include Include
HiLink cIncluded Error
HiLink cInclude Error
HiLink cPreProc Error
HiLink cPreCondit Error
HiLink irpf90ParenError Error
HiLink irpf90Comment Comment
HiLink irpf90SerialNumber Todo
HiLink irpf90Tab Error
" Vendor extensions
HiLink irpf90ExtraIntrinsic Special
delcommand HiLink
endif
fun! ReadMan()
let s:man_word = expand('<cword>')
:exe ":!irpman " . s:man_word
endfun
map K :call ReadMan()<CR>
set equalprg=irpf90_indent
if exists('g:no_irpf90_conceal') || !has('conceal') || &enc != 'utf-8'
finish
endif
syntax match irpf90NiceOperator "<-" conceal cchar=←
iab ← <-
syntax match irpf90NiceOperator "->" conceal cchar=→
iab → ->
syntax match irpf90NiceOperator "==" conceal cchar=≡
iab ≡ ==
syntax match irpf90NiceOperator "\.eq\." conceal cchar=≡
syntax match irpf90NiceOperator "/=" conceal cchar=≠
iab ≠ /=
syntax match irpf90NiceOperator "\.ne\." conceal cchar=≠
syntax match irpf90NiceOperator "\.or\." conceal cchar=∨
iab ∨ .or.
syntax match irpf90NiceOperator "\.and\." conceal cchar=∧
iab ∧ .and.
syntax match irpf90NiceOperator "*" conceal cchar=×
iab × *
let s:extraConceal = 1
" Some windows font don't support some of the characters,
" so if they are the main font, we don't load them :)
if has("win32")
let s:incompleteFont = [ 'Consolas'
\ , 'Lucida Console'
\ , 'Courier New'
\ ]
let s:mainfont = substitute( &guifont, '^\([^:,]\+\).*', '\1', '')
for s:fontName in s:incompleteFont
if s:mainfont ==? s:fontName
let s:extraConceal = 0
break
endif
endfor
endif
if s:extraConceal
syntax match irpf90NiceOperator "<=" conceal cchar=≤
syntax match irpf90NiceOperator "\.le\." conceal cchar=≤
iab ≤ <=
syntax match irpf90NiceOperator ">=" conceal cchar=≥
syntax match irpf90NiceOperator "\.ge\." conceal cchar=≥
iab ≥ >=
syntax match irpf90NiceOperator "\.lt\." conceal cchar=<
syntax match irpf90NiceOperator "\.gt\." conceal cchar=>
syntax match irpf90NiceOperator "=>" conceal cchar=⇒
iab ⇒ =>
syntax match irpf90NiceOperator "\:\:" conceal cchar=∷
iab ∷ ::
syntax match irpf90NiceOperator "++" conceal cchar=⧺
iab ⧺ ++
syntax match irpf90NiceOperator "\<lapl_" conceal cchar=Δ
syntax match irpf90NiceOperator "\C\<Delta\>" conceal cchar=Δ
iab Δ Delta
syntax match irpf90NiceOperator "\C\<Lambda\>" conceal cchar=Λ
iab Λ Lambda
syntax match irpf90NiceOperator "\C\<Pi\>" conceal cchar=Π
iab Π Pi
syntax match irpf90NiceOperator "\C\<Sigma\>" conceal cchar=Σ
iab Σ Sigma
syntax match irpf90NiceOperator "\C\<Psi\>" conceal cchar=Ψ
iab Ψ Psi
syntax match irpf90NiceOperator "\C\<Omega\>" conceal cchar=Ω
iab Ω Omega
syntax match irpf90NiceOperator "\C\<alpha\>" conceal cchar=α
iab α alpha
syntax match irpf90NiceOperator "\C\<beta\>" conceal cchar=β
iab β beta
syntax match irpf90NiceOperator "\C\<gamma\>" conceal cchar=γ
iab γ gamma
syntax match irpf90NiceOperator "\C\<delta\>" conceal cchar=δ
iab δ delta
syntax match irpf90NiceOperator "\C\<epsilon\>" conceal cchar=ε
iab ε epsilon
syntax match irpf90NiceOperator "\C\<zeta\>" conceal cchar=ζ
iab ζ zeta
syntax match irpf90NiceOperator "\C\<theta\>" conceal cchar=θ
iab θ theta
syntax match irpf90NiceOperator "\C\<eta\>" conceal cchar=η
iab η eta
syntax match irpf90NiceOperator "\C\<lambda\>" conceal cchar=λ
iab λ lambda
syntax match irpf90NiceOperator "\C\<mu\>" conceal cchar=μ
iab μ mu
syntax match irpf90NiceOperator "\C\<nu\>" conceal cchar=ν
iab ν nu
syntax match irpf90NiceOperator "\C\<pi\>" conceal cchar=π
iab π pi
syntax match irpf90NiceOperator "\C\<rho\>" conceal cchar=ρ
iab ρ rho
syntax match irpf90NiceOperator "\C\<sigma\>" conceal cchar=σ
iab σ sigma
syntax match irpf90NiceOperator "\C\<tau\>" conceal cchar=τ
iab τ tau
syntax match irpf90NiceOperator "\C\<phi\>" conceal cchar=φ
iab φ phi
syntax match irpf90NiceOperator "\C\<nabla\>" conceal cchar=∇
iab ∇ nabla
syntax match irpf90NiceOperator "\C\<grad_" conceal cchar=∇
iab ∇ grad_o
syntax match irpf90NiceOperator "\C\<chi\>" conceal cchar=χ
iab χ chi
syntax match irpf90NiceOperator "\C\<psi\>" conceal cchar=ψ
iab ψ psi
syntax match irpf90NiceOperator "\C\<omega\>" conceal cchar=ω
iab ω omega
endif
hi link irpf90NiceOperator Operator
hi! link Conceal Operator
setlocal conceallevel=2
" vim: set fenc=utf-8:
" vim: ts=8 tw=132

272
src/irpf90_indent.py
View File

@ -1,272 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import sys
import re
LENMAX = 70
tabn = 2
tab = " "*tabn
class Grep(object):
re_begin_program = re.compile(r"^\s*program\s",flags=re.I)
def begin_program(self,string):
return re.match(self.re_begin_program,string) is not None
re_end_program = re.compile(r"\s*(end\s*!?$|end\s*program)",flags=re.I)
def end_program(self,string):
return re.match(self.re_end_program,string) is not None
re_begin_subroutine = re.compile(r"^\s*(recursive)?\s*subroutine\s",flags=re.I)
def begin_subroutine(self,string):
return re.match(self.re_begin_subroutine,string) is not None
re_end_subroutine = re.compile(r"\s*(end\s*!?$|end\s*subroutine)",flags=re.I)
def end_subroutine(self,string):
return re.match(self.re_end_subroutine,string) is not None
re_begin_function = re.compile(r"^.*function\s+.*\(",flags=re.I)
def begin_function(self,string):
return re.match(self.re_begin_function,string) is not None
re_end_function = re.compile(r"\s*(end\s*!?$|end\s*function)",flags=re.I)
def end_function(self,string):
return re.match(self.re_end_function,string) is not None
re_begin_provider = re.compile(r"^\s*&?begin_provider\s",flags=re.I)
def begin_provider(self,string):
return re.match(self.re_begin_provider,string) is not None
re_end_provider = re.compile(r"^\s*end_provider\s*(!.*)?$", flags=re.I)
def end_provider(self,string):
return re.match(self.re_end_provider,string) is not None
re_begin_do = re.compile(r"^\s*do\s+",flags=re.I)
def begin_do(self,string):
return re.match(self.re_begin_do,string) is not None
re_end_do = re.compile(r"^\s*end\s*do\s*(!.*)?$",flags=re.I)
def end_do(self,string):
return re.match(self.re_end_do,string) is not None
re_begin_if = re.compile(r"^\s*if(\(|\s+).*(&|then)\s*(!.*)?$",flags=re.I)
def begin_if(self,string):
return re.match(self.re_begin_if,string) is not None
re_else = re.compile(r"^\s*else",flags=re.I)
def xelse(self,string):
return re.match(self.re_else,string) is not None
re_end_if = re.compile(r"^\s*end\s*if\s*(!.*)?$",flags=re.I)
def end_if(self,string):
return re.match(self.re_end_if,string) is not None
re_begin_select = re.compile(r"^\s*select\s*case",flags=re.I)
def begin_select(self,string):
return re.match(self.re_begin_select,string) is not None
re_case = re.compile(r"^\s*case\s*\(",flags=re.I)
def case(self,string):
return re.match(self.re_case,string) is not None
re_end_select = re.compile(r"^\s*end\s*select\s*(!.*)?$",flags=re.I)
def end_select(self,string):
return re.match(self.re_end_select,string) is not None
re_continuation = re.compile(r"^\s*\S+.*&")
def continuation(self,string):
return re.match(self.re_continuation,string) is not None
re_declaration = re.compile(r"^.*::.*$")
def declaration(self,string):
return re.match(self.re_declaration,string) is not None
grep = Grep()
class indent(object):
def __init__(self):
"""Run the program"""
self.run()
def format_declaration(self,string,n):
l,r = string.split('::')
return l.strip().ljust(n) + ' :: '+ r.strip()
def format_continuation(self,string,n):
buffer = string.split('&')
if len(buffer) == 1:
l = buffer[0]
return l
else:
l, r = buffer
return l.strip().ljust(69-len(n)) + '&'+ r.strip()
def get_filename(self):
"""The file name is the first argument"""
if '_filename' not in self.__dict__:
try:
self._filename = sys.argv[1]
except:
self._filename = None
return self._filename
filename=property(fget=get_filename)
def get_text(self):
"""The text of the file is a list of lines"""
if '_text' not in self.__dict__:
if self.filename is not None:
f = open(self.filename,'r')
self._text = f.read().splitlines()
f.close()
else:
self._text = sys.stdin.read().splitlines()
return self._text
text=property(fget=get_text)
def indentlevel(self,line):
line = line.rstrip()
k=0
if len(line) > 0:
while line[k] == ' ':
k+=1
return k
def run(self):
lines = self.text
indent0 = " "*self.indentlevel(self.text[0])
k = indent0
line = ""
for i in range(len(self.text)):
prevline = line
line = self.text[i].strip()
if grep.continuation(line):
line = self.format_continuation(line,k)
if grep.continuation(prevline):
print k+2*tab+self.format_continuation(line,k+2*tab)
continue
if grep.begin_subroutine(line):
print line
k = indent0+tab
continue
if grep.begin_function(line):
print line
k = indent0+tab
continue
if grep.begin_program(line):
print line
k = indent0+tab
continue
if grep.begin_provider(line):
if line[0] != '&':
k = indent0+tab
if grep.begin_provider(self.text[i+1].strip()):
print " "+line
else:
print line
else:
print line
continue
if grep.declaration(line):
print k+self.format_declaration(line,30)
continue
if grep.begin_do(line):
print k+line
k += tab
continue
if grep.begin_if(line):
print k+line
k += tab
continue
if grep.xelse(line):
print k[:-tabn]+line
continue
if grep.begin_select(line):
print k+line
k += 2*tab
continue
if grep.case(line):
print k[:-tabn]+line
continue
if grep.end_do(line):
k = k[:-tabn]
print k+line
continue
if grep.end_if(line):
k = k[:-tabn]
print k+line
continue
if grep.end_select(line):
k = k[:-2*tabn]
print k+line
continue
if grep.end_subroutine(line):
print line
k = indent0
continue
if grep.end_function(line):
print line
k = indent0
continue
if grep.end_provider(line):
print line
k = indent0
continue
if grep.end_program(line):
print line
k = indent0
continue
print k+line
def main():
indent()
if __name__ == '__main__':
main()

40
src/irpf90_python.exe
View File

@ -1,40 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import os
import sys
wd = os.path.abspath(os.path.dirname(__file__))
sys.path.insert(0,(wd+"/../src/"))
sys.path.insert(0,(wd+"/../share/irpf90/src/"))
def main():
import irpf90
irpf90.main()
main()

408
src/irpf90_t.py
View File

@ -1,408 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import os
from zlib import crc32
irpdir = "IRPF90_temp/"
mandir = "IRPF90_man/"
irp_id = abs(crc32(os.getcwd()))
class Line(object):
def __init__(self,i,text,filename):
self.i = i
self._text = None
self.filename = filename
self._lower = None
self.set_text(text)
def get_text(self):
return self._text
def set_text(self,value):
self._text = value
self._lower = value.lower()
def get_lower(self):
return self._lower
text = property(fget=get_text, fset=set_text)
lower = property(fget=get_lower)
class Empty_line(Line):
str="Empty_line"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Empty_line",self.i,self.text)
class Simple_line(Line):
str="Simple_line"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Simple_line",self.i,self.text)
class Declaration(Line):
str="Declaration"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Declaration",self.i,self.text)
class Continue(Line):
str="Continue"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Continue",self.i,self.text)
class Begin_provider(Line):
str="Begin_provider"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Begin_provider",self.i,self.text)
class Cont_provider(Line):
str="Cont_provider"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Cont_provider",self.i,self.text)
class End_provider(Line):
str="End_provider"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("End_provider",self.i,self.text)
class Begin_doc(Line):
str="Begin_doc"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Begin_doc",self.i,self.text)
class Doc(Line):
str="Doc"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Doc",self.i,self.text)
class End_doc(Line):
str="End_doc"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("End_doc",self.i,self.text)
class Begin_shell(Line):
str="Begin_shell"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Begin_shell",self.i,self.text)
class End_shell(Line):
str="End_shell"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("End_shell",self.i,self.text)
class Begin_template(Line):
str="Begin_template"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Begin_template",self.i,self.text)
class End_template(Line):
str="End_template"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("End_template",self.i,self.text)
class Subst(Line):
str="Subst"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Subst",self.i,self.text)
class Assert(Line):
str="Assert"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Assert",self.i,self.text)
class Touch(Line):
str="Touch"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Touch",self.i,self.text)
class SoftTouch(Touch):
str="SoftTouch"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("SoftTouch",self.i,self.text)
class Irp_read(Line):
str="Irp_read"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Irp_read",self.i,self.text)
class Irp_write(Line):
str="Irp_write"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Irp_write",self.i,self.text)
class Irp_If(Line):
str="Irp_If"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Irp_If",self.i,self.text)
class Irp_Else(Line):
str="Irp_Else"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Irp_Else",self.i,self.text)
class Irp_Endif(Line):
str="Irp_Endif"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Irp_Endif",self.i,self.text)
class Openmp(Line):
str="Openmp"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Openmp",self.i,self.text)
class Directive(Line):
str="Directive"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Directive",self.i,self.text)
class Use(Line):
str="Use"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Use",self.i,self.text)
class Do(Line):
str="Do"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Do",self.i,self.text)
class Enddo (Line):
str="Enddo"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Enddo",self.i,self.text)
class If(Line):
str="If"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("If",self.i,self.text)
class Elseif(Line):
str="Elseif"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Elseif",self.i,self.text)
class Else(Line):
str="Else"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Else",self.i,self.text)
class Endif(Line):
str="Endif"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Endif",self.i,self.text)
class Select(Line):
str="Select"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Select",self.i,self.text)
class Case(Line):
str="Case"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Case",self.i,self.text)
class End_select(Line):
str="End_select"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("End_select",self.i,self.text)
class Program(Line):
str="Program"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Program",self.i,self.text)
class Subroutine(Line):
str="Subroutine"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Subroutine",self.i,self.text)
class Function(Line):
str="Function"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Function",self.i,self.text)
class Call(Line):
str="Call"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Call",self.i,self.text)
class Provide(Line):
str="Provide"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Provide",self.i,self.text)
class NoDep(Line):
str="NoDep"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("NoDep",self.i,self.text)
class Return (Line):
str="Return"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Return",self.i,self.text)
class Include(Line):
str="Include"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Include",self.i,self.text)
class Implicit (Line):
str="Implicit"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Implicit",self.i,self.text)
class Free(Line):
str="Free"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Free",self.i,self.text)
class End(Line):
str="End"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("End",self.i,self.text)
class Provide_all (Line):
str="Provide_all"
def __init__(self,i,text,filename):
Line.__init__(self,i,text,filename)
def __repr__(self):
return "%20s:%5d : %s"%("Provide_all",self.i,self.text)
######################################################################
def create_irpf90_files():
result = []
from command_line import command_line
import os
def is_irpf90_file(filename):
return filename.endswith(".irp.f") and not filename.startswith('.')
result = filter ( is_irpf90_file, os.listdir(os.getcwd()) )
for dir in command_line.include_dir:
try:
os.stat(dir)
result += map(lambda x: dir+x, filter ( is_irpf90_file, os.listdir(dir) ) )
except:
continue
if command_line.do_codelet:
result += [command_line.codelet[3]]
return result
irpf90_files = create_irpf90_files()

39
src/irpman.py
View File

@ -1,39 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import os
import sys
wd = os.path.abspath(os.path.dirname(__file__))
from irpf90_t import mandir
filename = sys.argv[1].lower()+".l"
if filename not in os.listdir(mandir):
print "%s does not exist"%(sys.argv[1])
sys.exit(-1)
os.system("man ./"+mandir+sys.argv[1].lower()+".l")

58
src/locks.py
View File

@ -1,58 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from command_line import command_line
from irpf90_t import *
from util import *
from variables import variables
FILENAME=irpdir+'irp_locks.irp.F90'
def create():
out = []
l = variables.keys()
l.sort
for v in l:
var = variables[v]
out += var.locker
out += [
"subroutine irp_init_locks_%s()"%(irp_id),
" implicit none" ]
for v in l:
out += [ " call irp_lock_%s(.True.)"%v ]
out += [ " call irp_lock_%s(.False.)"%v ]
out += [ "end subroutine" ]
out = map(lambda x: "%s\n"%(x),out)
if not same_file(FILENAME,out):
file = open(FILENAME,'w')
file.writelines(out)
file.close()
if __name__ == '__main__':
create()

204
src/makefile.py
View File

@ -1,204 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import os,sys
import irpf90_t
from command_line import command_line
irpdir = irpf90_t.irpdir
mandir = irpf90_t.mandir
FILENAME = "Makefile"
FILENAME_GITIGNORE = ".gitignore"
IRPF90_MAKE = "irpf90.make"
######################################################################
def create():
has_makefile = True
try:
file = open(FILENAME,"r")
except IOError:
has_makefile = False
if has_makefile:
return
file = open(FILENAME,"w")
t = """IRPF90 = irpf90 #-a -d
FC = gfortran
FCFLAGS= -O2 -ffree-line-length-none -I .
NINJA = ninja
AR = ar
RANLIB = ranlib
SRC=
OBJ=
LIB=
-include %s
export
%s: $(filter-out %s%%, $(wildcard */*.irp.f)) $(wildcard *.irp.f) $(wildcard *.inc.f) Makefile
\t$(IRPF90)
"""%(IRPF90_MAKE,IRPF90_MAKE,irpdir)
file.write(t)
file.close()
create_gitignore()
######################################################################
def create_gitignore():
has_makefile = True
try:
file = open(FILENAME_GITIGNORE,"r")
except IOError:
has_makefile = False
if has_makefile:
return
file = open(FILENAME_GITIGNORE,"w")
t = "\n".join([ irpdir, mandir, IRPF90_MAKE, 'irpf90_entities', 'tags' ])
file.write(t)
file.close()
######################################################################
def run_ninja():
import ninja
ninja.run()
######################################################################
def run_make():
from modules import modules
mod = []
for m in modules.values():
mod.append(m)
file = open(IRPF90_MAKE,'w')
result = ""
result += "FC+=-I %s "%(irpdir)
for i in command_line.include_dir:
result += "-I %s%s "%(irpdir,i)
result += "\n"
result += "SRC += %sirp_stack.irp.F90"%(irpdir)
result += " %sirp_touches.irp.F90"%(irpdir)
# result += " %sirp_checkpoint.irp.F90"%(irpdir)
if command_line.do_openmp:
result += " %sirp_locks.irp.F90"%(irpdir)
if command_line.do_profile:
result += " %sirp_profile.irp.F90"%(irpdir)
for m in mod:
result += " %s%s.irp.F90"%(irpdir,m.filename)
result += " %s%s.irp.module.F90"%(irpdir,m.filename)
print >>file, result
result = "OBJ_IRP = %sirp_stack.irp.o "%(irpdir)
for m in mod:
if not m.is_main:
result += " %s%s.irp.o"%(irpdir,m.filename)
result += " %s%s.irp.module.o"%(irpdir,m.filename)
print >>file, result
print >>file, "OBJ1 = $(OBJ_IRP) $(OBJ) %sirp_touches.irp.o "%(irpdir),
# print >>file, " %sirp_checkpoint.irp.o"%(irpdir),
if command_line.do_profile:
print >>file, " %sirp_profile.irp.o"%(irpdir), " irp_rdtsc.o",
if command_line.do_codelet:
print >>file, " irp_rdtsc.o",
if command_line.do_openmp:
print >>file, " %sirp_locks.irp.o"%(irpdir)
else:
print >>file, ""
all = filter(lambda x: modules[x].is_main, modules)
all = map(lambda x: x[:-6], all)
all_o = map(lambda x: "%s.irp.module.o %s.irp.o"%(x,x), all)
print >>file, "ALL = %s"%(" ".join(all))
print >>file, "ALL_OBJ = %s"%(" ".join(all_o))
print >>file, "ALL_OBJ1 = $(patsubst %%, %s%%,$(notdir $(ALL_OBJ)))"%(irpdir)
print >>file, "all:$(ALL)"
print >>file, "\t@$(MAKE) -s move"
# print >>file, "ifdef USE_IRPF90_A"
for m in mod:
if m.is_main:
exe = m.filename
print >>file, "%s: %s%s.irp.o %s%s.irp.module.o IRPF90_temp/irpf90.a"%(exe,irpdir,exe,irpdir,exe)
print >>file, "\t$(FC) -o $@ %s$@.irp.o %s$@.irp.module.o IRPF90_temp/irpf90.a $(LIB)"%(irpdir,irpdir)
print >>file, "\t@$(MAKE) -s move"
# print >>file, "else"
# for m in mod:
# if m.is_main:
# exe = m.filename
# print >>file, "%s: %s%s.irp.o %s%s.irp.module.o $(OBJ1)"%(exe,irpdir,exe,irpdir,exe)
# print >>file, "\t$(FC) -o $@ %s$@.irp.o %s$@.irp.module.o $(OBJ1) $(LIB)"%(irpdir,irpdir)
# print >>file, "\t@$(MAKE) -s move"
# print >>file, "endif"
buffer = ""
for m in mod:
filename = "%s%s.irp.o: $(OBJ) %s%s.irp.module.o"%(irpdir,m.filename,irpdir,m.filename)
needed_modules = filter( lambda x: modules[x].name in m.needed_modules, modules )
needed_files = map(lambda x: modules[x].filename, needed_modules)
mds = map (lambda x: " %s%s.irp.module.o"%(irpdir,x),needed_files)
print >>file, filename," ".join(mds)," ".join(m.includes)
if not m.is_main:
buffer += "\t - @echo '"+filename+" ".join(mds)+"' >> %sdist_Makefile\n"%(irpdir)
# print >>file, "%sirp_touches.irp.o %sirp_checkpoint.irp.o: $(OBJ) "%(irpdir,irpdir),
print >>file, "%sirp_touches.irp.o: $(OBJ) "%(irpdir),
mds = filter(lambda x: not x.is_main,mod)
mds = map(lambda x: " %s%s.irp.o %s%s.irp.o"%(irpdir,x.filename,irpdir,x.filename),mds)
print >>file," ".join(mds)
if command_line.do_profile:
print >>file, "%sirp_profile.irp.o:"%(irpdir),
print >>file," ".join(mds)
if command_line.do_openmp:
print >>file, "%sirp_locks.irp.o:"%(irpdir),
print >>file," ".join(mds)
for dir in [ irpdir ] + map(lambda x: irpdir+x, command_line.include_dir):
print >>file, dir+"%.irp.module.o: $(OBJ) "+dir+"%.irp.module.F90"
print >>file, "\t$(FC) $(FCFLAGS) -c "+dir+"$*.irp.module.F90 -o "+dir+"$*.irp.module.o"
print >>file, dir+"%.irp.o: $(OBJ) "+dir+"%.irp.module.o "+dir+"%.irp.F90"
print >>file, "\t$(FC) $(FCFLAGS) -c "+dir+"$*.irp.F90 -o "+dir+"$*.irp.o"
print >>file, dir+"%.irp.o: $(OBJ) "+dir+"%.irp.F90"
print >>file, "\t$(FC) $(FCFLAGS) -c "+dir+"$*.irp.F90 -o "+dir+"$*.irp.o"
print >>file, dir+"%.o: %.F90"
print >>file, "\t$(FC) $(FCFLAGS) -c $*.F90 -o "+dir+"$*.o"
print >>file, dir+"%.o: %.f90\n\t$(FC) $(FCFLAGS) -c $*.f90 -o "+dir+"$*.o"
print >>file, dir+"%.o: %.f\n\t$(FC) $(FCFLAGS) -c $*.f -o "+dir+"$*.o"
print >>file, dir+"%.o: %.F\n\t$(FC) $(FCFLAGS) -c $*.F -o "+dir+"$*.o"
print >>file, dir+"%.irp.F90: "+IRPF90_MAKE+"\n"
print >>file, "move:\n\t@mv -f *.mod IRPF90_temp/ 2> /dev/null | DO_NOTHING=\n"
print >>file, "IRPF90_temp/irpf90.a: $(OBJ) $(OBJ1)\n\t$(AR) crf IRPF90_temp/irpf90.a $(OBJ1)\n"
print >>file, "clean:\n\trm -rf $(EXE) $(OBJ1) IRPF90_temp/irpf90.a $(ALL_OBJ1) $(ALL)\n"
print >>file, "veryclean:\n\t- $(MAKE) clean\n"
print >>file, "\t- rm -rf "+irpdir+" "+mandir+" "+IRPF90_MAKE+" irpf90_entities dist tags\n"
file.close()
######################################################################
def run():
if command_line.do_ninja:
run_ninja()
else:
run_make()

227
src/module.py
View File

@ -1,227 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from irpf90_t import *
from variable import *
from variables import variables
from command_line import command_line
import preprocessed_text
from util import *
class Fmodule(object):
header = \
[ "! -*- F90 -*-",
"!",
"!-----------------------------------------------!",
"! This file was generated with the irpf90 tool. !",
"! !",
"! DO NOT MODIFY IT BY HAND !",
"!-----------------------------------------------!",
"" ]
def __init__(self,text,filename):
self.text = put_info(text,filename)
self.filename = filename[:-6]
self.name = "%s_mod"%(self.filename).replace('/','__').replace('.','Dot')
def is_main(self):
if '_is_main' not in self.__dict__:
self._is_main = self.prog_name is not None
return self._is_main
is_main = property(is_main)
def prog_name(self):
if '_prog_name' not in self.__dict__:
buffer = filter(lambda x: type(x[1]) == Program,self.text)
if buffer == []:
self._prog_name = None
else:
self._prog_name = buffer[0][1].filename
return self._prog_name
prog_name = property(prog_name)
def variables(self):
if '_variables' not in self.__dict__:
from variables import variables
name = self.name
self._variables = filter(lambda x: variables[x].fmodule == name, variables)
return self._variables
variables = property(variables)
def head(self):
if '_head' not in self.__dict__:
result = [ "module %s"%(self.name) ]
result += self.use
result += self.dec
result += flatten( map(lambda x: variables[x].header,self.variables) )
result.append( "end module %s"%(self.name) )
self._head = result
return self._head
head = property(head)
def needed_vars(self):
if '_needed_vars' not in self.__dict__:
result = map(lambda x: variables[x].needs,self.variables)
result = make_single ( flatten(result) )
self._needed_vars = result
return self._needed_vars
needed_vars = property(needed_vars)
def includes(self):
if '_includes' not in self.__dict__:
buffer = []
for v in self.needed_vars:
buffer += variables[v].includes
self._includes = make_single(buffer)
return self._includes
includes = property(includes)
def generated_text(self):
if '_generated_text' not in self.__dict__:
result = []
for var in self.variables:
var = variables[var]
result += var.provider
result += var.builder
if var.is_read:
result += var.reader
if var.is_written:
result += var.writer
self._generated_text = result
return self._generated_text
generated_text = property(generated_text)
def residual_text(self):
if '_residual_text' not in self.__dict__:
from variables import build_use, call_provides
from parsed_text import move_to_top
def remove_providers(text):
result = []
inside = False
for vars,line in text:
if type(line) == Begin_provider:
inside = True
if not inside:
result.append( (vars,line) )
if type(line) == End_provider:
inside = False
return result
def modify_functions(text):
result = []
variable_list = []
for vars,line in text:
if type(line) in [ Subroutine, Function ]:
variable_list = list(vars)
elif type(line) == End:
result += map(lambda x: ([],Use(line.i,x,line.filename)), build_use(variable_list))
else:
variable_list += vars
result.append( (vars,line) )
return result
def extract_use_dec_text(text):
inside = False
result = []
dec = []
use = []
for vars,line in text:
if type(line) in [ Subroutine, Function, Program]:
inside = True
if inside:
result.append( (vars,line) )
else:
if type(line) == Use:
use.append( (vars,line) )
elif type(line) == Declaration:
dec.append( (vars,line) )
if type(line) == End:
inside = False
return use, dec, result
def provide_variables(text):
result = []
for vars,line in text:
result.append( ([],line) )
result += map(lambda x: ([],Simple_line(line.i,x,line.filename)), call_provides(vars))
return result
result = remove_providers(self.text)
result = modify_functions(result)
use,dec,result = extract_use_dec_text(result)
self._use = make_single(map(lambda x: " "+x[1].text, use))
self._dec = map(lambda x: " "+x[1].text, dec)
# self._dec = make_single(map(lambda x: " "+x[1].text, dec))
result = provide_variables(result)
result = move_to_top(result,Declaration)
result = move_to_top(result,Implicit)
result = move_to_top(result,Use)
result = map(lambda x: x[1], result)
result = map(lambda x: x.text, result)
self._residual_text = result
return self._residual_text
residual_text = property(residual_text)
def use(self):
if '_use' not in self.__dict__:
self.residual_text
return self._use
use = property(use)
def dec(self):
if '_dec' not in self.__dict__:
self.residual_text
return self._dec
dec = property(dec)
def needed_modules(self):
if '_needed_modules' not in self.__dict__:
buffer = filter(lambda x: x.lstrip().startswith("use "), \
self.generated_text+self.head+self.residual_text)
buffer = map(lambda x: x.split()[1], buffer)
buffer = filter(lambda x: x.endswith("_mod"),buffer )
self._needed_modules = make_single(buffer)
if self.name in self._needed_modules:
self._needed_modules.remove(self.name)
return self._needed_modules
needed_modules = property(needed_modules)
######################################################################
if __name__ == '__main__':
from parsed_text import parsed_text
for filename, text in parsed_text:
if filename == 'vmc_step.irp.f':
x = Fmodule(text,filename)
break
for line in x.head:
print line
print x.includes

68
src/modules.py
View File

@ -1,68 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from irpf90_t import *
from parsed_text import parsed_text
from module import Fmodule
from util import *
######################################################################
def create_modules():
result = {}
for filename,text in parsed_text:
result[filename] = Fmodule(text,filename)
return result
modules = create_modules()
######################################################################
def write_module(m):
# Module data
filename = irpdir+m.filename+".irp.module.F90"
text = m.header + m.head
text = map(lambda x: "%s\n"%(x),text)
if not same_file(filename,text):
# print filename
file = open(filename,"w")
file.writelines(text)
file.close()
# Subroutines
filename = irpdir+m.filename+".irp.F90"
text = m.header + m.generated_text + m.residual_text
text = map(lambda x: "%s\n"%(x),text)
if not same_file(filename,text):
# print filename
file = open(filename,"w")
file.writelines(text)
file.close()
######################################################################
if __name__ == '__main__':
write_module(modules['psi.irp.f'])

408
src/ninja.py
View File

@ -1,408 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import os,sys
import irpf90_t
from command_line import command_line
from modules import modules
irpdir = irpf90_t.irpdir
mandir = irpf90_t.mandir
irp_id = irpf90_t.irp_id
FILENAME = os.path.join(irpdir,"build.ninja")
cwd = os.getcwd()
PRINT_WIDTH=50
def dress(f,in_root=False):
"""
Transfoms the filename f into $PWD/IRPF90_temp/f
"""
if in_root:
result = os.path.join(cwd,f)
else:
result = os.path.join(cwd,irpdir,f)
return os.path.normpath(result)
def create_build_touches(list_of_other_o):
"""
Create the build command for the irp_touches.o file and the irpf90.a library.
"""
name = "irp_touches"
short_lib = "irpf90.a"
short_target_o = "%s.irp.o"%name
short_target_F90 = "%s.irp.F90"%name
lib = dress(short_lib)
target_o = dress(short_target_o)
target_F90 = dress(short_target_F90)
needed_modules = [ "%s.irp.module.o"%(modules[x].filename) for x in modules ]
list_of_modules = map(dress, needed_modules) + list_of_other_o
list_of_modules = ' '.join(list_of_modules)
result = '\n'.join(
[
"build {target_o}: compile_touches_{id} {target_F90} | {list_of_modules}",
" short_in = {short_target_F90}",
" short_out = {short_target_o}",
"",
"build {lib}: link_lib_{id} {target_o} {list_of_modules}",
" short_out = {short_lib}",
"",
] )
result = result.format(
id = irp_id ,
lib = lib ,
list_of_modules = list_of_modules ,
short_lib = short_lib ,
short_target_F90 = os.path.split(target_F90)[1] ,
short_target_o = os.path.split(target_o)[1] ,
target_F90 = target_F90 ,
target_o = target_o
)
return result
def create_build_target(t,list_of_other_o):
"""
Create the build command for the target module t. t is a Fmodule object.
"""
name = t.filename
irp_lib = dress("irpf90.a")
target = dress(name,in_root=True)
short_target_o = "%s.irp.o"%name
short_target_F90 = "%s.irp.F90"%name
short_target_module_F90 = "%s.irp.module.F90"%name
short_target_module_o = "%s.irp.module.o"%name
target_o = dress(short_target_o)
target_F90 = dress(short_target_F90)
target_module_o = dress(short_target_module_o)
target_module_F90 = dress(short_target_module_F90)
needed_modules = [ "%s.irp.module.o"%(modules[x].filename) for x in modules \
if modules[x].name in t.needed_modules ] + [ target_module_o ]
list_of_o = [ target_o, target_module_o, irp_lib ]
list_of_o = ' '.join(list_of_o)
list_of_modules = map(dress, needed_modules) + list_of_other_o
list_of_modules = ' '.join(list_of_modules)
list_of_includes = ' '.join(map(lambda x: dress(x,in_root=True), t.includes))
result = '\n'.join(
[ "build {target}: link_{id} {list_of_o}",
" short_out = {short_target}",
"",
"build {target_o}: compile_fortran_{id} {target_F90} | {list_of_modules} {list_of_includes}",
" short_in = {short_target_F90}",
" short_out = {short_target_o}",
"",
"build {target_module_o}: compile_fortran_{id} {target_module_F90}",
" short_in = {short_target_module_F90}",
" short_out = {short_target_module_o}",
"",
] )
result = result.format(
id = irp_id ,
list_of_includes = list_of_includes ,
list_of_modules = list_of_modules ,
list_of_o = list_of_o ,
short_target_F90 = os.path.split(target_F90)[1] ,
short_target_module_F90 = os.path.split(target_module_F90)[1] ,
short_target_module_o = os.path.split(target_module_o)[1] ,
short_target = name ,
short_target_o = os.path.split(target_o)[1] ,
target_F90 = target_F90 ,
target_module_F90 = target_module_F90 ,
target_module_o = target_module_o ,
target_o = target_o ,
target = target
)
return result
def create_build_non_target(t,list_of_other_o):
"""
Create the build command for the non-target module t. t is a Fmodule object.
"""
name = t.filename
target = dress(name,in_root=True)
short_target_o = "%s.irp.o"%name
short_target_F90 = "%s.irp.F90"%name
short_target_module_F90 = "%s.irp.module.F90"%name
short_target_module_o = "%s.irp.module.o"%name
target_o = dress(short_target_o)
target_F90 = dress(short_target_F90)
target_module_o = dress(short_target_module_o)
target_module_F90 = dress(short_target_module_F90)
needed_modules = [ "%s.irp.module.o"%(modules[x].filename) for x in modules \
if modules[x].name in t.needed_modules ] + [ target_module_o ]
list_of_modules = map(dress, needed_modules)
list_of_modules = ' '.join(list_of_modules)
list_of_externals = ' '.join([ dress(x,in_root=True) for x in list_of_other_o ])
list_of_includes = ' '.join(map(lambda x: dress(x,in_root=True), t.includes))
result = '\n'.join(
[
"build {target_o}: compile_fortran_{id} {target_F90} | {list_of_modules} {list_of_externals}",
" short_in = {short_target_F90}",
" short_out = {short_target}",
"",
"build {target_module_o}: compile_fortran_{id} {target_module_F90} | {list_of_externals} {list_of_includes}",
" short_in = {short_target_F90}",
" short_out = {short_target_o}",
"",
] )
result = result.format(
id = irp_id ,
list_of_externals = list_of_externals ,
list_of_includes = list_of_includes ,
list_of_modules = list_of_modules ,
short_target_F90 = os.path.split(target_F90)[1] ,
short_target = name ,
short_target_o = os.path.split(target_o)[1] ,
target_F90 = target_F90 ,
target_module_F90 = target_module_F90 ,
target_module_o = target_module_o ,
target_o = target_o
)
return result
def create_build_remaining(f):
"""
Create the build command for the remaining file f. f is a file name (str).
"""
t, extension = f.rsplit('.',1)
t1 = dress(t,in_root=True)
t2 = dress(t,in_root=False)
target_i = f
target_o = "%s.o"%t
if not target_o.startswith(os.path.join(cwd,irpdir)):
target_o = target_o.replace(cwd,os.path.join(cwd,irpdir))
if extension.lower() in [ 'f', 'f90' ]:
result = [ "build {target_o}: compile_fortran_{id} {target_i}" ]
elif extension.lower() in [ 'c' ]:
result = [ "build {target_o}: compile_c_{id} {target_i}" ]
elif extension.lower() in [ 'cxx', 'cpp' ]:
result = [ "build {target_o}: compile_cxx_{id} {target_i}" ]
result += [ " short_in = {short_target_i}",
" short_out = {short_target_o}", "" ]
result = '\n'.join(result).format(
target_o = target_o,
target_i = target_i,
short_target_o = os.path.split(target_o)[1],
short_target_i = os.path.split(target_i)[1],
id = irp_id
)
return result
def create_irpf90_make(targets):
targets = ' '.join(targets)
result = """NINJA += -C {0}
TARGETS={1}
.PHONY: all clean veryclean
all:
$(NINJA)
$(TARGETS):
$(NINJA) $(PWD)/$@
clean:
$(NINJA) -t clean
veryclean: clean
rm -rf IRPF90_temp/ IRPF90_man/ irpf90.make irpf90_entities dist tags
""".format(irpdir, targets)
import makefile
with open(makefile.IRPF90_MAKE,'w') as file:
file.write(result)
def run():
output = [ "builddir = %s"%os.path.join(cwd,irpdir) ]
# Environment variables
try: FC = os.environ["FC"]
except KeyError: FC="gfortran -ffree-line-length-none"
try: AR = os.environ["AR"]
except KeyError: AR="ar"
try: CC = os.environ["CC"]
except KeyError: CC="gcc"
try: CXX = os.environ["CXX"]
except KeyError: CXX="g++"
includes = [ "-I %s"%(i) for i in command_line.include_dir ]
FC += " "+' '.join(includes)
CC += " "+' '.join(includes)
CXX += " "+' '.join(includes)
try: SRC = os.environ["SRC"].split()
except KeyError: SRC=[]
try: OBJ = os.environ["OBJ"].split()
except KeyError: OBJ=[]
try: LIB = os.environ["LIB"].split()
except KeyError: LIB=[]
try: FCFLAGS = os.environ["FCFLAGS"].split()
except KeyError: FCFLAGS = [ "-O2" ]
try: CFLAGS = os.environ["CFLAGS"].split()
except KeyError: CFLAGS = [ "-O2" ]
try: CXXFLAGS = os.environ["CXXFLAGS"].split()
except KeyError: CXXFLAGS = [ "-O2" ]
FCFLAGS = ' '.join(FCFLAGS)
CFLAGS = ' '.join(CFLAGS)
CXXFLAGS = ' '.join(CXXFLAGS)
LIB = ' '.join(LIB)
# Rules
t = [ "rule compile_fortran_{id}",
" command = {FC} {FCFLAGS} -c $in -o $out",
" description = F : $short_in -> $short_out",
"",
"rule compile_touches_{id}",
" command = {FC} -c $in -o $out",
" description = F : $short_in -> $short_out",
"",
"",
"rule compile_c_{id}" ,
" command = {CC} {CFLAGS} -c $in -o $out",
" description = C : $short_in -> $short_out",
"",
"rule compile_cxx_{id}",
" command = {CXX} {CXXFLAGS} -c $in -o $out",
" description = C++ : $short_in -> $short_out",
"",
"rule link_lib_{id}",
" command = {AR} crf $out $in" ,
" description = Link: $short_out",
"",
"rule link_{id}",
" command = {FC} $in {LIB} -o $out" ,
" description = Link: $short_out"]
output += [ '\n'.join(t).format(id=irp_id, FC=FC, FCFLAGS=FCFLAGS, LIB=LIB, CXX=CXX, CXXFLAGS=CXXFLAGS, CC=CC, CFLAGS=CFLAGS, AR=AR) ]
# All modules : list of Fmodule objects
l_mod = list( modules.values() )
# Modules that are not targets
l_non_targets = [ x for x in l_mod if not x.is_main ]
# Common object/source files
l_common_o = [ "irp_touches.irp.o" ] + \
[ "{0}.irp.o".format(x.filename) for x in l_non_targets ] + \
[ "{0}.irp.module.o".format(x.filename) for x in l_non_targets ]
l_common_s = []
if command_line.do_debug:
l_common_o += [ "irp_stack.irp.o" ]
l_common_s += [ "irp_stack.irp.F90" ]
if command_line.do_openmp:
l_common_o += [ "irp_locks.irp.o" ]
l_common_s += [ "irp_locks.irp.F90" ]
if command_line.do_profile:
l_common_o += [ "irp_profile.irp.o", "irp_rdtsc.o" ]
l_common_s += [ "irp_profile.irp.F90", "irp_rdtsc.c" ]
l_common_o = map(dress,l_common_o) + map(lambda x: dress(x,in_root=True), OBJ)
l_common_s = map(dress,l_common_s) + map(lambda x: dress(x,in_root=True), SRC)
# IRP_touches
output.append(create_build_touches(l_common_o[1:]))
# All targets : list of Fmodule objects
l_targets = [ x for x in l_mod if x.is_main ]
# Create lines
for i in l_non_targets:
output.append (create_build_non_target(i,OBJ))
for i in l_targets:
output.append(create_build_target(i, l_common_o))
# Remaining files
for i in l_common_s:
output.append(create_build_remaining(i))
with open(FILENAME,'w') as f:
f.write('\n\n'.join(output))
f.write('\n')
create_irpf90_make([ x.filename for x in l_targets ] + [ os.path.join(irpdir,'irpf90.a') ] )
return

549
src/parsed_text.py
View File

@ -1,549 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from util import *
from irpf90_t import *
from variables import variables
from preprocessed_text import preprocessed_text
from subroutines import subroutines
import regexps, re
import error
vtuple = map(lambda v: (v, variables[v].same_as, variables[v].regexp), variables.keys())
stuple = map(lambda s: (s, subroutines[s].regexp), subroutines.keys())
stuple = filter(lambda s: subroutines[s[0]].is_function, stuple)
re_string_sub = regexps.re_string.sub
regexps_re_string_sub = regexps.re_string.sub
def find_variables_in_line(line):
assert isinstance(line,Line)
result = []
sub_done = False
buffer = line.lower
ap = result.append
for v,same_as,regexp in vtuple:
if v in buffer:
if not sub_done:
buffer = regexps_re_string_sub('',buffer)
sub_done = True
if regexp.search(buffer) is not None:
ap(same_as)
return result
def find_funcs_in_line(line):
assert isinstance(line,Line)
result = []
append = result.append
sub_done = False
buffer = line.lower
for s,regexp in stuple:
if s in buffer:
if regexp.search(buffer) is not None:
append(s)
return result
def find_subroutine_in_line(line):
assert type(line) == Call
buffer = line.text.split('(')[0]
buffer = buffer.split()[1].lower()
return buffer
def check_touch(line,vars,main_vars):
def fun(main_var):
if main_var not in variables:
error.fail(line,"Variable %s unknown"%(main_var,))
x = variables[main_var]
return [main_var]+x.others
all_others = make_single(flatten( map(fun,main_vars) ))
all_others.sort()
vars.sort()
for x,y in zip(vars,all_others):
if x != y:
message = "The following entities should be touched:\n"
message = "\n".join([message]+map(lambda x: "- %s"%(x,),all_others))
error.fail(line,message)
################################################################################
def update_variables():
for filename,text in preprocessed_text:
for line in filter(lambda x: type(x) in [ Touch, SoftTouch ], text):
vars = line.lower.split()
if len(vars) < 2:
error.fail(line,"Syntax error")
for v in vars[1:]:
if v not in variables:
error.fail(line,"Variable %s unknown"%(v,))
variables[v]._is_touched = True
for line in filter(lambda x: type(x) == Free,text):
vars = line.lower.split()
if len(vars) < 2:
error.fail(line,"Syntax error")
for v in vars[1:]:
if v not in variables:
error.fail(line,"Variable %s unknown"%(v,))
variables[v].is_freed = True
for line in filter(lambda x: type(x) == Irp_read,text):
variables[line.filename]._is_read = True
for line in filter(lambda x: type (x) == Irp_write,text):
variables[line.filename]._is_written = True
################################################################################
def get_parsed_text():
def func(filename, text):
varlist = []
result = []
append = result.append
for line in text: #filter(
# lambda x: type(x) not in [ Doc, Begin_doc, End_doc ],
# text):
if type(line) in [ \
Empty_line,
Continue,
Return,
Begin_shell,
End_shell,
Openmp,
Directive,
Use,
Enddo,
End_select,
Endif,
Implicit,
Program,
Subroutine,
Function,
End,
]:
append( ([],line) )
elif type(line) in [ Begin_provider, Cont_provider ]:
if type(line) == Begin_provider:
varlist = []
buffer = map(strip,line.lower.replace(']','').split(','))
assert len(buffer) > 1
v = buffer[1]
varlist.append(v)
variable_list = find_variables_in_line(line)
try:
variable_list.remove(variables[v].same_as)
except ValueError:
print v, variables[v].same_as
raise
append( (variable_list,line) )
elif type(line) == End_provider:
varlist = []
append( ([],line) )
elif type(line) == Provide:
l = line.lower.split()[1:]
l = filter(lambda x: x not in varlist, l)
for v in l:
if v not in variables:
error.fail(line,"Variable %s is unknown"%(v))
append( (l,Provide(line.i,"",line.filename)) )
append( (l,Simple_line(line.i,"!%s"%(line.text),line.filename)) )
elif type(line) == NoDep:
l = line.lower.split()[1:]
for v in l:
if v not in variables:
error.fail(line,"Variable %s is unknown"%(v))
l = map(lambda x: "-%s"%(x), l)
append( (l,Simple_line(line.i,"!%s"%(line.text),line.filename)) )
elif type(line) in [ Touch, SoftTouch ]:
vars = line.lower.split()
if len(vars) < 2:
error.fail(line,"Syntax error")
vars = vars[1:]
def fun(x):
main = variables[x].same_as
return main
main_vars = make_single( map(fun, vars) )
check_touch(line,vars,main_vars)
txt = " ".join(vars)
append ( (vars,Simple_line(line.i,"!",line.filename)) )
append ( ([],Simple_line(line.i,"! >>> TOUCH %s"%(txt,),line.filename)) )
def fun(x):
if x not in variables:
error.fail(line,"Variable %s unknown"%(x,))
return [ ([],Simple_line(line.i," call touch_%s"%(x,),line.filename)),
([],Use(line.i," use %s"%(variables[x].fmodule), line.filename)) ]
result += flatten(map( fun, main_vars ))
def fun(x):
if x not in variables:
error.fail(line,"Variable %s unknown"%(x,))
return ([],Simple_line(line.i," %s_is_built = .True."%(x,),line.filename))
result += map( fun, main_vars[:-1] )
if type(line) == SoftTouch:
append ( ([],Simple_line(line.i,"! <<< END TOUCH (Soft)",line.filename)) )
else:
append ( ([],Provide_all(line.i,"! <<< END TOUCH",line.filename)) )
elif type(line) == Call:
l = find_variables_in_line(line)
l = filter(lambda x: x not in varlist, l)
sub = find_subroutine_in_line(line)
if sub not in subroutines:
t = Simple_line
append( (l,Simple_line(line.i,line.text,line.filename)) )
else:
append( (l,line) )
if subroutines[sub].touches != []:
append( ([],Provide_all(line.i,"",line.filename)) )
elif type(line) == Free:
vars = line.lower.split()
vars = vars[1:]
append( ([],Simple_line(line.i,"!%s"%(line.text),line.filename)) )
use = map(lambda x: " use %s"%(variables[x].fmodule),vars)
for var in vars:
result += map(lambda x: ([],Use(line.i,x,line.filename)),
make_single(use))
result += map(lambda x: ([],Simple_line(line.i,x,line.filename)),
variables[var].free)
elif type(line) == Irp_read:
append( ([],Simple_line(line.i,"!%s"%(line.text),line.filename)) )
elif type(line) == Irp_write:
append( ([],Simple_line(line.i,"!%s"%(line.text),line.filename)) )
elif type(line) in [ Begin_doc, End_doc, Doc ]:
pass
else:
l = find_variables_in_line(line)
l = filter(lambda x: x not in varlist, l)
append( (l,line) )
return result
#main_result = []
#for filename,text in preprocessed_text:
# main_result.append( (filename, func(filename,text)) )
#return main_result
return parallel_loop(func,preprocessed_text)
update_variables()
parsed_text = get_parsed_text()
######################################################################
def move_to_top(text,t):
assert type(text) == list
assert t in [ NoDep, Declaration, Implicit, Use, Cont_provider ]
inside = False
for i in range(len(text)):
vars, line = text[i]
if type(line) in [ Begin_provider, Program, Subroutine, Function ]:
begin = i
inside = True
elif type(line) in [ End_provider, End ]:
inside = False
elif type(line) == t:
if inside:
text.pop(i)
begin += 1
text.insert(begin,(vars,line))
return text
result = []
for filename,text in parsed_text:
text = move_to_top(text,NoDep)
text = move_to_top(text,Declaration)
text = move_to_top(text,Implicit)
text = move_to_top(text,Use)
text = move_to_top(text,Cont_provider)
result.append ( (filename,text) )
parsed_text = result
######################################################################
def build_sub_needs():
# Needs
for filename, text in parsed_text:
sub = None
in_program = False
for vars,line in text:
if type(line) in [ Subroutine, Function ]:
subname = find_subname(line)
sub = subroutines[subname]
sub._needs = []
sub._to_provide = []
elif type(line) == End:
if not in_program:
sub._needs = make_single(sub._needs)
sub._to_provide = make_single(sub._to_provide)
sub = None
elif type(line) == Program:
in_program = True
if sub is not None:
if type(line) == Declaration:
sub._to_provide += vars
sub._needs += vars
build_sub_needs()
#####################################################################
def add_subroutine_needs():
main_result = []
for filename, text in parsed_text:
result = []
append = result.append
for vars,line in text:
if type(line) == Call:
subname = find_subname(line)
vars += subroutines[subname].to_provide
append( (vars,line) )
main_result.append( (filename, result) )
return main_result
parsed_text = add_subroutine_needs()
######################################################################
def move_variables():
def func(filename, text):
result = []
append = result.append
# 1st pass
varlist = []
ifvars = []
elsevars = []
old_varlist = []
old_ifvars = []
old_elsevars = []
revtext = list(text)
revtext.reverse()
try:
for vars,line in revtext:
if type(line) in [ End_provider,End ]:
varlist = []
append( ([],line) )
elif type(line) in [ Endif, End_select ]:
old_ifvars.append( list(ifvars) )
old_elsevars.append( list(elsevars) )
old_varlist.append( list(varlist) )
varlist = []
append( ([],line) )
elif type(line) == Else:
elsevars += list(varlist)
append( (varlist,line) )
varlist = []
elif type(line) in [ Elseif, Case ]:
ifvars += list(varlist)
append( (varlist,line) )
if vars != []:
varlist = old_varlist.pop()
varlist += vars
old_varlist.append( list(varlist) )
varlist = []
elif type(line) in [ If, Select ]:
ifvars += list(varlist)
append( (varlist,line) )
vars += filter(lambda x: x in elsevars, ifvars)
ifvars = old_ifvars.pop()
elsevars = old_elsevars.pop()
varlist = old_varlist.pop() + vars
elif type(line) in [ Begin_provider, Program, Subroutine, Function ]:
varlist += vars
append( (varlist,line) )
if old_varlist != [] \
or old_ifvars != [] \
or old_elsevars != []:
error.fail(line,"End if missing")
varlist = []
elif type(line) in (Provide,Provide_all):
append( (vars,line) )
else:
varlist += vars
append( ([],line) )
except:
error.fail(line,"Unable to parse file")
result.reverse()
# 2nd pass
text = result
result = []
append = result.append
old_varlist = []
varlist = []
try:
for vars,line in text:
if vars != []:
vars = make_single(vars)
if type(line) in [ Begin_provider, Program, Subroutine, Function ]:
varlist = list(vars)
elif type(line) in [ If, Select ]:
old_varlist.append(varlist)
vars = filter(lambda x: x not in varlist,vars)
varlist = make_single(varlist + vars)
assert old_varlist is not varlist
elif type(line) in [ Elseif, Else, Case ]:
varlist = old_varlist.pop()
old_varlist.append(varlist)
vars = filter(lambda x: x not in varlist,vars)
varlist = make_single(varlist + vars)
assert old_varlist is not varlist
elif type(line) in [ Endif, End_select ]:
varlist = old_varlist.pop()
elif type(line) == Provide_all:
vars += varlist
elif type(line) in [ End_provider, End ]:
assert old_varlist == []
varlist = []
for v in vars[:]:
if v[0] == '-':
vars.remove(v)
vars.remove(v[1:])
result.append( (vars,line) )
except:
error.fail(line,"Unable to parse file")
return result
main_result = []
for filename,text in parsed_text:
main_result.append( (filename, func(filename,text)) )
return main_result
#return parallel_loop(func,parsed_text)
parsed_text = move_variables()
######################################################################
def build_needs():
# Needs
for filename, text in parsed_text:
var = None
for vars,line in text:
if type(line) == Begin_provider:
buffer = map(strip,line.lower.replace(']',',').split(','))
var = variables[buffer[1]]
var.needs = []
var.to_provide = vars
elif type(line) == End_provider:
var.needs = make_single(var.needs)
var.to_provide = make_single(var.to_provide)
var = None
if var is not None:
var.needs += vars
if type(line) == Call:
subname = find_subname(line)
var.needs += subroutines[subname].needs
elif type(line) in [ \
Simple_line, Assert,
Do , If,
Elseif , Select,
]:
funcs = find_funcs_in_line(line)
for f in funcs:
var.needs += subroutines[f].needs
for v in variables:
main = variables[v].same_as
if main != v:
variables[v].needs = variables[main].needs
variables[v].to_provide = variables[main].to_provide
# Needed_by
for v in variables:
variables[v].needed_by = []
for v in variables:
main = variables[v].same_as
if main != v:
variables[v].needed_by = variables[main].needed_by
for v in variables:
var = variables[v]
if var.is_main:
for x in var.needs:
variables[x].needed_by.append(var.same_as)
for v in variables:
var = variables[v]
var.needed_by = make_single(var.needed_by)
build_needs()
result = []
for filename,text in parsed_text:
text = move_to_top(text,NoDep)
text = move_to_top(text,Declaration)
text = move_to_top(text,Implicit)
text = move_to_top(text,Use)
text = move_to_top(text,Cont_provider)
result.append ( (filename,text) )
parsed_text = result
######################################################################
from command_line import command_line
def check_opt():
if not command_line.do_checkopt:
return
for filename, text in parsed_text:
do_level = 0
for vars,line in text:
if not type(line) == Provide_all:
if do_level > 0 and vars != []:
print "Optimization: %s line %d"%(line.filename,line.i)
for v in vars:
print " PROVIDE ",v
if type(line) == Do:
do_level += 1
elif type(line) == Enddo:
do_level -= 1
check_opt()
######################################################################
def perform_loop_substitutions():
main_result = []
for filename, text in parsed_text:
result = []
append = result.append
for vars,line in text:
if type(line) in [ Do, If, Elseif ] :
for k,v in command_line.substituted.items():
reg = v[1]
while reg.search(line.text) is not None:
line.text = re.sub(reg,r'\1%s\3', line.text,count=1)%v[0]
append( (vars,line) )
main_result.append( (filename, result) )
return main_result
parsed_text = perform_loop_substitutions()
######################################################################
if __name__ == '__main__':
for i in range(len(parsed_text)):
if parsed_text[i][0] == sys.argv[1]:
print '!-------- %s -----------'%(parsed_text[i][0])
for line in parsed_text[i][1]:
print line[1]
print line[0], line[1].filename
#for i in subroutines:
# print i, subroutines[i].needs, subroutines[i].to_provide

925
src/preprocessed_text.py
View File

@ -1,925 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from irpf90_t import *
from regexps import *
import error
from command_line import command_line
from util import *
# Local regular expressions
re_endif = re.compile("end\s+if")
re_elseif = re.compile("else\s+if")
re_enddo = re.compile("end\s+do")
re_endtype= re.compile("end\s+type")
re_endmodule = re.compile("end\s+module")
re_endselect = re.compile("end\s+select")
re_endinterface = re.compile("end\s+interface")
# Local variables
Free_form = 0
Fixed_form = 1
######################################################################
# Dictionary of simple statements
simple_dict = {
"program": Program ,
"subroutine": Subroutine ,
"begin_shell": Begin_shell ,
"end_shell": End_shell ,
"begin_template": Begin_template ,
"end_template": End_template ,
"subst": Subst ,
"end_doc": End_doc ,
"begin_provider": Begin_provider ,
"&begin_provider": Cont_provider ,
"end_provider": End_provider ,
"assert": Assert ,
"touch": Touch ,
"soft_touch": SoftTouch ,
"provide": Provide ,
"no_dep": NoDep ,
"free": Free ,
"irp_if": Irp_If ,
"irp_else": Irp_Else ,
"irp_endif": Irp_Endif ,
"irp_read": Irp_read ,
"irp_write": Irp_write ,
"use": Use ,
"do": Do ,
"if": If ,
"case": Case ,
"elseif": Elseif ,
"else": Else ,
"enddo": Enddo ,
"endif": Endif ,
"endselect": End_select ,
"end": End ,
"include": Include ,
"call": Call ,
"continue": Continue ,
"return": Return ,
"implicit": Implicit ,
"save": Declaration ,
"function": Function ,
"recursive": Function ,
}
def get_type (i, filename, line, is_doc):
'''Find the type of a text line'''
assert type(i) == int
assert type(filename) == str
assert type(line) == str
assert type(is_doc) == bool
# add support for interface block
has_interface = False
line = line.rstrip()
line = line.replace("$IRP_ALIGN",command_line.align)
lower_line0 = line.lstrip().lower()
lower_line = lower_line0.replace("!"," ! ")
# Replacements
lower_line = re_elseif.sub("elseif",lower_line)
lower_line = re_enddo.sub("enddo",lower_line)
lower_line = re_endtype.sub("endtype",lower_line)
lower_line = re_endmodule.sub("endmodule",lower_line)
lower_line = re_endif.sub("endif",lower_line)
lower_line = re_endselect.sub("endselect",lower_line)
lower_line = re_endinterface.sub("endinterface",lower_line)
for c in """()'"[]""":
lower_line = lower_line.replace(c," "+c+" ")
buffer = lower_line.split()
if len(buffer) == 0:
return [ Empty_line(i,line,filename) ], is_doc
firstword = buffer[0]
if firstword.isdigit():
assert len(buffer) > 1
buffer = buffer[1:]
firstword = buffer[0]
# Identify line
if firstword == "endinterface":
has_interface = False
return [ Simple_line (i,line,filename) ], False
if firstword == "interface" or has_interface:
has_interface = True
return [ Simple_line (i,line,filename) ], False
if firstword == "end_doc":
return [ End_doc (i,line,filename) ], False
if firstword == "begin_doc":
return [ Begin_doc (i,line,filename) ], True
if is_doc:
return [ Doc (i,line,filename) ], is_doc
if firstword in simple_dict:
return [ simple_dict[firstword](i,line,filename) ], is_doc
if firstword in [ "select", "selectcase" ]:
return [ Select(i,line,filename) ] , is_doc
if len(lower_line0) > 4:
if firstword[0] == '#':
result = [ Simple_line(i,line,filename) ]
error.warn ( result[0] ,
"""irpf90 may not work with preprocessor directives. You can use
Irp_if ... Irp_else ... Irp_endif
instead of
#ifdef ... #else ... #endif""" )
return result, is_doc
if firstword.startswith("case("):
return [ Case(i,line,filename) ], is_doc
if lower_line0[1:5] == "$omp":
return [ Openmp(i,line,filename) ], is_doc
elif lower_line0[1:5] in ["dec$", "dir$"] and command_line.directives:
return [ Directive(i,line,filename) ], is_doc
elif lower_line0[1:3] == "$ ":
return [ Openmp(i,line,filename) ], is_doc
if re_decl.match(lower_line) is not None:
if "function" in buffer[1:3]:
return [ Function (i,line,filename) ], is_doc
else:
return [ Declaration (i,line,filename) ], is_doc
# Detect errors
if firstword == "dowhile":
error.fail( Do(i,line,filename) , "'do while' should be in 2 words." )
return [ Simple_line(i,line,filename) ], is_doc
######################################################################
def get_text(lines,filename):
'''Read the input file and transform it to labeled lines'''
assert type(filename) == str
assert type(lines) == list
result = []
is_doc = False
for i,line in enumerate(lines):
line, is_doc = get_type(i+1,filename,line,is_doc)
result += line
return result
######################################################################
def execute_shell(text):
'''Execute the embedded shell scripts'''
def fail(l,a,b): error.fail(l,"In Begin_Shell, %s '%s'"%(a,b))
inside = False
result = []
for line in text:
if inside:
if type(line) == Begin_shell:
error.fail(line,"Nested Begin_shell")
elif type(line) == End_shell:
inside = False
# Write script file
scriptname = "%s%s_shell_%d"%(irpdir,line.filename,line.i)
file = open(scriptname,'w')
file.writelines(script)
file.close()
scriptname = "%s_shell_%d"%(line.filename,line.i)
file = open(scriptname,'w')
file.writelines(script)
file.close()
# Execute shell
import os
pipe = os.popen("%s < %s"%(shell,scriptname),'r')
lines = pipe.readlines()
pipe.close()
result += get_text(lines,scriptname)
os.remove(scriptname)
else:
script.append(line.text+'\n')
else:
if type(line) == Begin_shell:
inside = True
begin = line.i
script = []
# Find shell executable
buffer = line.text.split('[')
if len(buffer) > 2:
fail(line,"Too many",'[')
elif len(buffer) < 2:
fail(line,"Missing",'[')
buffer = buffer[1]
buffer = buffer.split(']')
if len(buffer) > 2:
fail(line,"Too many",']')
elif len(buffer) < 2:
fail(line,"Missing",']')
shell = buffer[0].strip()
elif type(line) == End_shell:
error.fail(line,"Begin_shell missing")
else:
result.append(line)
return result
######################################################################
def execute_templates(text):
'''Execute the templates'''
def fail(l,a,b): error.fail(l,"In %s, %s"%(a,b))
def get_variables(line):
buffer = line.text.split('[',1)
if len(buffer)<2:
fail(line,"Subst","Syntax error")
buffer = buffer[1].replace(']','')
buffer = buffer.split(',')
return map(lambda x: '$%s'%(x.strip()), buffer)
TEMPLATE = 1
SUBST = 2
inside = 0
result = []
for line in text:
if inside == 0:
if type(line) == Begin_template:
script = []
inside = TEMPLATE
script = "template = \"\"\"\n"
else:
result.append(line)
elif inside == TEMPLATE:
if type(line) == Begin_template:
fail(line,"template", "Nested Begin_Template")
elif type(line) == End_template:
fail(line,"template","Missing Subst")
elif type(line) == Subst:
inside = SUBST
script += "\"\"\"\n"
variables = get_variables(line)
script += "v = []\n"
subst = ""
else:
script += line.text+"\n"
else: # inside == SUBST
if type(line) == Begin_template:
fail(line,"subst","Nested Begin_template")
elif type(line) == Subst:
fail(line,"subst","Subst already defined")
elif type(line) == End_template:
inside = 0
subst = subst.rstrip()
if subst[-2:] == ';;':
subst = subst[:-2]
for s in subst.split(';;'):
buffer = map(lambda x: x.strip(), s.split(';'))
if len(buffer) != len(variables):
fail(line,"subst","%d variables defined, and %d substitutions"%(len(variables),len(buffer)))
script += "v.append( { \\\n"
for t,v in zip(variables,buffer):
script += ' "%s": """%s""" ,\n'%(t,v)
script += "} )\n"
script += "for d in v:\n t0 = str(template)\n"
for v in variables:
script += " t0 = t0.replace('%s',d['%s'])\n"%(v,v)
script += " print t0\n"
# Write script file
scriptname = "%s%s_template_%d"%(irpdir,line.filename,line.i)
file = open(scriptname,'w')
file.writelines(script)
file.close()
scriptname = "%s_template_%d"%(line.filename,line.i)
file = open(scriptname,'w')
file.writelines(script)
file.close()
# Execute shell
import os
pipe = os.popen("python2 < %s"%(scriptname),'r')
lines = pipe.readlines()
pipe.close()
result += get_text(lines,scriptname)
os.remove(scriptname)
else:
subst += line.text+'\n'
return result
######################################################################
def form(text):
'''Find if the text is in fixed form or in free form'''
assert type(text) == list
if len(text) == 0:
return Free_form
assert isinstance(text[0],Line)
re2 = re.compile(r"^\s*[!#]")
re3 = re.compile(r"^\s*[^ 0-9]+")
for line in text:
if type(line) in [ Empty_line, Doc, Openmp, Directive ]:
pass
else:
if len(line.text) > 5:
test = line.text[0:5]
if test[0] in "Cc#!*":
pass
else:
if re2.match(test) is None and \
re3.match(test) is not None:
return Free_form
if line.text.rstrip()[-1] == '&':
return Free_form
return Fixed_form
######################################################################
def add_operators(text):
re_incr = re.compile(r"(\s*)(.*)(\+=)(.*$)", re.S)
re_decr = re.compile(r"(\s*)(.*)(-=)(.*$)", re.S)
re_mult = re.compile(r"(\s*)(.*)(\*=)(.*$)", re.S)
re_incr_if = re.compile(r"(.*)(\))(\s*)(.*)(\+=)(.*$)", re.S)
re_decr_if = re.compile(r"(.*)(\))(\s*)(.*)(-=)(.*$)", re.S)
re_mult_if = re.compile(r"(.*)(\))(\s*)(.*)(\*=)(.*$)", re.S)
'''Change additional operators'''
result = []
for line in text:
buffer = line.text
ls = buffer.strip()
if ls.startswith('print ') or \
ls.startswith('print*') or \
ls.startswith('write('):
pass
elif buffer.lstrip().startswith("if "):
if "+=" in buffer:
line.text = re.sub(re_incr_if, r'\1\2\4=\4+(\6)', buffer)
elif "-=" in buffer:
line.text = re.sub(re_incr_if, r'\1\2\4=\4-(\6)', buffer)
elif "*=" in buffer:
line.text = re.sub(re_incr_if, r'\1\2\4=\4*(\6)', buffer)
else:
if "+=" in buffer:
line.text = re.sub(re_incr, r'\1\2=\2+(\4)', buffer)
elif "-=" in buffer:
line.text = re.sub(re_decr, r'\1\2=\2-(\4)', buffer)
elif "*=" in buffer:
line.text = re.sub(re_mult, r'\1\2=\2*(\4)', buffer)
result.append(line)
return result
######################################################################
def remove_comments(text,form):
'''Remove all comments'''
result = []
def remove_after_bang(line):
match = re_comment.match(line)
if match is None:
return line
else:
return re_comment.split(line)[1].rstrip()
if form == Free_form:
for line in text:
if type(line) in [ Openmp, Doc, Directive] :
result.append(line)
elif type(line) == Empty_line:
pass
else:
newline = line.text.lstrip()
if newline == "" or newline[0] == "!":
pass
else:
line.text = remove_after_bang(line.text)
result.append(line)
return result
else:
for line in text:
if type(line) in [ Openmp, Doc, Directive ]:
result.append(line)
elif type(line) == Empty_line:
pass
else:
newline = line.text.lstrip()
if newline == "" or newline[0] == "!":
pass
else:
line.text = remove_after_bang(line.text)
if line.text[0] in "#123456789 ":
result.append(line)
return result
######################################################################
def remove_continuation(text,form):
'''Removes continuation lines'''
result = []
buffer = ""
number = 0
t = None
if form == Free_form:
for line in text:
if line.text[-1] == '&':
buffer = "%s%s\n"%(buffer,line.text)
if number == 0:
t = type(line)
number = line.i
else:
if number != 0:
newline = t(number, \
"%s%s"%(buffer,line.text), \
line.filename)
line = newline
number = 0
buffer = ""
result.append(line)
else:
rev_text = list(text)
rev_text.reverse()
for line in rev_text:
is_continuation = False
if type(line) == Simple_line:
if len(line.text) >= 6:
if line.text[5] != ' ':
is_continuation = True
if is_continuation:
buffer = "&\n%s %s %s"%(line.text[:5],line.text[6:],buffer)
else:
line.text = line.text+buffer
result.insert(0,line)
buffer = ""
return result
######################################################################
def irp_simple_statements(text):
'''Processes simple statements'''
def process_irp_rw(line,rw,t):
assert type(line) == t
buffer = line.text.split()
if len(buffer) == 2:
dummy, variable = buffer
num = "0"
elif len(buffer) == 3:
dummy, variable, num = buffer
else:
error.fail(line,"Error in IRP_%s statement"%(rw,))
variable = variable.lower()
i = line.i
f = line.filename
txt = line.text.lstrip()
result = [
Empty_line(i,"!",f),
t(i,"! >>> %s"%(txt,),variable ),
Provide_all(i," call %ser_%s('%s')"%(rw,variable,num),f),
Empty_line(i,"! >>> END %s "%(txt,),f ),
Empty_line(line.i,"!",f),
]
return result
def process_irp_read (line):
assert type(line) == Irp_read
return process_irp_rw(line,'read' ,Irp_read )
def process_irp_write(line):
assert type(line) == Irp_write
return process_irp_rw(line,'writ' ,Irp_write)
def process_return(line):
assert type(line) == Return
if command_line.do_debug:
newline = Simple_line(line.i," call irp_leave(irp_here)",line.filename)
result = [newline, line]
else:
result = [ line ]
return result
def debug_conditions(line):
'''Find condition in assert statement for debug'''
assert type(line) == Assert
match = re_test.search(line.text)
result = []
if match is not None:
matches = [ match.group(1).strip(), match.group(3).strip() ]
for m in matches:
ok = m != "" # not empty
ok = ok and not m.isdigit() # not a digit
ok = ok and "'" not in m # not a string
ok = ok and m.count('(') == m.count(')') # balanced parenthesis
if ok:
result.append ( Simple_line (line.i, " print *, '%s = ', %s"%(m,m), line.filename) )
result.append ( Simple_line (line.i, " print *, ''", line.filename) )
return result
def process_assert(line):
assert type(line) == Assert
if command_line.do_assert:
if '(' not in line.text or ')' not in line.text:
error.fail(line,"Syntax error in ASSERT statement (parentheses)")
condition = "(%s"%(line.text.split('(',1)[1])
if condition == "":
error.fail(line,"Error in Assert statement")
condition_str = condition.replace("'","''")
i = line.i
f = line.filename
txt = line.text.strip()
result = [
Empty_line(i, "!", f),
Empty_line(i, "! >>> %s"%(txt,), f),
If (i, " if (.not.%s) then"%(condition,), f),
Simple_line(i, " print *, irp_here//': Assert failed:'", f),
Simple_line(i, " print *, ' file: %s, line: %d'"%(f,i), f),
Simple_line(i, " print *, '%s'"%(condition_str,), f),
] + debug_conditions(line) + [
Simple_line(i, " stop 1", f),
Endif (i, " endif", f),
Empty_line(i, "! <<< END %s"%(txt,), f),
Empty_line(i, "!", f)
]
else:
result = []
return result
def process_end(line):
'''Set irp_here variable in provider block'''
line.text = "end"
if command_line.do_debug:
i = line.i
f = line.filename
result = [
Simple_line(i," call irp_leave(irp_here)", f),
line
]
else:
result = [ line ]
return result
def process_begin_provider(line):
assert type(line) == Begin_provider
buffer = line.lower.replace('['," ")
buffer = buffer.replace(']',"")
buffer = buffer.split(',')
if len(buffer) < 2:
error.fail(line,"Error in Begin_provider statement")
varname = buffer[1].strip()
length = len(varname)
i = line.i
f = line.filename
result = [ Begin_provider(i,line.text, (f,varname)),
Declaration(i," character*(%d) :: irp_here = '%s'"%(length,varname), f) ]
if command_line.do_debug:
result += [
Simple_line(i," call irp_enter(irp_here)", f),
]
return result
def process_cont_provider(line):
assert type(line) == Cont_provider
buffer = line.lower.replace('['," ")
buffer = buffer.replace(']',"")
buffer = buffer.split(',')
if len(buffer) < 2:
error.fail(line,"Error in Cont_provider statement")
varname = buffer[1].strip()
i = line.i
f = line.filename
return [ Cont_provider(i,line.text,(f,varname)) ]
def process_subroutine(line):
assert type(line) == Subroutine
subname = find_subname(line)
length = len(subname)
i = line.i
f = line.filename
result = [ line,
Declaration(i," character*(%d) :: irp_here = '%s'"%(length,subname), f) ]
if command_line.do_debug:
result += [
Simple_line(i," call irp_enter_f(irp_here)", f),
]
return result
def process_function(line):
assert type(line) == Function
subname = find_subname(line)
length = len(subname)
i = line.i
f = line.filename
result = [ line,
Declaration(i," character*(%d) :: irp_here = '%s'"%(length,subname), f) ]
if command_line.do_debug:
result += [
Simple_line(i," call irp_enter_f(irp_here)", f),
]
return result
def process_program(line):
assert type(line) == Program
program_name = line.lower.split()[1]
temp = [ Program(0,"program irp_program",program_name) ]
if command_line.do_profile:
temp += [ Simple_line(0,"call irp_init_timer()",line.filename) ]
if command_line.do_openmp:
temp += [ Simple_line(0," call irp_init_locks_%s()"%(irp_id),line.filename) ]
temp += [ Call(0," call %s"%(program_name),line.filename) ]
if command_line.do_profile:
temp += [ Simple_line(0,"call irp_print_timer()",line.filename) ]
temp += [ Simple_line(0," call irp_finalize_%s()"%(irp_id),line.filename) ]
temp += [ End(0,"end program",line.filename) ]
result = temp + \
process_subroutine( Subroutine(line.i,"subroutine %s"%(program_name,),line.filename) )
return result
d = { Irp_read : process_irp_read,
Irp_write : process_irp_write,
Return : process_return,
Assert : process_assert,
End : process_end,
Begin_provider : process_begin_provider,
Cont_provider : process_cont_provider,
End_provider : process_end,
Subroutine : process_subroutine,
Function : process_function,
Program : process_program,
}
result = []
for line in text:
buffer = [ line ]
for t in d:
if type(line) == t:
buffer = d[t](line)
break
result += buffer
return result
######################################################################
def change_includes(text):
'''Deals with include files'''
result = []
for line in text:
if type(line) == Include:
txt = line.text.replace('"',"'").split("'")
if len(txt) != 3:
print txt
error.fail(line,"Error in include statement")
directory = (("./"+line.filename).rsplit('/',1)[0]+'/')[2:]
if directory == "":
filename = txt[1].strip()
else:
filename = directory+txt[1].strip()
try:
file = open(filename,'r')
file.close()
result.append(Include(line.i,"! include '%s'"%filename,filename))
result += create_preprocessed_text(filename)
except IOError:
result.append(Declaration(line.i,line.text,line.filename))
else:
result.append(line)
return result
######################################################################
def process_old_style_do(text):
'''Changes old-style do loops to new style'''
assert type(text) == list
def change_matching_enddo(begin,number):
for i in range(begin+1,len(text)):
line = text[i]
if type(line) in [Continue,Enddo]:
buffer = line.text.split()
if buffer[0] == number:
text[i] = Enddo(line.i," enddo",line.filename)
return
error.fail(text[begin],"Old-style do loops should end with 'continue' or 'end do'")
result = []
for i in range(len(text)):
line = text[i]
if type(line) == Do:
buffer = line.text.split()
try:
if buffer[1].isdigit():
number = buffer.pop(1)
change_matching_enddo(i,number)
line.text = " ".join(buffer)
except IndexError:
pass
result.append(line)
return result
######################################################################
def change_single_line_ifs(text):
'''Changes:
if (test) result
to
if (test) then
result
endif'''
assert type(text) == list
result = []
for line in text:
if type(line) == If:
if line.lower.endswith("then"):
result.append(line)
else:
buffer = line.text
begin = buffer.find('(')
if begin < 0:
error.fail(line,"Error in if statement")
level = 0
instring = False
for i,c in enumerate(buffer[begin:]):
if c == "'":
instring = not instring
if instring:
pass
elif c == '(':
level +=1
elif c == ')':
level -= 1
if level == 0:
end = begin+i+1
break
if level != 0:
error.fail(line,"Error in if statement")
test = buffer[:end]
code = buffer[end:]
i = line.i
f = line.filename
result.append( If(i,"%s then"%(test,),f) )
result += get_type(i,f,code,False)[0]
result.append( Endif(i," endif",f) )
else:
result.append(line)
return result
######################################################################
def check_begin_end(text):
'''Checks x...endx consistence'''
filter_line = lambda line: type(line) in [ Do, Enddo, If, Endif, \
Program, Begin_provider, End_provider, \
Subroutine, Function, End, Begin_doc, End_doc ]
text = filter(filter_line, text)
d = { 'do' : Do, 'enddo': Enddo,
'if' : If, 'endif': Endif,
'_doc': Begin_doc, 'end_doc': End_doc}
assert type(text) == list
def find_matching_end_ifdo(begin,x):
level = 1
for i in range(begin+1,len(text)):
line = text[i]
if type(line) == d[x]:
level += 1
elif type(line) == d["end%s"%(x,)]:
level -= 1
if level == 0:
return True
elif type(line) in [End, End_provider]:
break
error.fail(text[begin],"Missing 'end%s'"%(x,))
def find_matching_end_subfunpro(begin,x):
line = text[begin]
for i in range(begin+1,len(text)):
line = text[i]
if type(line) == x:
return
if type(line) in [ Subroutine, Function, Program, Begin_provider ]:
error.fail(text[begin],type(line).str+" is not closed")
error.fail(text[begin],type(line).str + " is not closed")
level = 0
for i,line in enumerate(text):
if type(line) == Begin_doc:
find_matching_end_ifdo(i,'_doc')
for i,line in enumerate(text):
if type(line) == Do:
find_matching_end_ifdo(i,'do')
elif type(line) == If:
find_matching_end_ifdo(i,'if')
elif type(line) in [Subroutine, Function, Program]:
level += 1
find_matching_end_subfunpro(i,End)
elif type(line) == Begin_provider:
level += 1
find_matching_end_subfunpro(i,End_provider)
elif type(line) == End:
level -= 1
elif type(line) == End_provider:
level -= 1
if level < 0:
error.fail(line,"Beginning of block not matched")
return True
######################################################################
def remove_ifdefs(text):
assert type(text) == list
result = []
do_print = True
for line in text:
if type(line) == Irp_If:
var = line.text.split()[1]
do_print = var in command_line.defined
elif type(line) == Irp_Else:
do_print = not do_print
elif type(line) == Irp_Endif:
do_print = True
else:
if do_print:
result.append(line)
return result
######################################################################
def check_OpenMP(text):
assert type(text) == list
result = []
inside_openmp = False
for line in text:
if type(line) == Openmp:
# Detect OpenMP blocks
buffer = line.text.lower().split()
if buffer[1] == "parallel":
inside_openmp = True
if buffer[1] == "end" and buffer[2] == "parallel":
inside_openmp = False
result.append(line)
if inside_openmp:
if type(line) in [ Provide_all, Provide, Touch, SoftTouch ]:
error.fail(line,type(line).str+" is not allowed in an OpenMP block.")
return result
######################################################################
def create_preprocessed_text(filename):
file = open(filename,"r")
lines = file.readlines()
file.close()
result = get_text(lines,filename)
result = execute_templates(result)
result = execute_shell(result)
fortran_form = form(result)
result = remove_ifdefs(result)
result = remove_comments(result,fortran_form)
result = remove_continuation(result,fortran_form)
result = add_operators(result)
result = change_includes(result)
result = change_single_line_ifs(result)
result = process_old_style_do(result)
result = irp_simple_statements(result)
result = check_OpenMP(result)
check_begin_end(result)
return result
######################################################################
preprocessed_text = parallel_loop( lambda x,y: create_preprocessed_text(x), \
map(lambda x: (x,None), irpf90_files ) )
######################################################################
def debug():
for filename, txt in preprocessed_text:
if filename == 'invert.irp.f':
print "=== "+filename+" ==="
for line in txt:
print line
print irpf90_files
if __name__ == '__main__':
debug()

184
src/profile.py
View File

@ -1,184 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
rdtsc = """
#ifdef __i386
double irp_rdtsc_(void) {
unsigned long long x;
__asm__ volatile ("rdtsc" : "=A" (x));
return (double) x;
}
#elif __amd64
double irp_rdtsc_(void) {
unsigned long long a, d;
__asm__ volatile ("rdtsc" : "=a" (a), "=d" (d));
return (double)((d<<32) | a);
}
#endif
"""
import subprocess
import tempfile
import os
import threading
from irpf90_t import irpdir
def build_rdtsc():
filename = irpdir+"irp_rdtsc.c"
file = open(filename,'w')
file.write(rdtsc)
file.close()
def t():
p = subprocess.Popen(["gcc","-O2",filename,"-c","-o","irp_rdtsc.o"])
p.communicate()
os.remove(filename)
threading.Thread(target=t).start()
def build_module():
from variables import variables
data = """
module irp_timer
double precision :: irp_profile(3,%(n)d)
integer :: irp_order(%(n)d)
character*(64) :: irp_profile_label(%(n)d)
double precision :: irp_rdtsc_shift
contains
subroutine profile_sort ()
implicit none
character*(64) :: xtmp
integer :: i, i0, j, jmax
do i=1,size(irp_profile_label)
irp_order(i)=i
enddo
do i=1,size(irp_profile_label)
xtmp = irp_profile_label(i)
i0 = irp_order(i)
j = i-1
do j=i-1,1,-1
if ( irp_profile_label(j) > xtmp ) then
irp_profile_label(j+1) = irp_profile_label(j)
irp_order(j+1) = irp_order(j)
else
exit
endif
enddo
irp_profile_label(j+1) = xtmp
irp_order(j+1) = i0
enddo
end subroutine profile_sort
end module
subroutine irp_init_timer
use irp_timer
implicit none
integer :: i
double precision :: irp_rdtsc, t0
irp_profile = 0.d0
irp_rdtsc_shift = 0.d0
do i=1,1000000
t0 = irp_rdtsc()
enddo
irp_rdtsc_shift = 1.d-6*(irp_rdtsc()-t0)
%(text)s
end
subroutine irp_set_timer(i,value)
use irp_timer
implicit none
integer, intent(in) :: i
double precision, intent(inout) :: value
value = value - irp_rdtsc_shift
irp_profile(1,i) = irp_profile(1,i) + value
irp_profile(2,i) = irp_profile(2,i) + value*value
irp_profile(3,i) = irp_profile(3,i) + 1.d0
end
subroutine irp_print_timer()
use irp_timer
implicit none
integer :: i, ii
double precision :: error, sigma2, average, average2, frequency, t0
double precision :: irp_rdtsc
t0 = irp_rdtsc()
call sleep(1)
frequency = (irp_rdtsc()-t0-irp_rdtsc_shift)
call profile_sort()
print '(A24,A8,A17,A20,A13,A20)', '', 'N.Calls', 'Tot Cycles', 'Avg Cycles', &
'Tot Secs', 'Avg Secs'
print '(A)', '---------------------------------------------------'// &
'---------------------------------------------------'
do ii=1,%(n)d
i = irp_order(ii)
if (irp_profile(3,i) > 0.) then
error = 0.d0
average = irp_profile(1,i)/irp_profile(3,i)
if (irp_profile(3,i) > 1.d0) then
average2 = irp_profile(2,i)/irp_profile(3,i)
sigma2 = (average2 - average*average)
error = sqrt(sigma2/(irp_profile(3,i)+1.d0))
endif
print '(A24 , F8.0 , X,F12.0 , X,F12.0,A3,F8.0, X,F12.8, X,F8.5,A3,F8.5 )', &
irp_profile_label(ii), &
irp_profile(3,i), &
irp_profile(1,i), &
average, '+/-', error, &
irp_profile(1,i)/frequency, &
average/frequency, '+/-', error/frequency
endif
enddo
print *, 'Frequency :', frequency*1.d-9, ' GHz'
print *, 'rdtsc latency :', irp_rdtsc_shift, ' cycles'
end
"""
label = {}
for i in variables:
vi = variables[i]
label[vi.label] = vi.same_as
text = []
lmax = 0
for l in label:
text.append(" irp_profile_label(%d) = '%s'"%(l,label[l]))
lmax = max(lmax,l)
text.sort()
text = '\n'.join(text)
data = data%{'text': text, 'n':lmax}
file = open("IRPF90_temp/irp_profile.irp.F90",'w')
file.write(data)
file.close()
def run():
build_module()
build_rdtsc()
if __name__ == "__main__":
build_rdtsc()

57
src/regexps.py
View File

@ -1,57 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import re
re_comment = re.compile(r"^([^'!]*)('[^']*'[^']*)*!")
re_decl = re.compile( "".join( [ r"^\ *",
r"(integer[(::)?\* ,]+",
r"|double *precision[(::)?\* ,]+",
r"|logical[(::)?\* ,]+",
r"|character[(::)?\* ,]+",
r"|real[(::)?\* ,]+",
r"|dimension[(::)?\* ,]+",
r"|parameter[(::)?\* ,]+",
r"|data */",
r"|allocatable *(::)?",
r"|common */",
r"|namelist */",
r"|save */",
r"|complex[(::)?\* ,]+",
r"|intrinsic *(::)?",
r"|external *(::)?",
r"|equivalence *(::)?",
r"|type",
r"|end ?type",
r")[^=(]"
] ) )
re_test = re.compile(r"\( *(.*)(\.[a-zA-Z]*\.|[<>]=?|[=/]=)([^=]*)\)")
re_string = re.compile(r"'.*?'")

131
src/subroutine.py
View File

@ -1,131 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from irpf90_t import *
from util import *
import error
class Sub(object):
############################################################
def __init__(self,text):
assert type(text) == list
assert len(text) > 0
assert type(text[0]) in [Subroutine, Function]
self.text = text
self.called_by = []
############################################################
def name(self):
'''Name is lowercase'''
if '_name' not in self.__dict__:
self._name = find_subname(self.line)
return self._name
name = property(name)
############################################################
def is_function(self):
if '_is_function' not in self.__dict__:
self._is_function = "function" in self.line.lower
return self._is_function
is_function = property(is_function)
############################################################
def doc(self):
if '_doc' not in self.__dict__:
def f(l): return
buffer = filter(lambda l:type(l) == Doc, self.text)
self._doc = map(lambda l: l.text.lstrip()[1:], buffer)
if buffer == []:
error.warn(None,"Subroutine %s is not documented"%(self.name))
return self._doc
doc = property(doc)
############################################################
def line(self):
if '_line' not in self.__dict__:
self._line = self.text[0]
return self._line
line = property(line)
############################################################
def touches(self):
if '_touches' not in self.__dict__:
from subroutines import subroutines
self._touches = []
for line in filter(lambda x: type(x) in [Touch, SoftTouch],self.text):
self._touches += line.text.split()[1:]
for sub in self.calls:
if sub in subroutines:
self._touches += subroutines[sub].touches
self._touches = make_single(self._touches)
return self._touches
touches = property(touches)
############################################################
def needs(self):
if '_needs' not in self.__dict__:
import parsed_text
self._needs = make_single(self._needs)
return self._needs
needs = property(needs)
############################################################
def to_provide(self):
if '_to_provide' not in self.__dict__:
import parsed_text
return self._to_provide
to_provide = property(to_provide)
############################################################
def regexp(self):
if '_regexp' not in self.__dict__:
import re
self._regexp = re.compile( \
r"([^a-z0-9'\"_]|^)%s([^a-z0-9_]|$)"%(self.name),re.I)
return self._regexp
regexp = property(regexp)
############################################################
def calls(self):
if '_calls' not in self.__dict__:
buffer = filter(lambda x: type(x) == Call,self.text)
self._calls = []
for line in buffer:
sub = line.text.split('(',1)[0].split()[1].lower()
self._calls.append(sub)
self._calls = make_single(self._calls)
return self._calls
calls = property(calls)
######################################################################
if __name__ == '__main__':
from preprocessed_text import preprocessed_text
from variables import variables
from subroutines import subroutines
print map(lambda x: variables[x].needs, subroutines['full_ci'].needs)
print subroutines['full_ci'].calls

72
src/subroutines.py
View File

@ -1,72 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from util import *
from subroutine import *
from variables import variables
from variable import Variable
from irpf90_t import *
def create_subroutines():
from preprocessed_text import preprocessed_text
result = {}
for filename, text in preprocessed_text:
buffer = []
inside = False
for line in text:
if type(line) in [ Subroutine, Function ]:
inside = True
if inside:
buffer.append(line)
if isinstance(line,End):
if inside:
v = Sub(buffer)
result[v.name] = v
buffer = []
inside = False
return result
def create_called_by(subs,vars):
for s in subs.values() + vars.values():
if type(s) == Variable and s.same_as != s.name:
continue
for x in s.calls:
try:
subs[x].called_by.append(s.name)
except KeyError:
pass
for s in subs.values():
s.called_by = make_single(s.called_by)
s.called_by.sort()
subroutines = create_subroutines()
create_called_by(subroutines,variables)
if __name__ == '__main__':
for v in subroutines.keys():
print v

73
src/touches.py
View File

@ -1,73 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from irpf90_t import *
from util import *
from variables import variables
from modules import modules
FILENAME=irpdir+'irp_touches.irp.F90'
def create():
out = []
l = variables.keys()
l.sort
main_modules = filter(lambda x: modules[x].is_main, modules)
finalize = "subroutine irp_finalize_%s\n"%(irp_id)
for m in filter(lambda x: not modules[x].is_main, modules):
finalize += " use %s\n"%(modules[m].name)
for v in l:
var = variables[v]
var_in_main = False
for m in main_modules:
if var.fmodule == modules[m].name:
var_in_main = True
break
if not var_in_main:
if var.is_touched:
out += var.toucher
if var.dim != []:
finalize += " if (allocated(%s)) then\n"%v
finalize += " %s_is_built = .False.\n"%var.same_as
finalize += " deallocate(%s)\n"%v
finalize += " endif\n"
finalize += "end\n"
if out != []:
out = map(lambda x: "%s\n"%(x),out)
out += finalize
if not same_file(FILENAME,out):
file = open(FILENAME,'w')
file.writelines(out)
file.close()
if __name__ == '__main__':
create()

192
src/util.py
View File

@ -1,192 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import os
NTHREADS=1 #int(os.getenv('OMP_NUM_THREADS',1))
def strip(x):
return x.strip()
def lower(x):
return x.lower()
def same_file(filename,txt):
assert isinstance(filename,str)
if (type(txt) == list):
buffer = ''.join(txt)
else:
buffer = txt
try:
file = open(filename,"r")
except IOError:
return False
stream = file.read()
file.close()
if len(stream) != len(buffer):
return False
if stream != buffer:
return False
return True
def build_dim(dim):
if len(dim) == 0:
return ""
else:
return "(%s)"%( ",".join(dim) )
def build_dim_colons(v):
d = v.dim
if d == []:
return ""
else:
x = map(lambda x: ":", d)
return "(%s)"%(','.join(x))
import error
def find_subname(line):
buffer = line.lower
if not buffer.endswith(')'):
buffer += "()"
buffer = buffer.split('(')
buffer = buffer[0].split()
if len(buffer) < 2:
error.fail(line,"Syntax Error")
return buffer[-1]
def make_single(l):
d = {}
for x in l:
d[x] = True
return d.keys()
def flatten(l):
if type(l) == list:
result = []
for i in range(len(l)):
elem = l[i]
result += flatten(elem)
return result
else:
return [l]
def dimsize(x):
assert isinstance(x,str)
buffer = x.split(':')
if len(buffer) == 1:
return x
else:
assert len(buffer) == 2
size = ""
b0, b1 = buffer
if b0.replace('-','').isdigit() and b1.replace('-','').isdigit():
size = str( int(b1) - int(b0) + 1 )
else:
if b0.replace('-','').isdigit():
size = "(%s) - (%d)"%(b1,int(b0)-1)
elif b1.replace('-','').isdigit():
size = "(%d) - (%s)"%(int(b1)+1,b0)
else:
size = "(%s) - (%s) + 1"%(b1,b0)
return size
def put_info(text,filename):
assert type(text) == list
if len(text) > 0:
assert type(text[0]) == tuple
from irpf90_t import Line
assert type(text[0][0]) == list
assert isinstance(text[0][1], Line)
lenmax = 80 - len(filename)
format = "%"+str(lenmax)+"s ! %s:%4s"
for vars,line in text:
line.text = format%(line.text.ljust(lenmax),line.filename,str(line.i))
return text
import cPickle as pickle
import os, sys
def parallel_loop(f,source):
pidlist = range(NTHREADS)
src = [ [] for i in xrange(NTHREADS) ]
index = 0
try:
source = map( lambda x: (len(x[1]),(x[0], x[1])), source )
source.sort()
source = map( lambda x: x[1], source )
except:
pass
for i in source:
index += 1
if index == NTHREADS:
index = 0
src[index].append(i)
thread_id = 0
fork = 1
r = range(0,NTHREADS)
for thread_id in xrange(1,NTHREADS):
r[thread_id], w = os.pipe()
fork = os.fork()
if fork == 0:
os.close(r[thread_id])
w = os.fdopen(w,'w')
break
else:
os.close(w)
r[thread_id] = os.fdopen(r[thread_id],'r')
pidlist[thread_id] = fork
thread_id = 0
result = []
for filename, text in src[thread_id]:
result.append( (filename, f(filename,text)) )
result.sort()
if fork == 0:
pickle.dump(result,w,-1)
w.close()
os._exit(0)
for i in xrange(1,NTHREADS):
result += pickle.load(r[i])
r[i].close()
os.waitpid(pidlist[i],0)[1]
return result
if __name__ == '__main__':
print "10",dimsize("10") #-> "10"
print "0:10",dimsize("0:10") # -> "11"
print "0:x",dimsize("0:x") # -> "x+1"
print "-3:x",dimsize("-3:x") # -> "x+1"
print "x:y",dimsize("x:y") # -> "y-x+1"
print "x:5",dimsize("x:5") # -> "y-x+1"

702
src/variable.py
View File

@ -1,702 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from irpf90_t import *
from util import *
import error
from command_line import command_line
class Variable(object):
############################################################
def __init__(self,text,label,name = None):
assert type(text) == list
assert len(text) > 0
assert type(text[0]) == Begin_provider
self.label = label
self.text = text
if name is not None:
self._name = name
############################################################
def is_touched(self):
if '_is_touched' not in self.__dict__:
from variables import variables
result = self.is_read
for i in self.children:
if variables[i].is_touched:
result = True
break
self._is_touched = result
return self._is_touched
is_touched = property(is_touched)
############################################################
def has_openmp(self):
if '_has_openmp' not in self.__dict__:
self._has_openmp = False
self.builder()
return self._has_openmp
has_openmp = property(has_openmp)
############################################################
def is_written(self):
if '_is_written' not in self.__dict__:
from variables import variables
result = False
for i in self.parents:
if variables[i].is_written:
result = True
break
self._is_written = result
return self._is_written
is_written = property(is_written)
############################################################
def is_read(self):
if '_is_read' not in self.__dict__:
from variables import variables
result = False
for i in self.parents:
if variables[i].is_read:
result = True
break
self._is_read = result
return self._is_read
is_read = property(is_read)
############################################################
def is_main(self):
if '_is_main' not in self.__dict__:
self._is_main = (self.name == self.same_as)
return self._is_main
is_main = property(is_main)
############################################################
def name(self):
'''Name is lowercase'''
if '_name' not in self.__dict__:
buffer = None
text = self.text
for line in text:
if type(line) == Begin_provider:
self._name = line.filename[1]
if "(" in self._name:
error.fail(line,"""'(' not allowed in variable name.
A ',' is probably missing between the name of the variable and the
dimension.
""")
break
return self._name
name = property(name)
############################################################
def doc(self):
if '_doc' not in self.__dict__:
text = self.text
buffer = filter(lambda l:type(l) == Doc, text)
self._doc = map(lambda l: l.text.lstrip()[1:], buffer)
if buffer == []:
error.warn(None,"Variable %s is not documented"%(self.name))
return self._doc
doc = property(doc)
############################################################
def documented(self):
if '_documented' not in self.__dict__:
self._documented = (self.doc != [])
return self._documented
documented = property(documented)
############################################################
def includes(self):
if '_includes' not in self.__dict__:
self._includes = []
text = self.text
for line in filter(lambda x: type(x) == Include,text):
self._includes.append(line.filename)
make_single(self._includes)
return self._includes
includes = property(includes)
############################################################
def calls(self):
if '_calls' not in self.__dict__:
self._calls = []
text = self.text
for line in filter(lambda x: type(x) == Call,text):
sub = line.text.split('(',1)[0].split()[1].lower()
self._calls.append(sub)
make_single(self._calls)
return self._calls
calls=property(fget=calls)
############################################################
def others(self):
if '_others' not in self.__dict__:
result = []
append = result.append
f = lambda l: type(l) in [Begin_provider, Cont_provider]
text = self.text
lines = filter(f, text)
for line in lines:
append(line.filename[1])
result.remove(self.name)
self._others = result
return self._others
others = property(others)
############################################################
def same_as(self):
if '_same_as' not in self.__dict__:
if type(self.line) == Begin_provider:
result = self.name
else:
result = self.text[0].filename[1]
self._same_as = result
return self._same_as
same_as = property(same_as)
############################################################
def allocate(self):
if '_allocate' not in self.__dict__:
if not self.is_main:
self._allocate = []
else:
from variables import variables
def f(var):
return variables[var].dim != []
self._allocate = filter ( f, self.others + [self.name] )
return self._allocate
allocate = property(allocate)
############################################################
def dim(self):
if '_dim' not in self.__dict__:
line = self.line.text.split('!')[0]
buffer = line.replace(']','').split(',',2)
if len(buffer) == 2:
self._dim = []
else:
buffer = buffer[2].strip()[1:-1].split(',')
self._dim = map(strip,buffer)
return self._dim
dim = property(dim)
############################################################
def type(self):
if '_type' not in self.__dict__:
line = self.line.text
buffer = line.split(',')[0]
try:
buffer = buffer.split('[')[1].strip()
except IndexError:
error.fail(None,"Error in definition of %s."%(self.name))
if self.dim != []:
buffer = "%s, allocatable"%(buffer)
self._type = buffer
return self._type
type = property(type)
############################################################
def fmodule(self):
if '_fmodule' not in self.__dict__:
self._fmodule = self.line.filename[0].replace('/','__').split('.irp.f')[0]+'_mod'
return self._fmodule
fmodule = property(fmodule)
############################################################
def regexp(self):
if '_regexp' not in self.__dict__:
import re
self._regexp = re.compile( \
r"([^a-z0-9'\"_]|^)%s([^a-z0-9_]|$)"%(self.name),re.I)
return self._regexp
regexp = property(regexp)
############################################################
def line(self):
if '_line' not in self.__dict__:
f = lambda l: type(l) in [Begin_provider, Cont_provider]
text = self.text
lines = filter(f, text)
for line in lines:
buffer = line.filename[1]
if self._name == buffer:
self._line = line
break
assert '_line' in self.__dict__
return self._line
line = property(line)
############################################################
def header(self):
if '_header' not in self.__dict__:
name = self.name
self._header = [ " %s :: %s %s"%(self.type, name, build_dim_colons(self) ) ]
if command_line.coarray:
if self.dim == []:
self._header[0] += " [*]"
else:
self._header[0] += " [:]"
if self.dim != [] and command_line.align != '1':
self._header += [" !DIR$ ATTRIBUTES ALIGN: %s :: %s"%(command_line.align,name)]
if self.is_main:
self._header += [ " logical :: %s_is_built = .False."%(name) ]
return self._header
header = property(header)
############################################################
def toucher(self):
if '_toucher' not in self.__dict__:
if not self.is_main:
self._toucher = []
else:
from modules import modules
from variables import variables
if '_needed_by' not in self.__dict__:
import parsed_text
parents = self.parents
parents.sort()
mods = map(lambda x: variables[x].fmodule, parents)
mods = make_single(mods)+[self.fmodule]
name = self.name
result = [ "subroutine touch_%s"%(name) ]
result += map(lambda x: " Use %s"%(x),mods)
result.append(" implicit none")
if command_line.do_debug:
length = str(len("touch_%s"%(name)))
result += [ " character*(%s) :: irp_here = 'touch_%s'"%(length,name) ]
if command_line.do_debug:
result += [ " call irp_enter(irp_here)" ]
result += map( lambda x: " %s_is_built = .False."%(x), parents)
result.append(" %s_is_built = .True."%(name))
if command_line.do_debug:
result.append(" call irp_leave(irp_here)")
result.append("end subroutine touch_%s"%(name))
result.append("")
self._toucher = result
return self._toucher
toucher = property(toucher)
##########################################################
def locker(self):
if '_locker' not in self.__dict__:
if not command_line.do_openmp:
self._locker = []
else:
from modules import modules
from variables import variables
name = self.name
result = [ "subroutine irp_lock_%s(set)"%(name) ]
result += [ " use omp_lib",
" implicit none",
" logical, intent(in) :: set",
" integer(kind=omp_nest_lock_kind),save :: %s_lock"%(name),
" integer,save :: ifirst",
]
if command_line.do_debug:
length = str(len("irp_lock_%s"%(name)))
result += [ " character*(%s) :: irp_here = 'irp_lock_%s'"%(length,name),
" call irp_enter(irp_here)" ]
result += [ " if (ifirst == 0) then",
" ifirst = 1",
" call omp_init_nest_lock(%s_lock)"%(name),
" endif",
" if (set) then",
" call omp_set_nest_lock(%s_lock)"%(name),
" else",
" call omp_unset_nest_lock(%s_lock)"%(name),
" endif",
]
if command_line.do_debug:
result.append(" call irp_leave(irp_here)")
result.append("end subroutine irp_lock_%s"%(name))
result.append("")
self._locker = result
return self._locker
locker = property(locker)
##########################################################
def reader(self):
if '_reader' not in self.__dict__:
if not self.is_main:
self._reader = []
else:
if '_needs' not in self.__dict__:
import parsed_text
from variables import variables
name = self.name
result = [ \
"subroutine reader_%s(irp_num)"%(name),
" use %s"%(self.fmodule),
" implicit none",
" character*(*), intent(in) :: irp_num",
" logical :: irp_is_open",
" integer :: irp_iunit" ]
if command_line.do_debug:
length = len("reader_%s"%(self.name))
result += [\
" character*(%d) :: irp_here = 'reader_%s'"%(length,name),
" call irp_enter(irp_here)" ]
result += map(lambda x: " call reader_%s(irp_num)"%(x),self.needs)
result += [ \
" irp_is_open = .True.",
" irp_iunit = 9",
" do while (irp_is_open)",
" irp_iunit = irp_iunit+1",
" inquire(unit=irp_iunit,opened=irp_is_open)",
" enddo"]
for n in [ name ]+self.others:
result += [\
" open(unit=irp_iunit,file='irpf90_%s_'//trim(irp_num),form='FORMATTED',status='OLD',action='READ')"%(n),
" read(irp_iunit,*) %s%s"%(n,build_dim_colons(variables[n])),
" close(irp_iunit)" ]
result += [ \
" call touch_%s"%(name),
" %s_is_built = .True."%(name) ]
if command_line.do_debug:
result.append(" call irp_leave(irp_here)")
result.append("end subroutine reader_%s"%(name))
result.append("")
self._reader = result
return self._reader
reader = property(reader)
##########################################################
def writer(self):
if '_writer' not in self.__dict__:
if not self.is_main:
self._writer = []
else:
from variables import variables
if '_needs' not in self.__dict__:
import parsed_text
name = self.name
result = [ \
"subroutine writer_%s(irp_num)"%(name),
" use %s"%(self.fmodule),
" implicit none",
" character*(*), intent(in) :: irp_num",
" logical :: irp_is_open",
" integer :: irp_iunit" ]
if command_line.do_debug:
length = len("writer_%s"%(self.name))
result += [\
" character*(%d) :: irp_here = 'writer_%s'"%(length,name),
" call irp_enter(irp_here)" ]
result += [ \
" if (.not.%s_is_built) then"%(self.same_as),
" call provide_%s"%(self.same_as),
" endif" ]
result += map(lambda x: " call writer_%s(irp_num)"%(x),self.needs)
result += [ \
" irp_is_open = .True.",
" irp_iunit = 9",
" do while (irp_is_open)",
" irp_iunit = irp_iunit+1",
" inquire(unit=irp_iunit,opened=irp_is_open)",
" enddo" ]
for n in [ name ] + self.others:
result += [\
" open(unit=irp_iunit,file='irpf90_%s_'//trim(irp_num),form='FORMATTED',status='UNKNOWN',action='WRITE')"%(n),
" write(irp_iunit,*) %s%s"%(n,build_dim_colons(variables[n])),
" close(irp_iunit)" ]
if command_line.do_debug:
result.append(" call irp_leave(irp_here)")
result.append("end subroutine writer_%s"%(name))
result.append("")
self._writer = result
return self._writer
writer = property(writer)
##########################################################
def free(self):
if '_free' not in self.__dict__:
name = self.name
result = [ "!","! >>> FREE %s"%(name),
" %s_is_built = .False."%(self.same_as) ]
if self.dim != []:
if command_line.do_memory:
result += [ \
" if (allocated(%s)) then"%(name),
" deallocate (%s)"%(name),
" print *, 'Deallocating %s'"%(name),
" endif" ]
else:
result += [ \
" if (allocated(%s)) then"%(name),
" deallocate (%s)"%(name),
" endif" ]
result.append("! <<< END FREE")
self._free = result
return self._free
free = property(free)
##########################################################
def provider(self):
if '_provider' not in self.__dict__:
if not self.is_main:
self._provider = []
else:
if '_to_provide' not in self.__dict__:
import parsed_text
from variables import variables, build_use, call_provides
name = self.name
same_as = self.same_as
def build_alloc(name):
self = variables[name]
if self.dim == []:
return []
def do_size():
result = " print *, ' size: ("
result += ','.join(self.dim)
return result+")'"
def check_dimensions():
result = map(lambda x: "(%s>0)"%(dimsize(x)), self.dim)
result = ".and.".join(result)
result = " if (%s) then"%(result)
return result
def dimensions_OK():
result = [ " irp_dimensions_OK = .True." ]
for i,k in enumerate(self.dim):
result.append(" irp_dimensions_OK = irp_dimensions_OK.AND.(SIZE(%s,%d)==(%s))"%(name,i+1,dimsize(k)))
return result
def do_allocate():
if command_line.coarray:
result = " allocate(%s(%s)[*],stat=irp_err)"
else:
result = " allocate(%s(%s),stat=irp_err)"
result = result%(name,','.join(self.dim))
if command_line.do_memory:
tmp = "\n print *, %s, 'Allocating %s(%s)'"
d = ','.join(self.dim)
result += tmp%('size('+name+')',name,d)
return result
result = [ " if (allocated (%s) ) then"%(name) ]
result += dimensions_OK()
result += [\
" if (.not.irp_dimensions_OK) then",
" deallocate(%s,stat=irp_err)"%(name),
" if (irp_err /= 0) then",
" print *, irp_here//': Deallocation failed: %s'"%(name),
do_size(),
" endif"]
if command_line.do_memory:
result += [\
" print *, 'Deallocating %s'"%(name) ]
result.append(check_dimensions())
result.append(do_allocate())
result += [\
" if (irp_err /= 0) then",
" print *, irp_here//': Allocation failed: %s'"%(name),
do_size(),
" endif",
" endif",
" endif",
" else" ]
result.append(check_dimensions())
result.append(do_allocate())
result += [\
" if (irp_err /= 0) then",
" print *, irp_here//': Allocation failed: %s'"%(name),
do_size(),
" endif",
" endif",
" endif" ]
return result
result = []
if command_line.directives and command_line.inline in ["all","providers"]:
result += [ "!DEC$ ATTRIBUTES FORCEINLINE :: provide_%s"%(name) ]
result += [ "subroutine provide_%s"%(name) ]
result += build_use( [same_as]+self.to_provide )
if command_line.do_openmp:
result += [" use omp_lib"]
result.append(" implicit none")
length = len("provide_%s"%(name))
result += [\
" character*(%d) :: irp_here = 'provide_%s'"%(length,name),
" integer :: irp_err ",
" logical :: irp_dimensions_OK",
"!$ integer :: nthreads"]
if command_line.do_openmp:
result.append(" call irp_lock_%s(.True.)"%(same_as))
if command_line.do_debug:
result.append(" call irp_enter(irp_here)")
result += call_provides(self.to_provide)
result += flatten( map(build_alloc,[self.same_as]+self.others) )
result += [ " if (.not.%s_is_built) then"%(same_as),
" call bld_%s"%(same_as),
" %s_is_built = .True."%(same_as), "" ]
result += [ " endif" ]
if command_line.do_debug:
result.append(" call irp_leave(irp_here)")
if command_line.do_openmp:
result.append(" call irp_lock_%s(.False.)"%(same_as))
result.append("end subroutine provide_%s"%(name) )
result.append("")
self._provider = result
return self._provider
provider = property(provider)
##########################################################
def builder(self):
if '_builder' not in self.__dict__:
if not self.is_main:
self._builder = []
else:
import parsed_text
from variables import build_use, call_provides
for filename,buffer in parsed_text.parsed_text:
if self.line.filename[0].startswith(filename):
break
text = []
same_as = self.same_as
inside = False
for vars,line in buffer:
if type(line) == Begin_provider:
if line.filename[1] == same_as:
inside = True
vars = []
if inside:
text.append( (vars,line) )
text += map( lambda x: ([],Simple_line(line.i,x,line.filename)), call_provides(vars) )
if command_line.do_profile and type(line) == Begin_provider:
text.append( ( [], Declaration(line.i," double precision :: irp_rdtsc, irp_rdtsc1, irp_rdtsc2",line.filename) ) )
text.append( ( [], Simple_line(line.i," irp_rdtsc1 = irp_rdtsc()",line.filename) ) )
if type(line) == End_provider:
if inside:
break
name = self.name
text = parsed_text.move_to_top(text,Declaration)
text = parsed_text.move_to_top(text,Implicit)
text = parsed_text.move_to_top(text,Use)
text = map(lambda x: x[1], text)
# inside_omp = False
for line in filter(lambda x: type(x) not in [ Begin_doc, End_doc, Doc], text):
if type(line) == Begin_provider:
result = []
if command_line.directives and command_line.inline in ["all","builders"]:
result += [ "!DEC$ ATTRIBUTES INLINE :: bld_%s"%(same_as) ]
result += [ "subroutine bld_%s"%(name) ]
result += build_use([name]+self.needs)
elif type(line) == Cont_provider:
pass
elif type(line) == End_provider:
if command_line.do_profile:
result += [ " irp_rdtsc2 = irp_rdtsc()" ,
" call irp_set_timer(%d,(irp_rdtsc2-irp_rdtsc1))"%self.label ]
result.append( "end subroutine bld_%s"%(name) )
break
elif type(line) == Openmp:
# Detect OpenMP blocks
buffer = line.text.lower().split()
if buffer[1] == "parallel":
# inside_omp = True
self._has_openmp = True
# if buffer[1] == "end" and buffer[2] == "parallel":
# inside_omp = False
result.append(line.text)
else:
# if inside_omp:
# if type(line) in [ Provide_all, Provide, Touch, SoftTouch ]:
# error.fail(line,str(type(line))+"is not allowed in an OpenMP block.")
result.append(line.text)
self._builder = result
return self._builder
builder = property(builder)
##########################################################
def children(self):
if '_children' not in self.__dict__:
if not self.is_main:
self._children = []
from variables import variables
if '_needs' not in self.__dict__:
import parsed_text
result = []
for x in self.needs:
result.append(x)
try:
result += variables[x].children
except RuntimeError:
pass # Exception will be checked after
self._children = make_single(result)
if self.name in result:
error.fail(self.line,"Cyclic dependencies:\n%s"%(str(self._children)))
return self._children
children = property(children)
##########################################################
def parents(self):
if '_parents' not in self.__dict__:
if not self.is_main:
self._parents = []
else:
from variables import variables
if '_needed_by' not in self.__dict__:
import parsed_text
result = []
for x in self.needed_by:
result.append(x)
try:
result += variables[x].parents
except RuntimeError:
pass # Exception will be checked after
self._parents = make_single(result)
if self.name in result:
error.fail(self.line,"Cyclic dependencies:\n%s"%(str(self._parents)))
return self._parents
parents = property(parents)
######################################################################
if __name__ == '__main__':
from preprocessed_text import preprocessed_text
from variables import variables
#for v in variables.keys():
# print v
def print_dot(x,done):
if x.children == []:
return
for i in x.needs:
pair = (x.name, i)
if pair not in done:
print "%s -> %s"%( x.name, i )
done[pair] = None
print_dot(variables[i],done)
print "digraph G { "
# print_dot(variables['e_loc'], {})
print_dot(variables['psi_value'], {})
print "}"

96
src/variables.py
View File

@ -1,96 +0,0 @@
#!/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
from variable import *
from irpf90_t import *
from command_line import command_line
from util import *
######################################################################
def create_variables():
from preprocessed_text import preprocessed_text
result = {}
icount = 0
for filename, text in preprocessed_text:
buffer = []
inside = False
for line in text:
if type(line) == Begin_provider:
inside = True
if inside:
buffer.append(line)
if type(line) == End_provider:
inside = False
icount += 1
v = Variable(buffer,icount)
if v.name in result:
print "Warning: Duplicate provider for %s in"%(v.name)
print "- ", v.line.filename[0], " line ", v.line.i
print "- ", result[v.name].line.filename[0], " line ", result[v.name].line.i
print "Choosing first version"
result[v.name] = v
for other in v.others:
if other in result:
print "Warning: Duplicate provider for %s in"%(other)
print "- ", v.line.filename[0], " line ", v.line.i
print "- ", result[other].line.filename[0], " line ", result[other].line.i
print "Choosing first version"
result[other] = Variable(buffer,icount,other)
buffer = []
return result
variables = create_variables()
######################################################################
def build_use(vars):
result = map(lambda x: " use %s"%(variables[x].fmodule), vars)
result = make_single(result)
return result
######################################################################
def call_provides(vars,opt=False):
vars = make_single( map(lambda x: variables[x].same_as, vars) )
if opt:
all_children = flatten( map(lambda x: variables[x].children, vars ))
vars = filter(lambda x: x not in all_children,vars)
def fun(x):
result = []
result += [ \
" if (.not.%s_is_built) then"%(x) ]
result += [ \
" call provide_%s"%(x) ]
result += [ \
" endif" ]
return result
result = flatten ( map (fun, vars) )
return result
######################################################################
if __name__ == '__main__':
for v in variables.keys():
print v

1
src/version.py
View File

@ -1 +0,0 @@
version = "1.7.2"

48
src/vim.py
View File

@ -1,48 +0,0 @@
#/usr/bin/env python2
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
import os
def install():
VIM = os.environ["HOME"]+"/.vim"
try:
if os.access(VIM+"/syntax/irpf90.vim",os.F_OK):
return
if not os.access(VIM,os.F_OK):
os.mkdir(VIM)
file = open(VIM+"/filetype.vim","a")
file.write("au BufRead,BufNewFile *.irp.f setfiletype irpf90")
file.close()
if not os.access(VIM+"/syntax",os.F_OK):
os.mkdir(VIM+"/syntax")
wd = os.path.abspath(os.path.dirname(__file__))
os.symlink(wd+"/irpf90.vim",VIM+"/syntax/irpf90.vim")
except:
pass
if __name__ == "__main__":
install()

13
tools/commit-msg
View File

@ -1,13 +0,0 @@
#!/usr/bin/env python2
import os,sys
ROOT = os.path.dirname(__file__)+'/../../'
file = open(ROOT+'src/version.py','r')
exec file
file.close()
file = open(sys.argv[1],'a')
print >>file, 'Version:'+version
file.close()

10
tools/install_tools.sh
View File

@ -1,10 +0,0 @@
#!/bin/bash
OLD_DIR=$PWD
cd ../.git/hooks/
for i in commit-msg post-commit
do
rm $i
ln -s $OLD_DIR/$i $PWD/$i
done

18
tools/post-commit
View File

@ -1,18 +0,0 @@
#!/usr/bin/env python2
import os
ROOT = os.path.dirname(__file__)+'/../../'
file = open(ROOT+'src/version.py','r') ;
exec file
file.close() ;
v = version.split('.')
v = map(int,v)
v[2] += 1
line = 'version = "%d.%d.%d"\n'%tuple(v)
file = open(ROOT+'src/version.py','w')
file.writelines([line])
file.close()

105
website/config.toml
View File

@ -1,21 +1,19 @@
baseurl = "https://pages.gitlab.io/hugo/"
baseurl = "https://scemama.gitlab.io/irpf90/"
contentdir = "content"
layoutdir = "layouts"
publishdir = "public"
title = "Beautiful Hugo"
title = "IRPF90"
canonifyurls = true
DefaultContentLanguage = "en"
theme = "beautifulhugo"
metaDataFormat = "yaml"
pygmentsUseClasses = true
pygmentCodeFences = true
#disqusShortname = "XXX"
#googleAnalytics = "XXX"
pygmentsUseClassic=true
[Params]
subtitle = "Hugo Blog Template for GitLab Pages"
logo = "img/avatar-icon.png"
subtitle = "Implicit Reference to Parameters in Fortran"
logo = "img/irpf90.png"
favicon = "img/favicon.ico"
dateFormat = "January 2, 2006"
commit = false
@ -23,8 +21,8 @@ pygmentCodeFences = true
comments = true
# gcse = "012345678901234567890:abcdefghijk" # Get your code from google.com/cse. Make sure to go to "Look and Feel" and change Layout to "Full Width" and Theme to "Classic"
#[[Params.bigimg]]
# src = "img/triangle.jpg"
[[Params.bigimg]]
src = "img/triangle.jpg"
# desc = "Triangle"
#[[Params.bigimg]]
# src = "img/sphere.jpg"
@ -34,61 +32,48 @@ pygmentCodeFences = true
# desc = "Hexagon"
[Author]
name = "Some Person"
email = "youremail@domain.com"
facebook = "username"
googleplus = "+username" # or xxxxxxxxxxxxxxxxxxxxx
gitlab = "username"
github = "username"
twitter = "username"
reddit = "username"
linkedin = "username"
xing = "username"
stackoverflow = "users/XXXXXXX/username"
snapchat = "username"
instagram = "username"
youtube = "user/username" # or channel/channelname
soundcloud = "username"
spotify = "username"
bandcamp = "username"
itchio = "username"
keybase = "username"
name = "Anthony Scemama"
# email = "scemama@irsamc.ups-tlse.fr"
# gitlab = "scemama"
# github = "scemama"
# twitter = "scemama666"
# stackoverflow = "users/4151327/anthony-scemama"
[[menu.main]]
name = "Blog"
url = ""
name = "Installation"
url = "page/install"
weight = 1
[[menu.main]]
name = "About"
url = "page/about/"
name = "Help"
url = "page/help"
weight = 3
[[menu.main]]
identifier = "samples"
name = "Samples"
weight = 2
[[menu.main]]
parent = "samples"
name = "Big Image Sample"
url = "post/2017-03-07-bigimg-sample"
weight = 1
[[menu.main]]
parent = "samples"
name = "Math Sample"
url = "post/2017-03-05-math-sample"
weight = 2
[[menu.main]]
parent = "samples"
name = "Code Sample"
url = "post/2016-03-08-code-sample"
weight = 3
[[menu.main]]
name = "Tags"
url = "tags"
weight = 3
#[[menu.main]]
# identifier = "samples"
# name = "Samples"
# weight = 2
#
#[[menu.main]]
# parent = "samples"
# name = "Big Image Sample"
# url = "post/2017-03-07-bigimg-sample"
# weight = 1
#
#[[menu.main]]
# parent = "samples"
# name = "Math Sample"
# url = "post/2017-03-05-math-sample"
# weight = 2
#
#[[menu.main]]
# parent = "samples"
# name = "Code Sample"
# url = "post/2016-03-08-code-sample"
# weight = 3
#
#[[menu.main]]
# name = "Tags"
# url = "tags"
# weight = 3

45
website/content/_index.md
View File

@ -1,6 +1,3 @@
# IRPF90
public/static/IRPF90_box.png
IRPF90 is a Fortran programming environment which helps the development of
large Fortran codes by applying the Implicit Reference to Parameters method (IRP).
@ -22,45 +19,3 @@ If you use IRPF90, please cite this paper :
[arXiv:0909.5012v1](http://arxiv.org/abs/0909.5012).
## Download
* [Download latest version](https://gitlab.com/scemama/irpf90/releases/latest)
* The source files are available on [GitLab](http://gitlab.com/scemama/irpf90)
## How to use IRPF90
* [Installation]
* [IRPF90 GitBook](http://scemama.gitbooks.io/irpf90), and the
[pdf version](http://irpf90.ups-tlse.fr/files/irpf90_manual.pdf)
## Presentations
* [PDF presentation](http://irpf90.ups-tlse.fr/files/cours_irpf90.pdf)
* [PDF Presentation (in french)](http://irpf90.ups-tlse.fr/files/cours_irp1.pdf)
* [Article in HPC Magazine (in french)](http://www.hpcmagazine.fr/hpc-labs/irpf90-un-generateur-de-code-fortran-pour-le-calcul-scientifique/)
* [Presentation at HPCKP 2015 Barcelona (video in english)](https://youtu.be/TpMXkBlePSE)
* [Presentation at JDev2015 Bordeaux (video in french)](https://webcast.in2p3.fr/videos-irpf90)
## Tutorials
* [Simple Tutorial]
* [Molecular dynamics tutorial](http://irpf90.ups-tlse.fr/tutorial/index.html), [pdf version](http://irpf90.ups-tlse.fr/files/irpf90_tutorial.pdf)
## Video demo
{{< vimeo id="154503567" class="my-vimeo-wrapper-class" >}}
## Some programs written with IRPF90
* [Quantum Package](http://github.com/LCPQ/quantum_package) : Library of quantum chemistry methods
* [QMC=Chem](http://qmcchem.ups-tlse.fr) : Massively parallel Quantum Monte Carlo program for Chemistry
* [EZFIO](http://gitlab.com/scemama/EZFIO) : The Easy Fortran I/O library generator
* [Other examples here](http://www.lct.jussieu.fr/pagesperso/reinh/IRP/IRPf90.html) : Programs developed by P. Reinhardt

19
website/content/page/about.md
View File

@ -1,19 +0,0 @@
---
title: About me
subtitle: Why you'd want to hang out with me
comments: false
---
My name is The Dude. I have the following qualities:
- I rock a great beard
- I'm extremely loyal to my friends
- I like bowling
That rug really tied the room together.
### my history
To be honest, I'm having some trouble remembering right now, so why don't you
just watch [my movie](https://en.wikipedia.org/wiki/The_Big_Lebowski) and it
will answer **all** your questions.

25
website/content/page/help.md Normal file
View File

@ -0,0 +1,25 @@
### How to use IRPF90
* [IRPF90 GitBook](http://scemama.gitbooks.io/irpf90), and the
[pdf version](/pdf/irpf90_manual.pdf)
### Presentations
* [PDF presentation](/pdf/irpf90_slides.pdf)
* [PDF Presentation (in french)](http://irpf90.ups-tlse.fr/files/cours_irp1.pdf)
* [Presentation at HPCKP 2015 Barcelona (video in english)](https://youtu.be/TpMXkBlePSE)
* [Presentation at JDev2015 Bordeaux (video in french)](https://webcast.in2p3.fr/videos-irpf90)
### Tutorials
* [Simple Tutorial](/post/2010-01-18-tutorial)
* [Molecular dynamics tutorial](/pdf/irpf90_tutorial.pdf)
### Video demo
{{< vimeo id="154503567" height="400" >}}

22
website/content/page/install.md Normal file
View File

@ -0,0 +1,22 @@
### Download
* [Download latest version](https://gitlab.com/scemama/irpf90/releases/latest)
* The source files are available on [GitLab](http://gitlab.com/scemama/irpf90)
### Installation
IRPF90 is written in Python, so it should run right away.
`${IRPF90_HOME}` is the location of your `irpf90` directory :
```bash
cd ${IRPF90_HOME}
make
cat << EOF >> ${HOME}/.bash_profile
export PYTHONPATH=${IRPF90_HOME}/src:${PYTHONPATH}
export PATH=${IRPF90_HOME}/bin:${PATH}
export MANPATH=${IRPF90_HOME}/man:${MANPATH}
EOF
source ${HOME}/.bash_profile
```

8
website/content/page/links.md Normal file
View File

@ -0,0 +1,8 @@
### Some programs written with IRPF90
* [Quantum Package](http://github.com/LCPQ/quantum_package) : Library of quantum chemistry methods
* [QMC=Chem](http://qmcchem.ups-tlse.fr) : Massively parallel Quantum Monte Carlo program for Chemistry
* [EZFIO](http://gitlab.com/scemama/EZFIO) : The Easy Fortran I/O library generator
* [Other examples here](http://www.lct.jussieu.fr/pagesperso/reinh/IRP/IRPf90.html) : Programs developed by P. Reinhardt

1527
website/content/post/2010-01-18-tutorial.md Normal file
View File

File diff suppressed because it is too large Load Diff

6
website/content/post/2015-01-04-first-post.md
View File

@ -1,6 +0,0 @@
---
title: First post!
date: 2015-01-05
---
This is my first post, how exciting!

11
website/content/post/2015-01-19-soccer.md
View File

@ -1,11 +0,0 @@
---
title: Soccer
subtitle: Best sport ever!
date: 2015-01-19
---
From Wikipedia:
Association football, more commonly known as football or soccer,[2] is a sport played between two teams of eleven players with a spherical ball. It is played by 250 million players in over 200 countries, making it the world's most popular sport.[3][4][5][6] The game is played on a rectangular field with a goal at each end. The object of the game is to score by getting the ball into the opposing goal.
The goalkeepers are the only players allowed to touch the ball with their hands or arms while it is in play and then only in their penalty area. Outfield players mostly use their feet to strike or pass the ball, but may use their head or torso to strike the ball instead. The team that scores the most goals by the end of the match wins. If the score is level at the end of the game, either a draw is declared or the game goes into extra time and/or a penalty shootout depending on the format of the competition. The Laws of the Game were originally codified in England by The Football Association in 1863. Association football is governed internationally by the International Federation of Association Football (FIFA; French: Fédération Internationale de Football Association) which organises a World Cup every four years.[7]

6
website/content/post/2015-01-27-dear-diary.md
View File

@ -1,6 +0,0 @@
---
title: Dear diary
date: 2015-01-27
---
What is it with that Mary girl? Dragging me to school every day. As if I had a choice. What you don't hear in those nursery rhymes is that she starves me if I don't go to school with her; it's the only way I can stay alive! I'm thinking about being adopted by Little Bo Peep, sure I may get lost, but anything is better than being with Mary and those little brats at school (shudder, shudder).

41
website/content/post/2015-02-13-hamlet-monologue.md
View File

@ -1,41 +0,0 @@
---
title: To be
subtitle: ... or not to be?
date: 2015-02-13
---
To be, or not to be--that is the question:
Whether 'tis nobler in the mind to suffer
The slings and arrows of outrageous fortune
Or to take arms against a sea of troubles
And by opposing end them. To die, to sleep--
No more--and by a sleep to say we end
The heartache, and the thousand natural shocks
That flesh is heir to. 'Tis a consummation
Devoutly to be wished. To die, to sleep--
To sleep--perchance to dream: ay, there's the rub,
For in that sleep of death what dreams may come
When we have shuffled off this mortal coil,
Must give us pause. There's the respect
That makes calamity of so long life.
For who would bear the whips and scorns of time,
Th' oppressor's wrong, the proud man's contumely
The pangs of despised love, the law's delay,
The insolence of office, and the spurns
That patient merit of th' unworthy takes,
When he himself might his quietus make
With a bare bodkin? Who would fardels bear,
To grunt and sweat under a weary life,
But that the dread of something after death,
The undiscovered country, from whose bourn
No traveller returns, puzzles the will,
And makes us rather bear those ills we have
Than fly to others that we know not of?
Thus conscience does make cowards of us all,
And thus the native hue of resolution
Is sicklied o'er with the pale cast of thought,
And enterprise of great pitch and moment
With this regard their currents turn awry
And lose the name of action. -- Soft you now,
The fair Ophelia! -- Nymph, in thy orisons
Be all my sins remembered.

35
website/content/post/2015-02-20-test-markdown.md
View File

@ -1,35 +0,0 @@
---
title: Test markdown
subtitle: Each post also has a subtitle
date: 2015-02-20
tags: ["example", "markdown"]
---
You can write regular [markdown](http://markdowntutorial.com/) here and Jekyll will automatically convert it to a nice webpage. I strongly encourage you to [take 5 minutes to learn how to write in markdown](http://markdowntutorial.com/) - it'll teach you how to transform regular text into bold/italics/headings/tables/etc.
**Here is some bold text**
## Here is a secondary heading
Here's a useless table:
| Number | Next number | Previous number |
| :------ |:--- | :--- |
| Five | Six | Four |
| Ten | Eleven | Nine |
| Seven | Eight | Six |
| Two | Three | One |
How about a yummy crepe?
![Crepe](http://s3-media3.fl.yelpcdn.com/bphoto/cQ1Yoa75m2yUFFbY2xwuqw/348s.jpg)
Here's a code chunk with syntax highlighting:
```javascript
var foo = function(x) {
return(x + 5);
}
foo(3)
```

14
website/content/post/2015-02-26-flake-it-till-you-make-it.md
View File

@ -1,14 +0,0 @@
---
title: Flake it till you make it
subtitle: Excerpt from Soulshaping by Jeff Brown
date: 2015-02-26
bigimg: [{src: "/img/path.jpg", desc: "Path"}]
---
Under what circumstances should we step off a path? When is it essential that we finish what we start? If I bought a bag of peanuts and had an allergic reaction, no one would fault me if I threw it out. If I ended a relationship with a woman who hit me, no one would say that I had a commitment problem. But if I walk away from a seemingly secure route because my soul has other ideas, I am a flake?
The truth is that no one else can definitively know the path we are here to walk. It’s tempting to listen—many of us long for the omnipotent other—but unless they are genuine psychic intuitives, they can’t know. All others can know is their own truth, and if they’ve actually done the work to excavate it, they will have the good sense to know that they cannot genuinely know anyone else’s. Only soul knows the path it is here to walk. Since you are the only one living in your temple, only you can know its scriptures and interpretive structure.
At the heart of the struggle are two very different ideas of success—survival-driven and soul-driven. For survivalists, success is security, pragmatism, power over others. Success is the absence of material suffering, the nourishing of the soul be damned. It is an odd and ironic thing that most of the material power in our world often resides in the hands of younger souls. Still working in the egoic and material realms, they love the sensations of power and focus most of their energy on accumulation. Older souls tend not to be as materially driven. They have already played the worldly game in previous lives and they search for more subtle shades of meaning in this one—authentication rather than accumulation. They are often ignored by the culture at large, although they really are the truest warriors.
A soulful notion of success rests on the actualization of our innate image. Success is simply the completion of a soul step, however unsightly it may be. We have finished what we started when the lesson is learned. What a fear-based culture calls a wonderful opportunity may be fruitless and misguided for the soul. Staying in a passionless relationship may satisfy our need for comfort, but it may stifle the soul. Becoming a famous lawyer is only worthwhile if the soul demands it. It is an essential failure if you are called to be a monastic this time around. If you need to explore and abandon ten careers in order to stretch your soul toward its innate image, then so be it. Flake it till you make it.

42
website/content/post/2016-03-08-code-sample.md
View File

@ -1,42 +0,0 @@
---
title: Code Sample
subtitle: Using Hugo or Pygments
date: 2016-03-08
tags: ["example", "code"]
---
The following are two code samples using syntax highlighting.
<!--more-->
The following is a code sample using triple backticks ( ``` ) code fencing provided in Hugo. This is client side highlighting and does not require any special installation.
```javascript
var num1, num2, sum
num1 = prompt("Enter first number")
num2 = prompt("Enter second number")
sum = parseInt(num1) + parseInt(num2) // "+" means "add"
alert("Sum = " + sum) // "+" means combine into a string
```
The following is a code sample using the "highlight" shortcode provided in Hugo. This is server side highlighting and requires Python and Pygments to be installed.
{{< highlight javascript >}}
var num1, num2, sum
num1 = prompt("Enter first number")
num2 = prompt("Enter second number")
sum = parseInt(num1) + parseInt(num2) // "+" means "add"
alert("Sum = " + sum) // "+" means combine into a string
{{</ highlight >}}
And here is the same code with line numbers:
{{< highlight javascript "linenos=inline">}}
var num1, num2, sum
num1 = prompt("Enter first number")
num2 = prompt("Enter second number")
sum = parseInt(num1) + parseInt(num2) // "+" means "add"
alert("Sum = " + sum) // "+" means combine into a string
{{</ highlight >}}

49
website/content/post/2017-03-05-math-sample.md
View File

@ -1,49 +0,0 @@
---
title: Math Sample
subtitle: Using KaTeX
date: 2017-03-05
tags: ["example", "math"]
---
KaTeX can be used to generate complex math formulas server-side.
$$
\phi = \frac{(1+\sqrt{5})}{2} = 1.6180339887\cdots
$$
Additional details can be found on [GitHub](https://github.com/Khan/KaTeX) or on the [Wiki](http://tiddlywiki.com/plugins/tiddlywiki/katex/).
<!--more-->
### Example 1
If the text between $$ contains newlines it will rendered in display mode:
```
$$
f(x) = \int_{-\infty}^\infty\hat f(\xi)\,e^{2 \pi i \xi x}\,d\xi
$$
```
$$
f(x) = \int_{-\infty}^\infty\hat f(\xi)\,e^{2 \pi i \xi x}\,d\xi
$$
### Example 2
```
$$
\frac{1}{\Bigl(\sqrt{\phi \sqrt{5}}-\phi\Bigr) e^{\frac25 \pi}} = 1+\frac{e^{-2\pi}} {1+\frac{e^{-4\pi}} {1+\frac{e^{-6\pi}} {1+\frac{e^{-8\pi}} {1+\cdots} } } }
$$
```
​​$$
\frac{1}{\Bigl(\sqrt{\phi \sqrt{5}}-\phi\Bigr) e^{\frac25 \pi}} = 1+\frac{e^{-2\pi}} {1+\frac{e^{-4\pi}} {1+\frac{e^{-6\pi}} {1+\frac{e^{-8\pi}} {1+\cdots} } } }
$$
​​
### Example 3
```
$$
1 + \frac{q^2}{(1-q)}+\frac{q^6}{(1-q)(1-q^2)}+\cdots = \prod_{j=0}^{\infty}\frac{1}{(1-q^{5j+2})(1-q^{5j+3})}, \quad\quad \text{for }\lvert q\rvert<1.
$$
```
$$
1 + \frac{q^2}{(1-q)}+\frac{q^6}{(1-q)(1-q^2)}+\cdots = \prod_{j=0}^{\infty}\frac{1}{(1-q^{5j+2})(1-q^{5j+3})}, \quad\quad \text{for }\lvert q\rvert<1.
$$

40
website/content/post/2017-03-07-bigimg-sample.md
View File

@ -1,40 +0,0 @@
---
title: Big Image Sample
subtitle: Using Multiple Images
date: 2017-03-07
tags: ["example", "bigimg"]
bigimg: [{src: "/img/triangle.jpg", desc: "Triangle"}, {src: "/img/sphere.jpg", desc: "Sphere"}, {src: "/img/hexagon.jpg", desc: "Hexagon"}]
---
The image banners at the top of the page are refered to as "bigimg" in this theme. They are optional, and one more more can be specified. If more than one is specified, the images rotate every 10 seconds. In the front matter, bigimgs are specified using an array of hashes.
<!--more-->
A single bigimg can be specified in the front matter by the following YAML:
```
bigimg: [{src: "/img/triangle.jpg", desc: "Triangle"}]
```
Multiple bigimgs can be specified in the front matter by the following YAML:
```
bigimg: [{src: "/img/triangle.jpg", desc: "Triangle"},
{src: "/img/sphere.jpg", desc: "Sphere"},
{src: "/img/hexagon.jpg", desc: "Hexagon"}]
```
Also note that the description field is optional, and images could instead be specified by:
```
bigimg: [{src: "/img/triangle.jpg"},
{src: "/img/sphere.jpg"},
{src: "/img/hexagon.jpg"}]
```
The above YAML array of hashes were written in "flow" style. However when generating a new page or post with `hugo new post/mypost.md`, hugo may interpret the archetype for bigimg in the default YAML style. Defining multiple bigimg's complete with descriptions in this style would be specified by:
```
bigimg:
- {src: "/img/triangle.jpg", desc: "Triangle"}
- {src: "/img/sphere.jpg", desc: "Sphere"}
- {src: "/img/hexagon.jpg", desc: "Hexagon"}
```
Additional information can be found [in this YAML tutorial](https://rhnh.net/2011/01/31/yaml-tutorial/).

39
website/content/post/2017-03-20-photoswipe-gallery-sample.md
View File

@ -1,39 +0,0 @@
---
title: Photoswipe Gallery Sample
subtitle: Making a Gallery
date: 2017-03-20
tags: ["example", "photoswipe"]
---
Beautiful Hugo adds a few custom shortcodes created by [Li-Wen Yip](https://www.liwen.id.au/heg/) and [Gert-Jan van den Berg](https://github.com/GjjvdBurg/HugoPhotoSwipe) for making galleries with [PhotoSwipe](http://photoswipe.com) .
{{< gallery caption-effect="fade" >}}
{{< figure thumb="-thumb" link="/img/hexagon.jpg" >}}
{{< figure thumb="-thumb" link="/img/sphere.jpg" caption="Sphere" >}}
{{< figure thumb="-thumb" link="/img/triangle.jpg" caption="Triangle" alt="This is a long comment about a triangle" >}}
{{< /gallery >}}
{{< load-photoswipe >}}
<!--more-->
## Example
The above gallery was created using the following shortcodes:
```
{{</* gallery caption-effect="fade" */>}}
{{</* figure thumb="-thumb" link="/img/hexagon.jpg" */>}}
{{</* figure thumb="-thumb" link="/img/sphere.jpg" caption="Sphere" */>}}
{{</* figure thumb="-thumb" link="/img/triangle.jpg" caption="Triangle" alt="This is a long comment about a triangle" */>}}
{{</* /gallery */>}}
{{</* load-photoswipe */>}}
```
## Usage
For full details please see the [hugo-easy-gallery GitHub](https://github.com/liwenyip/hugo-easy-gallery/) page. Basic usages from above are:
- Create a gallery with open and close tags `{{</* gallery */>}}` and `{{</* /gallery */>}}`
- `{{</* figure src="image.jpg" */>}}` will use `image.jpg` for thumbnail and lightbox
- `{{</* figure src="thumb.jpg" link="image.jpg" */>}}` will use `thumb.jpg` for thumbnail and `image.jpg` for lightbox
- `{{</* figure thumb="-small" link="image.jpg" */>}}` will use `image-small.jpg` for thumbnail and `image.jpg` for lightbox
- All the [features/parameters](https://gohugo.io/extras/shortcodes) of Hugo's built-in `figure` shortcode work as normal, i.e. src, link, title, caption, class, attr (attribution), attrlink, alt
- `{{</* gallery caption-effect="fade" */>}}` will fade in captions for all figures in this gallery instead of the default slide-up behavior
- Many gallery styles for captions and hover effects exist; view the [hugo-easy-gallery GitHub](https://github.com/liwenyip/hugo-easy-gallery/) for all options
- Call `{{</* load-photoswipe */>}}` **once** anywhere you want on each page where you want to use PhotoSwipe

73
website/content/post/2018-11-20-main-page.md
View File

@ -1,73 +0,0 @@
---
title: IRPF90
date: 2018-11-20
bigimg: [{src: "/img/path.jpg", desc: "IRPF90"}]
---
# IRPF90
IRPF90 is a Fortran programming environment which helps the development of
large Fortran codes by applying the Implicit Reference to Parameters method (IRP).
In Fortran programs, the programmer has to focus on
the order of the instructions: before using a variable, the programmer has to
be sure that it has already been computed in all possible situations. For large
codes, it is common source of error.
In IRPF90 most of the order of instructions is handled by the pre-processor, and
an automatic mechanism guarantees that every entity is built before being used.
This mechanism relies on the *needs/needed by* relations between the entities,
which are built automatically.
Codes written with IRPF90 execute often faster than Fortran programs, are faster
to write and easier to maintain.
If you use IRPF90, please cite this paper :
[http://arxiv.org/abs/0909.5012 arXiv:0909.5012v1].
The html version is accessible
[here](IRPF90: a programming environment for high performance computing)
## Download
* [Download latest version](https://github.com/scemama/irpf90/releases/latest)
* The source files are available on [GitLab](http://gitlab.com/scemama/irpf90)
## How to use IRPF90
* [Installation]
* [Git book](http://scemama.gitbooks.io/irpf90 IRPF90 GitBook), and the
[pdf version](http://irpf90.ups-tlse.fr/files/irpf90_manual.pdf)
## Presentations
* [PDF presentation](http://irpf90.ups-tlse.fr/files/cours_irpf90.pdf)
* [PDF Presentation (in french)](http://irpf90.ups-tlse.fr/files/cours_irp1.pdf)
* [Article in HPC Magazine (in french)](http://www.hpcmagazine.fr/hpc-labs/irpf90-un-generateur-de-code-fortran-pour-le-calcul-scientifique/)
* [Presentation at HPCKP 2015 Barcelona (video in english)](https://youtu.be/TpMXkBlePSE)
* [Presentation at JDev2015 Bordeaux (video in french)](https://webcast.in2p3.fr/videos-irpf90)
## Tutorials
* [Simple Tutorial]
* [http://irpf90.ups-tlse.fr/tutorial/index.html Molecular dynamics tutorial], [pdf version](http://irpf90.ups-tlse.fr/files/irpf90_tutorial.pdf)
## Video demo ==
* [IRPF90 Demo on Vimeo](https://vimeo.com/scemama/irpf90_demo )
## Some programs written with IRPF90
* [Quantum Package](http://github.com/LCPQ/quantum_package) : Library of quantum chemistry methods
* [QMC=Chem](http://qmcchem.ups-tlse.fr) : Massively parallel Quantum Monte Carlo program for Chemistry
* [EZFIO](http://gitlab.com/scemama/EZFIO) : The Easy Fortran I/O library generator
* [Other examples here](http://www.lct.jussieu.fr/pagesperso/reinh/IRP/IRPf90.html) : Programs developed by P. Reinhardt

BIN
website/static/img/Energy_tree.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.5 KiB

BIN
website/static/img/irpf90.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 78 KiB

0
website/static/IRPF90_box.png → website/static/img/irpf90_box.png
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 26 KiB

After

Width:  |  Height:  |  Size: 26 KiB

BIN
website/static/pdf/irpf90_manual.pdf Normal file
View File

Binary file not shown.

8104
website/static/pdf/irpf90_slides.pdf Normal file
View File

File diff suppressed because one or more lines are too long

BIN
website/static/pdf/irpf90_tutorial.pdf Normal file
View File

Binary file not shown.