{VERSION 2018 2 "Windows 10" "2018.2" } {USTYLETAB {PSTYLE "Heading 1" -1 3 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 8 4 2 0 2 0 2 2 -1 1 }{PSTYLE "War ning" -1 7 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Left Justified Maple Outp ut" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Fixed Width" -1 17 1 {CSTYLE " " -1 -1 "Courier" 1 10 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Help" -1 10 1 {CSTYLE "" -1 -1 "Courier" 1 9 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Head ing 4" -1 20 1 {CSTYLE "" -1 -1 "Times" 1 10 0 0 0 1 1 1 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Line Printed Output" -1 6 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Heading 2" -1 4 1 {CSTYLE "" -1 -1 "T imes" 1 14 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 8 2 2 0 2 0 2 2 -1 1 } {PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Heading 3" -1 5 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 1 1 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Diagnostic" -1 9 1 {CSTYLE "" -1 -1 "Courier" 1 10 64 128 64 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Ordered List 1" -1 200 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Ordered List 2" -1 201 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 36 2 0 2 2 -1 1 }{PSTYLE "Ordered List 3" -1 202 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 72 2 0 2 2 -1 1 }{PSTYLE "Normal262" -1 203 1 {CSTYLE "" -1 -1 "Times" 1 24 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Ordered List 4" -1 204 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 108 2 0 2 2 -1 1 }{PSTYLE "Normal261" -1 205 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Ordered List 5" -1 206 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 144 2 0 2 2 -1 1 }{PSTYLE "Annotation Title" -1 207 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }3 1 0 0 12 12 2 0 2 0 2 2 -1 1 } {PSTYLE "Normal260" -1 208 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Maple Output1 2" -1 209 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "HyperlinkError" -1 210 1 {CSTYLE "" -1 -1 "Courier New" 1 12 255 0 255 1 2 2 1 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "HyperlinkWarning" -1 211 1 {CSTYLE "" -1 -1 "Courier New" 1 12 0 0 255 1 2 2 1 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Bullet Item" -1 15 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "List It em" -1 14 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Normal259" -1 212 1 {CSTYLE "" -1 -1 "Times" 1 14 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Normal257" -1 213 1 {CSTYLE "" -1 -1 "Times" 1 14 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Norm al256" -1 214 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Dash Item" -1 16 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Error" -1 8 1 {CSTYLE "" -1 -1 "Courier" 1 10 255 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "T itle" -1 18 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 1 2 2 2 1 0 0 1 }3 1 0 0 12 12 2 0 2 0 2 2 -1 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Author258" -1 215 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }3 1 0 0 8 8 2 0 2 0 2 2 -1 1 }{PSTYLE "Autho r" -1 19 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 } 3 1 0 0 8 8 2 0 2 0 2 2 -1 1 }{CSTYLE "Help Variable" -1 25 "Courier" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small209212" -1 200 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Maple Commen t" -1 21 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Popup" -1 31 "Times" 1 12 0 128 128 1 1 2 1 2 2 2 0 0 0 1 }{CSTYLE "Atomic Va riable" -1 201 "Times" 1 12 175 0 175 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE " Plot Text" -1 28 "Times" 1 8 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Cod e" -1 202 "Courier New" 1 12 255 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2 D Math Italic" -1 3 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Small" -1 7 "Times" 1 1 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Bold Small" -1 10 "Times" 1 1 0 0 0 1 2 1 2 2 2 2 0 0 0 1 } {CSTYLE "Help Bold" -1 39 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 } {CSTYLE "Help Menus" -1 36 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 } {CSTYLE "Help Normal" -1 30 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 } {CSTYLE "Maple Input" -1 0 "Courier" 1 12 255 0 0 1 2 1 2 2 1 2 0 0 0 1 }{CSTYLE "Header and Footer" -1 203 "Times" 1 10 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small204" -1 204 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small207208" -1 205 "Tim es" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small206" -1 206 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Output Label s" -1 29 "Times" 1 8 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Ita lic Small205" -1 207 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Notes" -1 37 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE " 2D Math Italic Small208209215" -1 208 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Underlined" -1 44 "Times" 1 12 0 0 0 1 2 2 1 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small208" -1 209 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small207" -1 210 "Tim es" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small209" -1 211 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Text" -1 212 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Plot Title" -1 27 "Times" 1 10 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Default" -1 38 "Tim es" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Italic Bold" -1 40 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Maple Input Placeh older" -1 213 "Courier New" 1 12 200 0 200 1 2 1 2 2 1 2 0 0 0 1 } {CSTYLE "LaTeX" -1 32 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 } {CSTYLE "Help Emphasized" -1 22 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small211" -1 214 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Equation Label" -1 215 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small210" -1 216 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Italic" -1 42 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Prompt" -1 1 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Bold" -1 5 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Hyperlink" -1 17 "Times" 1 12 0 128 128 1 2 2 1 2 2 2 0 0 0 1 }{CSTYLE "Caption Text" -1 217 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small220" -1 218 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Underlined \+ Bold" -1 41 "Times" 1 12 0 0 0 1 1 1 2 2 2 2 0 0 0 1 }{CSTYLE "Copyrig ht" -1 34 "Times" 1 10 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math I talic Small226" -1 219 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 } {CSTYLE "2D Math Italic Small225" -1 220 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small228" -1 221 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small227" -1 222 "Time s" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small222" -1 223 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Itali c Small221" -1 224 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2 D Math Italic Small224" -1 225 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small223" -1 226 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Dictionary Hyperlink" -1 45 "Times" 1 12 147 0 15 1 2 2 1 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small229" -1 227 "Ti mes" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Input" -1 19 "Times" 1 12 255 0 0 1 2 2 2 2 1 2 0 0 0 1 }{CSTYLE "2D Math Italic Small231" -1 228 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Ital ic Small230" -1 229 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE " 2D Math Italic Small237" -1 230 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small236" -1 231 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small238" -1 232 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small233" -1 233 "T imes" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small23 2" -1 234 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math It alic Small235" -1 235 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small234" -1 236 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small210220" -1 237 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Heading" -1 26 "Times" 1 14 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Output" -1 20 "Times" 1 12 0 0 255 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Inert Output" -1 238 "Times" 1 12 144 144 144 1 2 2 2 2 1 2 0 0 0 1 }{CSTYLE "Page Number" -1 33 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Fixed" -1 23 "Courier" 1 10 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small" -1 239 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Symbol 2" -1 16 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Nonterminal" -1 24 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Annotation \+ Text" -1 240 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help M aple Name" -1 35 "Times" 1 12 104 64 92 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Help Underlined Italic" -1 43 "Times" 1 12 0 0 0 1 1 2 1 2 2 2 0 0 0 1 }{CSTYLE "Caption Reference" -1 241 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small208209" -1 242 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Comment" -1 18 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "" -1 243 "Times" 1 16 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "" -1 244 "Times" 1 16 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "" -1 245 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 } {CSTYLE "" -1 246 "Times" 1 16 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "restart:\n" } {MPLTEXT 1 0 20 "with(LinearAlgebra):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 243 129 "1. gl_2 case: Loading the general spectral curve. The times \+ are (s12, s22,s11,s21, X1) and monodromies are (s10,s20, sX10, sX20)." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "CoherenceEquation:=sX10+ sX20+s10+s20;" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 8 "sX20:=-(" } {MPLTEXT 1 0 14 "sX10+s10+s20);" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 58 "R1:=unapply((-s10-s20)/(xi-X1)-s11-s21+(-s12-s2 2)*xi,xi):\n" }{MPLTEXT 1 0 106 "R2:=unapply(sX10*(-s10-s20-sX10)/(xi- X1)^2+s10*s22+s11*s21+s12*s20+(s11*s22+s12*s21)*xi+s12*s22*xi^2,xi);\n " }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 16 "Spectral CurveGl2" }{MPLTEXT 1 0 4 " := " }{MPLTEXT 1 0 8 "unapply(" }{MPLTEXT 1 0 1048 "((-s12*s22*lambda^2+((-s21-y)*s12-s22*(s11+y))*lambda+s12*s2 2*q^2+((s21+p)*s12+s22*(p+s11))*q+(p-y)*(p+s21+s11+y))*X1^3+(2*s22*lam bda^3*s12+(q*s12*s22+(2*s21+2*y)*s12+2*s22*(s11+y))*lambda^2+(-s12*s22 *q^2-(s12+s22)*(p-y)*q+s12*s20+s10*s22-p^2+(-s11-s21)*p+2*y^2+(2*s11+2 *s21)*y+s11*s21)*lambda-2*s12*s22*q^3+((-2*s21-2*p)*s12-2*s22*(p+s11)) *q^2+(-s12*s20-s10*s22-2*p^2+(-2*s11-2*s21)*p+y^2+(s21+s11)*y-s11*s21) *q+(sX10+sX20)*(p-y))*X1^2+(-s12*s22*lambda^4+(-2*q*s12*s22+(-s21-y)*s 12-s22*(s11+y))*lambda^3+(((-2*s21-2*y)*s12-2*s22*(s11+y))*q-s12*s20-s 10*s22-(s11+y)*(s21+y))*lambda^2+(2*s12*s22*q^3+((2*s21+2*p)*s12+2*s22 *(p+s11))*q^2+(2*(p-y))*(p+s21+s11+y)*q-(sX10+sX20)*(p-y))*lambda+q*(s 12*s22*q^3+((s21+p)*s12+s22*(p+s11))*q^2+(s12*s20+s10*s22+(p+s11)*(s21 +p))*q-(sX10+sX20)*(p-y)))*X1+lambda^4*q*s12*s22+q*((s21+y)*s12+s22*(s 11+y))*lambda^3+q*(s12*s20+s10*s22+(s11+y)*(s21+y))*lambda^2+(-q^4*s12 *s22+((-s21-p)*s12-s22*(p+s11))*q^3+(-s12*s20-s10*s22-(p+s11)*(s21+p)) *q^2+(sX10+sX20)*(p-y)*q-sX10*sX20)*lambda+q*sX10*sX20)/((lambda-X1)^2 *(q-X1))" }{MPLTEXT 1 0 2 ",\n" }{MPLTEXT 1 0 46 "lambda,y,q,p,s12,s22 ,s11,s21,X1,s10,s20,sX10);" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I2Coheren ceEquationG6\",*I%sX10GF$\"\"\"I%sX20GF$F'I$s10GF$F'I$s20GF$F'" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I%sX20G6\",(I%sX10GF$!\"\"I$s10GF$F'I$s 20GF$F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I#R2G6\"f*6#I#xiGF$F$6$I)ope ratorGF$I&arrowGF$F$,.*(I%sX10GF$\"\"\",(F-!\"\"I$s10GF$F0I$s20GF$F0F. ,&9$F.I#X1GF$F0!\"#F.*&F1F.I$s22GF$F.F.*&I$s11GF$F.I$s21GF$F.F.*&I$s12 GF$F.F2F.F.*&,&*&F:F.F8F.F.*&F=F.F;F.F.F.F4F.F.*(F=F.F8F.F4\"\"#F.F$F$ F$" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I1SpectralCurveGl2G6\"f*6.I'lambd aGF$I\"yGF$I\"qGF$I\"pGF$I$s12GF$I$s22GF$I$s11GF$I$s21GF$I#X1GF$I$s10G F$I$s20GF$I%sX10GF$F$6$I)operatorGF$I&arrowGF$F$*(,2*&,,*(9(\"\"\"9)F< 9$\"\"#!\"\"*&,&*&,&9+F@9%F@FFFWF;FF?F<*&,4FJF@*(,&F;FF\"\"%F@*&,(FgnFjoFCFFWF<*&,**&,&*&,&FEFjoFFFjoFF?F<*&,*FioF?*&,&*&,&FEF ?FPF?FFFjpFKF FWF<*(FKF<,(F^oFF?F<*&,,*(FKFjpF;FFF " 0 "" {MPLTEXT 1 0 128 "simplify(SpectralCurveGl2(xi,Y,Q,P,s12,s 22,s11,s21,X1,s10,s20,sX10)-(Y^2-R1(xi)*Y+R2(xi)-(Q-X1)/(xi-X1)*(P^2-R 1(Q)*P+R2(Q)) ));\n" }{MPLTEXT 1 0 17 "simplify(residue(" }{MPLTEXT 1 0 90 "simplify((xi-X1)^2*SpectralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1, s10,s20,sX10) ),xi=X1));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 143 "Co effpolytopexi2Y2:=simplify(-residue(residue((xi-X1)^2*SpectralCurveGl2 (xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y^3,Y=0)/xi^3,xi=infinity)) ;" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 46 "Coeffpolytopexi1Y2:=simplify (-residue(residue(" }{MPLTEXT 1 0 10 "(xi-X1)^2*" }{MPLTEXT 1 0 87 "Sp ectralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y^3,Y=0)/xi^2 ,xi=infinity));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 46 "Coeffpolytopex i0Y2:=simplify(-residue(residue(" }{MPLTEXT 1 0 10 "(xi-X1)^2*" } {MPLTEXT 1 0 88 "SpectralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20, sX10)/Y^3,Y=0)/xi^1,xi=infinity));\n" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 143 "Coeffpolytopexi4Y1:=simplify(-residue(residue((xi-X1)^2*Spect ralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y^2,Y=0)/xi^5,xi =infinity));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 143 "Coeffpolytopexi3 Y1:=simplify(-residue(residue((xi-X1)^2*SpectralCurveGl2(xi,Y,Q,P,s12, s22,s11,s21,X1,s10,s20,sX10)/Y^2,Y=0)/xi^4,xi=infinity));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 56 "Coeffpolytopexi2Y1:=simplify(-residue(res idue((xi-X1)^2*" }{MPLTEXT 1 0 87 "SpectralCurveGl2(xi,Y,Q,P,s12,s22,s 11,s21,X1,s10,s20,sX10)/Y^2,Y=0)/xi^3,xi=infinity));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 46 "Coeffpolytopexi1Y1:=simplify(-residue(residue(" }{MPLTEXT 1 0 10 "(xi-X1)^2*" }{MPLTEXT 1 0 88 "SpectralCurveGl2(xi,Y ,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y^2,Y=0)/xi^2,xi=infinity));\n" }{MPLTEXT 1 0 46 "Coeffpolytopexi0Y1:=simplify(-residue(residue(" } {MPLTEXT 1 0 10 "(xi-X1)^2*" }{MPLTEXT 1 0 88 "SpectralCurveGl2(xi,Y,Q ,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y^2,Y=0)/xi^1,xi=infinity));\n" } {MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 142 "Coeffpolytopexi0Y0:=simplify(-r esidue(residue((xi-X1)^2*SpectralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1, s10,s20,sX10)/Y,Y=0)/xi^1,xi=infinity));\n" }{MPLTEXT 1 0 142 "Coeffpo lytopexi1Y0:=simplify(-residue(residue((xi-X1)^2*SpectralCurveGl2(xi,Y ,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y,Y=0)/xi^2,xi=infinity));\n" } {MPLTEXT 1 0 142 "Coeffpolytopexi2Y0:=simplify(-residue(residue((xi-X1 )^2*SpectralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y,Y=0)/ xi^3,xi=infinity));\n" }{MPLTEXT 1 0 142 "Coeffpolytopexi3Y0:=simplify (-residue(residue((xi-X1)^2*SpectralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21, X1,s10,s20,sX10)/Y,Y=0)/xi^4,xi=infinity));\n" }{MPLTEXT 1 0 142 "Coef fpolytopexi4Y0:=simplify(-residue(residue((xi-X1)^2*SpectralCurveGl2(x i,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y,Y=0)/xi^5,xi=infinity));\n" }{MPLTEXT 1 0 141 "Coeffpolytopexi5Y0:=simplify(-residue(residue((xi- X1)^2*SpectralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y,Y=0 )/xi^6,xi=infinity));" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coef fpolytopexi2Y2G6\"\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpoly topexi1Y2G6\",$I#X1GF$!\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpo lytopexi0Y2G6\"*$I#X1GF$\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coef fpolytopexi4Y1G6\"\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolyt opexi3Y1G6\",&I$s12GF$\"\"\"I$s22GF$F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi2Y1G6\",(*&,&I$s12GF$!\"#I$s22GF$F)\"\"\"I#X1GF$F+ F+I$s11GF$F+I$s21GF$F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolyto pexi1Y1G6\",**&,&I$s12GF$\"\"\"I$s22GF$F)F)I#X1GF$\"\"#F)*&,&I$s11GF$! \"#I$s21GF$F0F)F+F)F)I$s10GF$F)I$s20GF$F)" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi0Y1G6\"*&I#X1GF$\"\"\",(*&,&I$s21GF$F'I $s11GF$F'F'F&F'F'I$s10GF$!\"\"I$s20GF$F.F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi0Y0G6\"*&,**&,(*(I$s12GF$\"\"\"I$s22GF$ F+I\"QGF$\"\"#F+*&,(*&,&F*F+F,F+F+I\"PGF$F+F+*&F,F+I$s11GF$F+F+*&F*F+I $s21GF$F+F+F+F-F+F+*&F3F+,(F3F+F5F+F7F+F+F+F+I#X1GF$\"\"$F+*&,**(F*F+F ,F+F-F;!\"#*&,(*&,&F*F?F,F?F+F3F+F+F4F?F6F?F+F-F.F+*&,,*$F3F.F?*&,&F5F ?F7F?F+F3F+F+*&I$s10GF$F+F,F+!\"\"*&F5F+F7F+FK*&F*F+I$s20GF$F+FKF+F-F+ F+*&F3F+,&FJF+FNF+F+FKF+F:F.F+*(F-F+,*F>F+*&F0F+F-F.F+*&,,FFF+*&,&F7F+ F5F+F+F3F+F+FIF+FLF+FMF+F+F-F+F+FOF+F+F:F+F+*(I%sX10GF$F+F-F+,(FYF+FJF +FNF+F+FKF+,&F-F+F:FKFK" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolyt opexi1Y0G6\"*&,2*(I\"QGF$\"\"%I$s12GF$\"\"\"I$s22GF$F+!\"\"*&,**(F*F+F ,F+I#X1GF$F+\"\"#*&,&F*F-F,F-F+I\"PGF$F+F+*&F,F+I$s11GF$F+F-*&F*F+I$s2 1GF$F+F-F+F(\"\"$F+*&,0*(F1F2F*F+F,F+F-*&,(*&,&F*F2F,F2F+F5F+F+F6F2F8F 2F+F1F+F+*$F5F2F-*&,&F7F-F9F-F+F5F+F+*&I$s10GF$F+F,F+F-*&F7F+F9F+F-*&F *F+I$s20GF$F+F-F+F(F2F+*(,**&,&F*#F-F2F,FNF+F1F2F+*&,(F5F+F7F+F9F+F+F1 F+F+FFFNFIFNF+F5F+F(F+F2*&,&*&F7F+F,F+F-F8F-F+F1F:F+*&,,FBF-FCF+FEF+FG F+FHF+F+F1F2F+*(F5F+,&FFF+FIF+F+F1F+F+*&I%sX10GF$F+,(FYF+FFF+FIF+F+F+F +,&F(F+F1F-F-" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi2Y0G6 \",(*&,(*&I#X1GF$\"\"#I$s22GF$\"\"\"F,*&F)F,I$s21GF$F,!\"#I$s20GF$F,F, I$s12GF$F,F,*&,&*&F)F,I$s11GF$F,F/I$s10GF$F,F,F+F,F,*&F5F,F.F,F," }} {PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi3Y0G6\",&*&,&*&I#X1GF$ \"\"\"I$s22GF$F*!\"#I$s21GF$F*F*I$s12GF$F*F**&F+F*I$s11GF$F*F*" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi4Y0G6\"*&I$s12GF$\"\" \"I$s22GF$F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi5Y0G6 \"\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "sX10:=0:" } {MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 108 "simplify(residue(simplify((xi-X 1)^2*SpectralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10) ),xi =X1));\n" }{MPLTEXT 1 0 142 "Coeffpolytopexi2Y2:=simplify(-residue(res idue((xi-X1)*SpectralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10 )/Y^3,Y=0)/xi^3,xi=infinity));\n" }{MPLTEXT 1 0 142 "Coeffpolytopexi1Y 2:=simplify(-residue(residue((xi-X1)*SpectralCurveGl2(xi,Y,Q,P,s12,s22 ,s11,s21,X1,s10,s20,sX10)/Y^3,Y=0)/xi^2,xi=infinity));\n" }{MPLTEXT 1 0 142 "Coeffpolytopexi0Y2:=simplify(-residue(residue((xi-X1)*SpectralC urveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y^3,Y=0)/xi^1,xi=inf inity));\n" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 142 "Coeffpolytopexi4Y1 :=simplify(-residue(residue((xi-X1)*SpectralCurveGl2(xi,Y,Q,P,s12,s22, s11,s21,X1,s10,s20,sX10)/Y^2,Y=0)/xi^5,xi=infinity));\n" }{MPLTEXT 1 0 142 "Coeffpolytopexi3Y1:=simplify(-residue(residue((xi-X1)*SpectralC urveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y^2,Y=0)/xi^4,xi=inf inity));\n" }{MPLTEXT 1 0 142 "Coeffpolytopexi2Y1:=simplify(-residue(r esidue((xi-X1)*SpectralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX 10)/Y^2,Y=0)/xi^3,xi=infinity));\n" }{MPLTEXT 1 0 142 "Coeffpolytopexi 1Y1:=simplify(-residue(residue((xi-X1)*SpectralCurveGl2(xi,Y,Q,P,s12,s 22,s11,s21,X1,s10,s20,sX10)/Y^2,Y=0)/xi^2,xi=infinity));\n" }{MPLTEXT 1 0 142 "Coeffpolytopexi0Y1:=simplify(-residue(residue((xi-X1)*Spectra lCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y^2,Y=0)/xi^1,xi=i nfinity));\n" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 140 "Coeffpolytopexi0 Y0:=simplify(-residue(residue((xi-X1)*SpectralCurveGl2(xi,Y,Q,P,s12,s2 2,s11,s21,X1,s10,s20,sX10)/Y,Y=0)/xi^1,xi=infinity));\n" }{MPLTEXT 1 0 140 "Coeffpolytopexi1Y0:=simplify(-residue(residue((xi-X1)*SpectralC urveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y,Y=0)/xi^2,xi=infin ity));\n" }{MPLTEXT 1 0 140 "Coeffpolytopexi2Y0:=simplify(-residue(res idue((xi-X1)*SpectralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10 )/Y,Y=0)/xi^3,xi=infinity));\n" }{MPLTEXT 1 0 140 "Coeffpolytopexi3Y0: =simplify(-residue(residue((xi-X1)*SpectralCurveGl2(xi,Y,Q,P,s12,s22,s 11,s21,X1,s10,s20,sX10)/Y,Y=0)/xi^4,xi=infinity));\n" }{MPLTEXT 1 0 140 "Coeffpolytopexi4Y0:=simplify(-residue(residue((xi-X1)*SpectralCur veGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/Y,Y=0)/xi^5,xi=infinit y));\n" }{MPLTEXT 1 0 139 "Coeffpolytopexi5Y0:=simplify(-residue(resid ue((xi-X1)*SpectralCurveGl2(xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX10)/ Y,Y=0)/xi^6,xi=infinity));" }{MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi 2Y2G6\"\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi1Y2G6 \"\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi0Y2G6\",$I #X1GF$!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi4Y1G6\" \"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi3Y1G6\"\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi2Y1G6\",&I$s12GF$\" \"\"I$s22GF$F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi1Y1G 6\",(*&,&I$s12GF$!\"\"I$s22GF$F)\"\"\"I#X1GF$F+F+I$s11GF$F+I$s21GF$F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi0Y1G6\",(*&,&I$s11G F$!\"\"I$s21GF$F)\"\"\"I#X1GF$F+F+I$s10GF$F+I$s20GF$F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi0Y0G6\",**(I$s12GF$\"\"\"I$s22GF$F (I\"QGF$\"\"$!\"\"*&,**&,&F'F,F)F,F(I\"PGF$F(F(*(F'F(F)F(I#X1GF$F(F(*& F)F(I$s11GF$F(F,*&F'F(I$s21GF$F(F,F(F*\"\"#F(*&,.*$F1F8F,*&,(*&,&F'F(F )F(F(F3F(F(F5F,F7F,F(F1F(F(*&,&*&F5F(F)F(F(F6F(F(F3F(F(*&I$s10GF$F(F)F (F,*&F5F(F7F(F,*&F'F(I$s20GF$F(F,F(F*F(F(*&F1F(,**&F3F(F1F(F(*&,&F7F(F 5F(F(F3F(F(FDF,FGF,F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolyt opexi1Y0G6\",(*&,&*&I#X1GF$\"\"\"I$s22GF$F*!\"\"I$s21GF$F*F*I$s11GF$F* F**&,&*&F)F*F-F*F,I$s20GF$F*F*I$s12GF$F*F**&I$s10GF$F*F+F*F*" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi2Y0G6\",&*&,&*&I#X1GF$\"\"\" I$s22GF$F*!\"\"I$s21GF$F*F*I$s12GF$F*F**&F+F*I$s11GF$F*F*" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi3Y0G6\"*&I$s12GF$\"\"\"I$s22GF$ F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi4Y0G6\"\"\"!" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I3Coeffpolytopexi5Y0G6\"\"\"!" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "R1(xi);\n" }{MPLTEXT 1 0 8 "R 2(xi);\n" }{MPLTEXT 1 0 16 "simplify(series(" }{MPLTEXT 1 0 17 "Spectr alCurveGl2(" }{MPLTEXT 1 0 49 "xi,Y,Q,P,s12,s22,s11,s21,X1,s10,s20,sX1 0),Y=0));\n" }{MPLTEXT 1 0 82 "simplify(series(SpectralCurveGl2(xi,Y,Q ,P,s12,s22,s11,s21,X1,s10,s20,sX10),Y=0));\n" }{MPLTEXT 1 0 103 "RHSRe duced:=-simplify(SpectralCurveGl2(xi,tdY+1/2*R1(xi),Q,P,s12,s22,s11,s2 1,X1,s10,s20,sX10) -tdY^2):\n" }{MPLTEXT 1 0 43 "RHSReduced2:=simplify (1/4*R1(xi)^2-R2(xi)):" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 9 "simplify (" }{MPLTEXT 1 0 11 "RHSReduced-" }{MPLTEXT 1 0 49 "RHSReduced2-(Q-X1) *(P^2-R1(Q)*P+R2(Q))/(xi-X1));\n" }{MPLTEXT 1 0 16 "RHSReduced2bis:=" }{MPLTEXT 1 0 21 "1/4*(s12-s22)^2*xi^2+" }{MPLTEXT 1 0 25 "(1/2)*(s12- s22)*(s11-s21)" }{MPLTEXT 1 0 119 "*xi+(s11-s21)^2/4+(1/2)*(s12-s22)*( s10-s20) +(1/4)*(s10+s20)^2/(xi-X1)^2+(1/2)*(s10+s20)*((s12+s22)*X1+s1 1+s21)/(xi-X1)" }{MPLTEXT 1 0 2 ":\n" }{MPLTEXT 1 0 36 "simplify(serie s(simplify((xi-X1)^2*(" }{MPLTEXT 1 0 12 "RHSReduced2-" }{MPLTEXT 1 0 25 "RHSReduced2bis)),xi=X1));" }}{PARA 11 "" 1 "" {XPPMATH 20 ",**&,&I $s10G6\"!\"\"I$s20GF&F'\"\"\",&I#xiGF&F)I#X1GF&F'F'F)I$s11GF&F'I$s21GF &F'*&,&I$s12GF&F'I$s22GF&F'F)F+F)F)" }}{PARA 11 "" 1 "" {XPPMATH 20 ", ,*&I$s10G6\"\"\"\"I$s22GF%F&F&*&I$s11GF%F&I$s21GF%F&F&*&I$s12GF%F&I$s2 0GF%F&F&*&,&*&F)F&F'F&F&*&F,F&F*F&F&F&I#xiGF%F&F&*(F,F&F'F&F2\"\"#F&" }}{PARA 11 "" 1 "" {XPPMATH 20 "+)I\"YG6\"*&,2*(I$s12GF$\"\"\"I$s22GF$ F)I\"QGF$\"\"$F)*&,&*&,(*&I#X1GF$F)F*F)!\"\"I\"PGF$F)I$s21GF$F)F)F(F)F )*&F*F),&F4F)I$s11GF$F)F)F)F)F+\"\"#F)*&,(*&,&*&,&F5F3F4F3F)F2F)F)I$s2 0GF$F)F)F(F)F)*&,&*&,&F4F3F8F3F)F2F)F)I$s10GF$F)F)F*F)F)*&F7F),&F5F)F4 F)F)F)F)F+F)F)*(I#xiGF$F),**(FIF),&F2F)FIF3F)F*F)F)*&F2F)F5F)F)*&F5F)F IF)F3F@F3F)F(F)F)*(FIF),(*&F2F)F8F)F)*&F8F)FIF)F3FEF3F)F*F)F)*(F4F),(F 4F)F8F)F5F)F)F2F)F3*&F4F),&FEF)F@F)F)F)*(F8F)F5F)FIF)F3F)FLF3\"\"!*&,, *&,&F(F3F*F3F)FIF9F)*&,(*&,&F(F)F*F)F)F2F)F)F8F3F5F3F)FIF)F)*&,&F5F)F8 F)F)F2F)F)FEF3F@F3F)FLF3F)F)F9" }}{PARA 11 "" 1 "" {XPPMATH 20 "+)I\"Y G6\"*&,2*(I$s12GF$\"\"\"I$s22GF$F)I\"QGF$\"\"$F)*&,&*&,(*&I#X1GF$F)F*F )!\"\"I\"PGF$F)I$s21GF$F)F)F(F)F)*&F*F),&F4F)I$s11GF$F)F)F)F)F+\"\"#F) *&,(*&,&*&,&F5F3F4F3F)F2F)F)I$s20GF$F)F)F(F)F)*&,&*&,&F4F3F8F3F)F2F)F) I$s10GF$F)F)F*F)F)*&F7F),&F5F)F4F)F)F)F)F+F)F)*(I#xiGF$F),**(FIF),&F2F )FIF3F)F*F)F)*&F2F)F5F)F)*&F5F)FIF)F3F@F3F)F(F)F)*(FIF),(*&F2F)F8F)F)* &F8F)FIF)F3FEF3F)F*F)F)*(F4F),(F4F)F8F)F5F)F)F2F)F3*&F4F),&FEF)F@F)F)F )*(F8F)F5F)FIF)F3F)FLF3\"\"!*&,,*&,&F(F3F*F3F)FIF9F)*&,(*&,&F(F)F*F)F) F2F)F)F8F3F5F3F)FIF)F)*&,&F5F)F8F)F)F2F)F)FEF3F@F3F)FLF3F)F)F9" }} {PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 " \"\"!" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 212 40 "Identification with the one-matrix model" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "Vprime :=unapply(a*xi+b+c/(xi-X1),xi);\n" }{MPLTEXT 1 0 51 "simplify(simplify ((Vprime(x)-Vprime(ti))/(x-ti)));\n" }{MPLTEXT 1 0 47 "RHSMatrixModel: =Vprime(xi)^2/4- (c0/(xi-X1)+a);" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 15 "a:=-(s12-s22);\n" }{MPLTEXT 1 0 15 "b:=-(s11-s21);\n" }{MPLTEXT 1 0 15 "c:=-(s10+s20);\n" }{MPLTEXT 1 0 9 "s20:=-1;\n" }{MPLTEXT 1 0 56 "c0:=-(Q-X1)*(P^2-R1(Q)*P+R2(Q))-(s10+s20)*(X1*s22+s21);\n" }{MPLTEXT 1 0 72 "simplify(series(simplify((RHSReduced-RHSMatrixModel)*(xi-X1)^2 ),xi=X1));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 11 "Vprime(xi);" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I'VprimeG6\"f*6#I#xiGF$F$6$I)operatorGF $I&arrowGF$F$,(*&I\"aGF$\"\"\"9$F.F.I\"bGF$F.*&I\"cGF$F.,&F/F.I#X1GF$! \"\"F5F.F$F$F$" }}{PARA 11 "" 1 "" {XPPMATH 20 "*(,**&I#X1G6\"\"\"#I\" aGF&\"\"\"!\"\"*(,&I\"xGF&F)I#tiGF&F)F)F(F)F%F)F)*(F(F)F.F)F-F)F*I\"cG F&F)F),&F-F)F%F*F*,&F.F*F%F)F*" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I/RHS MatrixModelG6\",(*$,(*&I\"aGF$\"\"\"I#xiGF$F*F*I\"bGF$F**&I\"cGF$F*,&F +F*I#X1GF$!\"\"F1F*\"\"##F*\"\"%*&I#c0GF$F*F/F1F1F)F1" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I\"aG6\",&I$s22GF$\"\"\"I$s12GF$!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I\"bG6\",&I$s11GF$!\"\"I$s21GF$\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I\"cG6\",&I$s10GF$!\"\"I$s20GF$F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$s20G6\"!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I #c0G6\",&*&,&I\"QGF$\"\"\"I#X1GF$!\"\"F),0*$I\"PGF$\"\"#F)*&,**&,&I$s1 0GF$F+F)F)F)F'F+F)I$s11GF$F+I$s21GF$F+*&,&I$s12GF$F+I$s22GF$F+F)F(F)F) F)F.F)F+*&F4F)F:F)F)*&F5F)F6F)F)F9F+*&F(F),&*&F5F)F:F)F)*&F9F)F6F)F)F) F)*(F9F)F:F)F(F/F)F)F+*&,&F4F)F+F)F),&*&F*F)F:F)F)F6F)F)F+" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ",**&,&I$s 22G6\"\"\"\"I$s12GF&!\"\"F'I#xiGF&F'F'I$s11GF&F)I$s21GF&F'*&,&I$s10GF& F)F'F'F',&F*F'I#X1GF&F)F)F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 244 142 "2. gl_3 case: Loading th e spectral curve in terms of (Q,P) and the irregular times (t12,t22,t3 2,t11,t21,t31) and the monodromies (t10,t20,t30)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "P1:=unapply( (t12+t22+t32)*lambda+t11+t21+t31 ,lambda);\n" }{MPLTEXT 1 0 157 "P2:=unapply( (t12*t22+t12*t32+t22*t32) *lambda^2+((t21+t31)*t12+(t11+t31)*t22+t32*(t11+t21))*lambda-t10*t12-t 20*t22-t30*t32+t21*t11 +t31*t11+t21*t31,lambda);\n" }{MPLTEXT 1 0 171 "P3:=unapply(t12*t22*t32*lambda^3+(t12*t22*t31+t12*t32*t21+t22*t32*t11 )*lambda^2+(t12*t22*t30+t12*t32*t20+t22*t32*t10 +t12*t21*t31+t22*t11* t31+t32*t11*t21)*lambda,lambda);" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 33 "CoherenceEquation2:=t10+t20+t30;\n" }{MPLTEXT 1 0 16 "t10:=-(t20+t30);" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 27 "Spec tralCurveGl3:=unapply(\n" }{MPLTEXT 1 0 558 "-p^3+(t11+t21+t31+(t12+t2 2+t32)*q)*p^2+(((-t12-t32)*t22-t12*t32)*q^2+((-t11-t31)*t22+(-t11-t21) *t32-t12*(t21+t31))*q+t20*t22+t30*t32+t12*(-t20-t30)+(-t31-t21)*t11-t2 1*t31)*p-(lambda-q)*(q^2*t12*t22*t32+(((lambda*t12+t11)*t32+t12*t31)*t 22+t32*t12*t21)*q+((lambda^2*t12+lambda*t11-t20-t30)*t32+(lambda*t31+t 30)*t12+t11*t31)*t22+((lambda*t21+t20)*t12+t11*t21)*t32+t12*t21*t31)+( ((t22+t32)*t12+t22*t32)*lambda^2+(t12*(t21+t31)+t22*(t11+t31)+t32*(t11 +t21))*lambda+(t20+t30)*t12-t20*t22-t30*t32+t11*(t21+t31)+t21*t31)*y+( (-t12-t22-t32)*lambda-t11-t21-t31)*y^2+y^3\n" }{MPLTEXT 1 0 1 "," } {MPLTEXT 1 0 46 "lambda,y,q,p,t12,t22,t32,t11,t21,t31,t20,t30);" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I#P1G6\"f*6#I'lambdaGF$F$6$I)operatorGF $I&arrowGF$F$,**&,(I$t12GF$\"\"\"I$t22GF$F/I$t32GF$F/F/9$F/F/I$t11GF$F /I$t21GF$F/I$t31GF$F/F$F$F$" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I#P2G6\" f*6#I'lambdaGF$F$6$I)operatorGF$I&arrowGF$F$,2*&,(*&I$t12GF$\"\"\"I$t2 2GF$F0F0*&F/F0I$t32GF$F0F0*&F1F0F3F0F0F09$\"\"#F0*&,(*&,&I$t21GF$F0I$t 31GF$F0F0F/F0F0*&,&I$t11GF$F0FI#P3G6 \"f*6#I'lambdaGF$F$6$I)operatorGF$I&arrowGF$F$,(**I$t12GF$\"\"\"I$t22G F$F.I$t32GF$F.9$\"\"$F.*&,(*(I$t11GF$F.F/F.F0F.F.*(F-F.I$t21GF$F.F0F.F .*(F-F.F/F.I$t31GF$F.F.F.F1\"\"#F.*&,.*(I$t10GF$F.F/F.F0F.F.*(F6F.F8F. F0F.F.*(F6F.F/F.F:F.F.*(F-F.I$t20GF$F.F0F.F.*(F-F.F8F.F:F.F.*(F-F.F/F. I$t30GF$F.F.F.F1F.F.F$F$F$" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I3Coheren ceEquation2G6\",(I$t10GF$\"\"\"I$t20GF$F'I$t30GF$F'" }}{PARA 11 "" 1 " " {XPPMATH 20 ">I$t10G6\",&I$t20GF$!\"\"I$t30GF$F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I1SpectralCurveGl3G6\"f*6.I'lambdaGF$I\"yGF$I\"qGF$I\"p GF$I$t12GF$I$t22GF$I$t32GF$I$t11GF$I$t21GF$I$t31GF$I$t20GF$I$t30GF$F$6 $I)operatorGF$I&arrowGF$F$,0*$9'\"\"$!\"\"*&,*9+\"\"\"9,F>9-F>*&,(9(F> 9)F>9*F>F>9&F>F>F>F8\"\"#F>*&,0*&,&*&,&FCF:FEF:F>FDF>F>*&FCF>FEF>F:F>F FFGF>*&,(*&,&F=F:F@F:F>FDF>F>*&,&F=F:F?F:F>FEF>F>*&,&F?F>F@F>F>FCF>F:F >FFF>F>*&9.F>FDF>F>*&9/F>FEF>F>*&FCF>,&FXF:FZF:F>F>*&,&F@F:F?F:F>F=F>F >*&F?F>F@F>F:F>F8F>F>*&,&9$F>FFF:F>,,**FFFGFCF>FDF>FEF>F>*&,&*&,&*&,&* &F\\oF>FCF>F>F=F>F>FEF>F>*&FCF>F@F>F>F>FDF>F>*(FCF>FEF>F?F>F>F>FFF>F>* &,(*&,**&F\\oFGFCF>F>*&F\\oF>F=F>F>FXF:FZF:F>FEF>F>*&,&*&F\\oF>F@F>F>F ZF>F>FCF>F>*&F@F>F=F>F>F>FDF>F>*&,&*&,&*&F\\oF>F?F>F>FXF>F>FCF>F>*&F?F >F=F>F>F>FEF>F>*(FCF>F?F>F@F>F>F>F:*&,0*&,&*&,&FDF>FEF>F>FCF>F>*&FDF>F EF>F>F>F\\oFGF>*&,(FUF>*&,&F=F>F@F>F>FDF>F>*&FEF>,&F=F>F?F>F>F>F>F\\oF >F>*&,&FXF>FZF>F>FCF>F>FWF:FYF:*&F=F>FVF>F>FinF>F>9%F>F>*&,**&,(FCF:FD F:FEF:F>F\\oF>F>F=F:F?F:F@F:F>FiqFGF>*$FiqF9F>F$F$F$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "series(residue(" }{MPLTEXT 1 0 17 "Spectr alCurveGl3(" }{MPLTEXT 1 0 66 "lambda,y,q,p,t12,t22,t32,t11,t21,t31,t2 0,t30)/y^2,y=0),lambda=0);\n" }{MPLTEXT 1 0 97 "series(residue(Spectra lCurveGl3(lambda,y,q,p,t12,t22,t32,t11,t21,t31,t20,t30)/y^1,y=0),lambd a=0);" }}{PARA 11 "" 1 "" {XPPMATH 20 "+)I'lambdaG6\",0*&I$t11GF$\"\" \"I$t21GF$F(F(*&F'F(I$t31GF$F(F(*&I$t12GF$F(I$t20GF$F(F(*&F-F(I$t30GF$ F(F(*&F.F(I$t22GF$F(!\"\"*&F)F(F+F(F(*&F0F(I$t32GF$F(F3\"\"!,.*&F'F(F2 F(F(*&F'F(F6F(F(*&F-F(F)F(F(*&F-F(F+F(F(*&F)F(F6F(F(*&F2F(F+F(F(F(,(*& F-F(F2F(F(*&F-F(F6F(F(*&F2F(F6F(F(\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "++I'lambdaG6\",`o**I\"qGF$\"\"$I$t12GF$\"\"\"I$t22GF$F*I$t32GF$F*F ***I\"pGF$F*F'\"\"#F)F*F+F*!\"\"**F.F*F'F/F)F*F,F*F0**F.F*F'F/F+F*F,F* F0**F'F/I$t11GF$F*F+F*F,F*F***F'F/F)F*I$t21GF$F*F,F*F***F'F/F)F*F+F*I$ t31GF$F*F**(F.F/F'F*F)F*F**(F.F/F'F*F+F*F**(F.F/F'F*F,F*F***F.F*F'F*F4 F*F+F*F0**F.F*F'F*F4F*F,F*F0**F.F*F'F*F)F*F6F*F0**F.F*F'F*F)F*F8F*F0** F.F*F'F*F6F*F,F*F0**F.F*F'F*F+F*F8F*F0**F'F*F4F*F6F*F,F*F***F'F*F4F*F+ F*F8F*F***F'F*F)F*I$t20GF$F*F,F*F***F'F*F)F*F6F*F8F*F***F'F*F)F*F+F*I$ t30GF$F*F***F'F*FEF*F+F*F,F*F0**F'F*F+F*FHF*F,F*F0*$F.F(F0*&F.F/F4F*F* *&F.F/F6F*F**&F.F/F8F*F**(F.F*F4F*F6F*F0*(F.F*F4F*F8F*F0*(F.F*F)F*FEF* F0*(F.F*F)F*FHF*F0*(F.F*FEF*F+F*F**(F.F*F6F*F8F*F0*(F.F*FHF*F,F*F*\"\" !,0*(F4F*F6F*F,F*F0*(F4F*F+F*F8F*F0*(F)F*FEF*F,F*F0*(F)F*F6F*F8F*F0*(F )F*F+F*FHF*F0*(FEF*F+F*F,F*F**(F+F*FHF*F,F*F*F*,(*(F4F*F+F*F,F*F0*(F)F *F6F*F,F*F0*(F)F*F+F*F8F*F0F/,$*(F)F*F+F*F,F*F0F(" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 58 "SpectralcurveGl3dual:=simplify(series( Spect ralCurveGl3(y," }{MPLTEXT 1 0 50 "lambda,q,p,t12,t22,t32,t11,t21,t31,t 20,t30),y=0));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 33 "Coeffy2:=series (simplify(residue(" }{MPLTEXT 1 0 42 "SpectralcurveGl3dual/y^3,y=0)),l ambda=0);\n" }{MPLTEXT 1 0 33 "Coeffy1:=series(simplify(residue(" } {MPLTEXT 1 0 42 "SpectralcurveGl3dual/y^2,y=0)),lambda=0);\n" } {MPLTEXT 1 0 75 "Coeffy0:=series(simplify(residue(SpectralcurveGl3dual /y^1,y=0)),lambda=0);\n" }{MPLTEXT 1 0 25 "simplify(series(simplify(" }{MPLTEXT 1 0 36 "SpectralcurveGl3dual/(-t12*t22*t32)-" }{MPLTEXT 1 0 17 "SpectralCurveGl3(" }{MPLTEXT 1 0 81 "lambda,y,p,q,1/t12,1/t22,1/t3 2,-t11/t12,-t21/t22,-t31/t32,-t20,-t30)),lambda=0));" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I5SpectralcurveGl3dualG6\"++I\"yGF$,0*$I\"pGF$\"\"$! \"\"*&,*I$t11GF$\"\"\"I$t21GF$F/I$t31GF$F/*&,(I$t12GF$F/I$t22GF$F/I$t3 2GF$F/F/I\"qGF$F/F/F/F)\"\"#F/*&,0*&,&*&,&F6F+F5F+F/F4F/F/*&F5F/F6F/F+ F/F7F8F/*&,(*&,&F1F+F0F+F/F4F/F/*&,&F.F+F1F+F/F5F/F/*&F6F/,&F.F/F0F/F/ F+F/F7F/F/*&F4F/,&I$t20GF$F+I$t30GF$F+F/F/*&FJF/F5F/F/*&FKF/F6F/F/*&FC F/F.F/F/*&F0F/F1F/F+F/F)F/F/**F7F*F4F/F5F/F6F/F/*&,&*&,&*&F0F/F6F/F/*& F5F/F1F/F/F/F4F/F/*(F5F/F6F/F.F/F/F/F7F8F/*&,(*&,(*&FJF/F6F/F/FOF/*&F5 F/FKF/F/F/F4F/F/*&,&*&FIF/F6F/F/*&F1F/F.F/F/F/F5F/F/*(F6F/F.F/F0F/F/F/ F7F/F/*&I'lambdaGF$F/,0FHF/FLF/FMF/*$F^oF8F+*&,(F.F/F0F/F1F/F/F^oF/F/F NF/FOF+F/F+\"\"!,,*&,(F4F+F5F+F6F+F/F^oF8F/*&,(*&,&F0F/F1F/F/F4F/F/*&, &F.F/F1F/F/F5F/F/FFF/F/F^oF/F/*&,(*&,&FJF/FKF/F/F6F/F/F[oF+*&F4F/FKF/F +F/F5F/F/*&,&*&F.F/F0F/F+*&F4F/FJF/F+F/F6F/F/*(F4F/F0F/F1F/F+F/,&*&,&* &,&F1F+F^oF/F/F5F/F/*&F6F/,&F0F/F^oF+F/F+F/F4F/F/*(F5F/F6F/,&F.F/F^oF+ F/F+F8,$*(F4F/F5F/F6F/F+F*" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I(Coeffy2 G6\"+'I'lambdaGF$,&*&,&*&I$t21GF$\"\"\"I$t32GF$F,!\"\"*&I$t22GF$F,I$t3 1GF$F,F.F,I$t12GF$F,F,*(F0F,F-F,I$t11GF$F,F.\"\"!,&*&,&F0F,F-F,F,F2F,F ,*&F0F,F-F,F,F," }}{PARA 11 "" 1 "" {XPPMATH 20 ">I(Coeffy1G6\"+)I'lam bdaGF$,(*&,(*&,&I$t20GF$\"\"\"I$t30GF$F-F-I$t32GF$F-F-*&I$t31GF$F-I$t1 1GF$F-!\"\"*&I$t12GF$F-F.F-F3F-I$t22GF$F-F-*&,&*&F2F-I$t21GF$F-F3*&F5F -F,F-F3F-F/F-F-*(F5F-F:F-F1F-F3\"\"!,(*&,&F:F-F1F-F-F5F-F-*&,&F2F-F1F- F-F6F-F-*&F/F-,&F2F-F:F-F-F-F-,(F5F3F6F3F/F3\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I(Coeffy0G6\"++I'lambdaGF$,.*$I\"pGF$\"\"$!\"\"*&,*I$t11 GF$\"\"\"I$t21GF$F/I$t31GF$F/*&,(I$t12GF$F/I$t22GF$F/I$t32GF$F/F/I\"qG F$F/F/F/F)\"\"#F/*&,0*&,&*&,&F6F+F5F+F/F4F/F/*&F5F/F6F/F+F/F7F8F/*&,(* &,&F1F+F0F+F/F4F/F/*&,&F.F+F1F+F/F5F/F/*&F6F/,&F.F/F0F/F/F+F/F7F/F/*&F 4F/,&I$t20GF$F+I$t30GF$F+F/F/*&FJF/F5F/F/*&FKF/F6F/F/*&FCF/F.F/F/*&F0F /F1F/F+F/F)F/F/**F7F*F4F/F5F/F6F/F/*&,&*&,&*&F0F/F6F/F/*&F5F/F1F/F/F/F 4F/F/*(F5F/F6F/F.F/F/F/F7F8F/*&,(*&,(*&FJF/F6F/F/FOF/*&F5F/FKF/F/F/F4F /F/*&,&*&FIF/F6F/F/*&F1F/F.F/F/F/F5F/F/*(F6F/F.F/F0F/F/F/F7F/F/\"\"!,, FHF+FLF+FMF+FNF+FOF/F/,(F.F+F0F+F1F+F8F/F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "Spect ralCurveGl3Shifted:=unapply( " }{MPLTEXT 1 0 33 "simplify(series(Spect ralCurveGl3(" }{MPLTEXT 1 0 81 "lambda,y-(beta1*lambda),q,p,t12,t22,t3 2,t11,t21,t31,t20,t30),lambda=0)),lambda,y," }{MPLTEXT 1 0 36 "q,p,t12 ,t22,t32,t11,t21,t31,t20,t30)" }{MPLTEXT 1 0 1 ";" }{MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I8SpectralCurveGl3ShiftedG6\"f*6.I'la mbdaGF$I\"yGF$I\"qGF$I\"pGF$I$t12GF$I$t22GF$I$t32GF$I$t11GF$I$t21GF$I$ t31GF$I$t20GF$I$t30GF$F$6$I)operatorGF$I&arrowGF$F$++9$,0*$9'\"\"$!\" \"*&,*9+\"\"\"9,F@9-F@*&,(9(F@9)F@9*F@F@9&F@F@F@F:\"\"#F@*&,0*&,&*&,&F GF " 0 "" {MPLTEXT 1 0 13 "beta1:=-t22;\n" }{MPLTEXT 1 0 28 "SpectralCurveGl3Shi ftedbis:=" }{MPLTEXT 1 0 16 "simplify(series(" }{MPLTEXT 1 0 24 "Spect ralCurveGl3Shifted(" }{MPLTEXT 1 0 9 "lambda,y," }{MPLTEXT 1 0 44 "q,p ,t12,t22,t32,t11,t21,t31,t20,t30),y=0));\n" }{MPLTEXT 1 0 41 "Termy2la mbda2:=simplify(-residue(residue(" }{MPLTEXT 1 0 63 "SpectralCurveGl3S hiftedbis/y^3,y=0)/lambda^3,lambda=infinity));" }{MPLTEXT 1 0 1 "\n" } {MPLTEXT 1 0 104 "Termy2lambda1:=simplify(-residue(residue(SpectralCur veGl3Shiftedbis/y^3,y=0)/lambda^2,lambda=infinity));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 104 "Termy2lambda0:=simplify(-residue(residue(Spect ralCurveGl3Shiftedbis/y^3,y=0)/lambda^1,lambda=infinity));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 41 "Termy1lambda3:=simplify(-residue(residue( " }{MPLTEXT 1 0 63 "SpectralCurveGl3Shiftedbis/y^2,y=0)/lambda^4,lambd a=infinity));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 41 "Termy1lambda2:=s implify(-residue(residue(" }{MPLTEXT 1 0 64 "SpectralCurveGl3Shiftedbi s/y^2,y=0)/lambda^3,lambda=infinity));\n" }{MPLTEXT 1 0 41 "Termy1lamb da1:=simplify(-residue(residue(" }{MPLTEXT 1 0 64 "SpectralCurveGl3Shi ftedbis/y^2,y=0)/lambda^2,lambda=infinity));\n" }{MPLTEXT 1 0 41 "Term y1lambda0:=simplify(-residue(residue(" }{MPLTEXT 1 0 63 "SpectralCurve Gl3Shiftedbis/y^2,y=0)/lambda^1,lambda=infinity));" }{MPLTEXT 1 0 1 " \n" }{MPLTEXT 1 0 41 "Termy0lambda3:=simplify(-residue(residue(" } {MPLTEXT 1 0 63 "SpectralCurveGl3Shiftedbis/y^1,y=0)/lambda^4,lambda=i nfinity));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 41 "Termy0lambda2:=simp lify(-residue(residue(" }{MPLTEXT 1 0 64 "SpectralCurveGl3Shiftedbis/y ^1,y=0)/lambda^3,lambda=infinity));\n" }{MPLTEXT 1 0 126 "Termy0lambda 1:=simplify(series(simplify(-residue(residue(SpectralCurveGl3Shiftedbi s/y^1,y=0)/lambda^2,lambda=infinity)),t20));" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I&beta1G6\",$I$t22GF$!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I;SpectralCurveGl3ShiftedbisG6\"++I\"yGF$,0*$I\"pGF$\"\"$!\"\"*&, *I$t11GF$\"\"\"I$t21GF$F/I$t31GF$F/*&,(I$t12GF$F/I$t22GF$F/I$t32GF$F/F /I\"qGF$F/F/F/F)\"\"#F/*&,0*&,&*&,&F4F+F6F+F/F5F/F/*&F4F/F6F/F+F/F7F8F /*&,(*&,&F1F+F0F+F/F4F/F/*&,&F.F+F1F+F/F5F/F/*&F6F/,&F.F/F0F/F/F+F/F7F /F/*&I$t20GF$F/F5F/F/*&F4F/,&FIF+I$t30GF$F+F/F/*&FLF/F6F/F/*&FEF/F0F/F /*&F1F/F.F/F+F/F)F/F/**F7F*F4F/F5F/F6F/F/*&,&*&,&*&F.F/F6F/F/*&F4F/F1F /F/F/F5F/F/*(F4F/F6F/F0F/F/F/F7F8F/*&,(*&,(*&FKF/F6F/F/*&F4F/FLF/F/FOF /F/F5F/F/*&,&*&FIF/F6F/F/*&F0F/F1F/F/F/F4F/F/*(F6F/F.F/F0F/F/F/F7F/F/* &,**&,&*&I'lambdaGF$F/F0F/F/FIF/F/F5F8F/*&,(*&,&FaoF+FIF+F/F4F/F/*&Ffo F/F6F/F/*&,&F.F/F1F/F/F0F/F+F/F5F/F/*&,&*&F`oF/F6F/F/F[oF/F/F4F/F/F\\o F/F/FboF/F+\"\"!,0*(,&F5F/F6F+F/,&F4F/F5F+F/FboF8F+*&,(*&,(F.F+F0!\"#F 1F+F/F5F/F/FFF/*&,&F0F/F1F/F/F4F/F/F/FboF/F/FHF+*&,&FIF/FLF/F/F4F/F/Fh oF/FOF/FMF+F/,*F.F+F0F+F1F+*&,(F5F8F4F+F6F+F/FboF/F/F8F/F*" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I.Termy2lambda2G6\"\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I.Termy2lambda1G6\",(I$t22GF$\"\"#I$t12GF$!\"\"I$t32GF$F )" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I.Termy2lambda0G6\",(I$t11GF$!\"\" I$t21GF$F'I$t31GF$F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I.Termy1lambda3 G6\"\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I.Termy1lambda2G6\",$*&,&I $t22GF$\"\"\"I$t32GF$!\"\"F),&I$t12GF$F)F(F+F)F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I.Termy1lambda1G6\",**&,(I$t22GF$!\"#I$t12GF$\"\"\"I$t32 GF$F+F+I$t21GF$F+F+*&,&I$t11GF$!\"\"I$t31GF$F1F+F(F+F+*&F,F+F0F+F+*&F* F+F2F+F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I.Termy1lambda0G6\",,*&,&I$ t20GF$\"\"\"I$t30GF$F)F)I$t12GF$F)F)*&F(F)I$t22GF$F)!\"\"*&F*F)I$t32GF $F)F.*&I$t11GF$F),&I$t21GF$F)I$t31GF$F)F)F)*&F4F)F5F)F)" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I.Termy0lambda3G6\"\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I.Termy0lambda2G6\"*(I$t21GF$\"\"\",&I$t22GF$F'I$t32GF$! \"\"F',&I$t12GF$F'F)F+F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I.Termy0lam bda1G6\"+'I$t20GF$*&,&*&,&I$t22GF$\"\"\"I$t32GF$!\"\"F,I$t11GF$F,F,*&I $t31GF$F,,&I$t12GF$F,F+F.F,F.F,I$t21GF$F,\"\"!*&F*F,F2F,F," }}}{EXCHG {PARA 0 "" 0 "" {TEXT 245 40 "Identification with the two-matrix model " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "V1prime:=unapply(a1*lam bda+a2,lambda);\n" }{MPLTEXT 1 0 39 "V2prime:=unapply(b0*y+b1+b2/(y-X1 ),y);\n" }{MPLTEXT 1 0 70 "E0part1:=unapply( (V1prime(lambda)-y)*(V2p rime(y)-lambda),lambda,y);\n" }{MPLTEXT 1 0 12 "E0:=unapply(" } {MPLTEXT 1 0 41 "E0part1(lambda,y)+1 -a1*(b0-b2/(y-X1)*C0)" }{MPLTEXT 1 0 12 ",lambda,y);\n" }{MPLTEXT 1 0 29 "series(simplify(E0(lambda,y)- " }{MPLTEXT 1 0 25 "E0part1(lambda,y)),y=X1);" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I(V1primeG6\"f*6#I'lambdaGF$F$6$I)operatorGF$I&arrowGF$F $,&*&I#a1GF$\"\"\"9$F.F.I#a2GF$F.F$F$F$" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I(V2primeG6\"f*6#I\"yGF$F$6$I)operatorGF$I&arrowGF$F$,(*&I#b0GF$ \"\"\"9$F.F.I#b1GF$F.*&I#b2GF$F.,&F/F.I#X1GF$!\"\"F5F.F$F$F$" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I(E0part1G6\"f*6$I'lambdaGF$I\"yGF$F$6$I)oper atorGF$I&arrowGF$F$*&,(*&I#a1GF$\"\"\"9$F0F0I#a2GF$F09%!\"\"F0,**&I#b0 GF$F0F3F0F0I#b1GF$F0*&I#b2GF$F0,&F3F0I#X1GF$F4F4F0F1F4F0F$F$F$" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I#E0G6\"f*6$I'lambdaGF$I\"yGF$F$6$I)ope ratorGF$I&arrowGF$F$,(*&,(*&I#a1GF$\"\"\"9$F1F1I#a2GF$F19%!\"\"F1,**&I #b0GF$F1F4F1F1I#b1GF$F1*&I#b2GF$F1,&F4F1I#X1GF$F5F5F1F2F5F1F1F1F1*&F0F 1,&F8F1*(F;F1F " 0 "" {MPLTEXT 1 0 71 "si mplify(series(residue(-1/b0*(y-X1)*E0(lambda,y)/y^4,y=0),lambda=0));\n " }{MPLTEXT 1 0 24 "simplify(series(residue(" }{MPLTEXT 1 0 6 "-1/b0*" }{MPLTEXT 1 0 1 "(" }{MPLTEXT 1 0 6 "y-X1)*" }{MPLTEXT 1 0 2 "E0" } {MPLTEXT 1 0 32 "(lambda,y)/y^3,y=0),lambda=0));\n" }{MPLTEXT 1 0 24 " simplify(series(residue(" }{MPLTEXT 1 0 6 "-1/b0*" }{MPLTEXT 1 0 1 "(" }{MPLTEXT 1 0 6 "y-X1)*" }{MPLTEXT 1 0 2 "E0" }{MPLTEXT 1 0 32 "(lamb da,y)/y^2,y=0),lambda=0));\n" }{MPLTEXT 1 0 24 "simplify(series(residu e(" }{MPLTEXT 1 0 6 "-1/b0*" }{MPLTEXT 1 0 1 "(" }{MPLTEXT 1 0 6 "y-X1 )*" }{MPLTEXT 1 0 2 "E0" }{MPLTEXT 1 0 31 "(lambda,y)/y^1,y=0),lambda= 0));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 45 "series((-a1*b0+a2*b1+1)*X 1-b2*(C0*a1+a2),C0);" }}{PARA 11 "" 1 "" {XPPMATH 20 "+%I'lambdaG6\"\" \"\"\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "+'I'lambdaG6\"*&,&*&,&I#X1G F$!\"\"I#a2GF$F*\"\"\"I#b0GF$F,F,I#b1GF$F,F,F-F*\"\"!*&,&*&I#a1GF$F,F- F,F*F*F,F,F-F*F," }}{PARA 11 "" 1 "" {XPPMATH 20 "+)I'lambdaG6\"*&,,*& ,&*&I#X1GF$\"\"\"I#a2GF$F+F+I#a1GF$F+F+I#b0GF$F+F+*&I#b1GF$F+F*F+!\"\" *&F,F+F0F+F1I#b2GF$F+F1F+F+F.F1\"\"!*&,(*&,&*&F*F+F.F+F+F0F1F+F-F+F+F* F+F,F+F+F.F1F+*&F-F+F.F1\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "+)I'lam bdaG6\"*&,&*&,(*&I#a1GF$\"\"\"I#b0GF$F+!\"\"*&I#a2GF$F+I#b1GF$F+F+F+F+ F+I#X1GF$F+F+*&I#b2GF$F+,&*&I#C0GF$F+F*F+F+F/F+F+F-F+F,F-\"\"!*&,&*&,& *&F*F+F0F+F+F/F-F+F1F+F+*&F*F+F3F+F-F+F,F-F+,$*(F1F+F*F+F,F-F-\"\"#" } }{PARA 11 "" 1 "" {XPPMATH 20 "+'I#C0G6\",&*&,(*&I#a1GF$\"\"\"I#b0GF$F *!\"\"*&I#a2GF$F*I#b1GF$F*F*F*F*F*I#X1GF$F*F**&F.F*I#b2GF$F*F,\"\"!,$* &F)F*F2F*F,F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "SpectralCu rveGl3(" }{MPLTEXT 1 0 46 "lambda,y,q,p,t12,t22,t32,t11,t21,t31,t20,t3 0):" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 25 "simplify(series(residue((" }{MPLTEXT 1 0 17 "SpectralCurveGl3(" }{MPLTEXT 1 0 6 "lambda" } {MPLTEXT 1 0 64 ",y+t22*lambda,q,p,t12,t22,t32,t11,t21,t31,t20,t30)+1/ b0*(y-X1)* " }{MPLTEXT 1 0 2 "E0" }{MPLTEXT 1 0 10 "(lambda,y)" } {MPLTEXT 1 0 1 ")" }{MPLTEXT 1 0 22 "/y^4,y=0),lambda=0));\n" } {MPLTEXT 1 0 25 "simplify(series(residue((" }{MPLTEXT 1 0 17 "Spectral CurveGl3(" }{MPLTEXT 1 0 6 "lambda" }{MPLTEXT 1 0 1 "," }{MPLTEXT 1 0 2 "y+" }{MPLTEXT 1 0 10 "t22*lambda" }{MPLTEXT 1 0 9 ",q,p,t12," } {MPLTEXT 1 0 3 "t22" }{MPLTEXT 1 0 9 ",t32,t11," }{MPLTEXT 1 0 3 "t21" }{MPLTEXT 1 0 14 ",t31,t20,t30)+" }{MPLTEXT 1 0 2 "1/" }{MPLTEXT 1 0 3 "b0*" }{MPLTEXT 1 0 7 "(y-X1)*" }{MPLTEXT 1 0 2 "E0" }{MPLTEXT 1 0 10 "(lambda,y)" }{MPLTEXT 1 0 1 ")" }{MPLTEXT 1 0 22 "/y^3,y=0),lambda =0));\n" }{MPLTEXT 1 0 25 "simplify(series(residue((" }{MPLTEXT 1 0 17 "SpectralCurveGl3(" }{MPLTEXT 1 0 6 "lambda" }{MPLTEXT 1 0 1 "," } {MPLTEXT 1 0 2 "y+" }{MPLTEXT 1 0 10 "t22*lambda" }{MPLTEXT 1 0 9 ",q, p,t12," }{MPLTEXT 1 0 3 "t22" }{MPLTEXT 1 0 9 ",t32,t11," }{MPLTEXT 1 0 3 "t21" }{MPLTEXT 1 0 14 ",t31,t20,t30)+" }{MPLTEXT 1 0 2 "1/" } {MPLTEXT 1 0 3 "b0*" }{MPLTEXT 1 0 7 "(y-X1)*" }{MPLTEXT 1 0 2 "E0" } {MPLTEXT 1 0 10 "(lambda,y)" }{MPLTEXT 1 0 1 ")" }{MPLTEXT 1 0 22 "/y^ 2,y=0),lambda=0));\n" }{MPLTEXT 1 0 25 "simplify(series(residue((" } {MPLTEXT 1 0 17 "SpectralCurveGl3(" }{MPLTEXT 1 0 6 "lambda" }{MPLTEXT 1 0 1 "," }{MPLTEXT 1 0 2 "y+" }{MPLTEXT 1 0 10 "t22*lambda" } {MPLTEXT 1 0 9 ",q,p,t12," }{MPLTEXT 1 0 3 "t22" }{MPLTEXT 1 0 9 ",t32 ,t11," }{MPLTEXT 1 0 3 "t21" }{MPLTEXT 1 0 14 ",t31,t20,t30)+" } {MPLTEXT 1 0 2 "1/" }{MPLTEXT 1 0 3 "b0*" }{MPLTEXT 1 0 7 "(y-X1)*" } {MPLTEXT 1 0 2 "E0" }{MPLTEXT 1 0 10 "(lambda,y)" }{MPLTEXT 1 0 1 ")" }{MPLTEXT 1 0 21 "/y^1,y=0),lambda=0));" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "+'I'lambdaG6\"*&,&*&,,I#X1G F$\"\"\"I#a2GF$F*I$t11GF$!\"\"I$t21GF$F-I$t31GF$F-F*I#b0GF$F*F*I#b1GF$ F-F*F0F-\"\"!*&,&F*F**&,*I#a1GF$F*I$t12GF$F-I$t22GF$\"\"#I$t32GF$F-F*F 0F*F*F*F0F-F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "+)I'lambdaG6\"*&,,*&,0* &I$t11GF$\"\"\",&I$t21GF$F+I$t31GF$F+F+F+*&,&I$t20GF$F+I$t30GF$F+F+I$t 12GF$F+F+*&I#X1GF$F+I#a2GF$F+!\"\"*&F-F+F.F+F+*&F1F+I$t22GF$F+F7*&F2F+ I$t32GF$F+F7I#a1GF$F7F+I#b0GF$F+F+*&I#b1GF$F+F5F+F+*&F6F+F@F+F+I#b2GF$ F7F+F+F+F>F7\"\"!*&,**&,,*&,(F:!\"#F3F+FF+F+*&F=F+F@F+F+F5F7F6F7F+F>F 7F+*&,&*(,&F3F+F:F7F+,&F:F+FF+F7F=F7F+F>F7\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "+)I'lambdaG6\"*&,(*&,0*$I\"pGF$\"\"$!\"\"*&,*I$t11GF $\"\"\"I$t21GF$F0I$t31GF$F0*&,(I$t12GF$F0I$t22GF$F0I$t32GF$F0F0I\"qGF$ F0F0F0F*\"\"#F0*&,0*&,&*&,&F7F,F6F,F0F5F0F0*&F6F0F7F0F,F0F8F9F0*&,(*&, &F2F,F1F,F0F5F0F0*&,&F/F,F2F,F0F6F0F0*&F7F0,&F/F0F1F0F0F,F0F8F0F0*&F5F 0,&I$t20GF$F,I$t30GF$F,F0F0*&FKF0F6F0F0*&FLF0F7F0F0*&FDF0F/F0F0*&F1F0F 2F0F,F0F*F0F0**F8F+F5F0F6F0F7F0F0*&,&*&,&*&F1F0F7F0F0*&F6F0F2F0F0F0F5F 0F0*(F6F0F7F0F/F0F0F0F8F9F0*&,(*&,(*&FKF0F7F0F0FPF0*&F6F0FLF0F0F0F5F0F 0*&,&*&FJF0F7F0F0*&F2F0F/F0F0F0F6F0F0*(F7F0F/F0F1F0F0F0F8F0F0*&I#X1GF$ F0I#a1GF$F0F0F0I#b0GF$F0F0*&,&*&I#a2GF$F0I#b1GF$F0F,F,F0F0F_oF0F0*&I#b 2GF$F0,&*&I#C0GF$F0F`oF0F0FeoF0F0F0F0FaoF,\"\"!*&,(*&,**&FKF0F6F9F,*&, &*&,&F5F0F7F0F0FKF0F0*&,&F/F0F2F0F0F1F0F0F0F6F0F0*(F5F0F7F0FKF0F,*&F1F 0,&*&F/F0F7F0F0*&F5F0F2F0F0F0F,F0FaoF0F0*&,&*&F`oF0FfoF0F,FeoF0F0F_oF0 F0*&F`oF0FhoF0F0F0FaoF,F0*&,&**F1F0,&F6F0F7F,F0,&F5F0F6F,F0FaoF0F0F^oF 0F0FaoF,F9" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 72 "simplify(seri es(residue(simplify(series(SpectralCurveGl3Shiftedbis+1/b0*" }{MPLTEXT 1 0 7 "(y-X1)*" }{MPLTEXT 1 0 10 "E0(lambda," }{MPLTEXT 1 0 29 "y),y= 0))/y^4,y=0),lambda=0));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 67 "simpl ify(series(residue(simplify(series(SpectralCurveGl3Shiftedbis+" } {MPLTEXT 1 0 5 "1/b0*" }{MPLTEXT 1 0 7 "(y-X1)*" }{MPLTEXT 1 0 3 "E0(" }{MPLTEXT 1 0 7 "lambda," }{MPLTEXT 1 0 2 "y)" }{MPLTEXT 1 0 27 ",y=0 ))/y^3,y=0),lambda=0));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 67 "simpli fy(series(residue(simplify(series(SpectralCurveGl3Shiftedbis+" } {MPLTEXT 1 0 5 "1/b0*" }{MPLTEXT 1 0 7 "(y-X1)*" }{MPLTEXT 1 0 3 "E0(" }{MPLTEXT 1 0 7 "lambda," }{MPLTEXT 1 0 2 "y)" }{MPLTEXT 1 0 27 ",y=0 ))/y^2,y=0),lambda=0));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 67 "simpli fy(series(residue(simplify(series(SpectralCurveGl3Shiftedbis+" } {MPLTEXT 1 0 5 "1/b0*" }{MPLTEXT 1 0 7 "(y-X1)*" }{MPLTEXT 1 0 3 "E0(" }{MPLTEXT 1 0 7 "lambda," }{MPLTEXT 1 0 1 "y" }{MPLTEXT 1 0 1 ")" } {MPLTEXT 1 0 27 ",y=0))/y^1,y=0),lambda=0));" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "+'I'lambdaG6\"*&,& *&,,I#X1GF$\"\"\"I#a2GF$F*I$t11GF$!\"\"I$t21GF$F-I$t31GF$F-F*I#b0GF$F* F*I#b1GF$F-F*F0F-\"\"!*&,&F*F**&,*I#a1GF$F*I$t12GF$F-I$t22GF$\"\"#I$t3 2GF$F-F*F0F*F*F*F0F-F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "+)I'lambdaG6\" *&,,*&,0*&I$t11GF$\"\"\",&I$t21GF$F+I$t31GF$F+F+F+*&,&I$t20GF$F+I$t30G F$F+F+I$t12GF$F+F+*&I#X1GF$F+I#a2GF$F+!\"\"*&F-F+F.F+F+*&F1F+I$t22GF$F +F7*&F2F+I$t32GF$F+F7I#a1GF$F7F+I#b0GF$F+F+*&I#b1GF$F+F5F+F+*&F6F+F@F+ F+I#b2GF$F7F+F+F+F>F7\"\"!*&,**&,,*&,(F:!\"#F3F+FF+F+*&F=F+F@F+F+F5F7 F6F7F+F>F7F+*&,&*(,&F3F+F:F7F+,&F:F+FF+F7F=F7F+F>F7\"\"#" }} {PARA 11 "" 1 "" {XPPMATH 20 "+)I'lambdaG6\"*&,(*&,0*$I\"pGF$\"\"$!\" \"*&,*I$t11GF$\"\"\"I$t21GF$F0I$t31GF$F0*&,(I$t12GF$F0I$t22GF$F0I$t32G F$F0F0I\"qGF$F0F0F0F*\"\"#F0*&,0*&,&*&,&F7F,F6F,F0F5F0F0*&F6F0F7F0F,F0 F8F9F0*&,(*&,&F2F,F1F,F0F5F0F0*&,&F/F,F2F,F0F6F0F0*&F7F0,&F/F0F1F0F0F, F0F8F0F0*&F5F0,&I$t20GF$F,I$t30GF$F,F0F0*&FKF0F6F0F0*&FLF0F7F0F0*&FDF0 F/F0F0*&F1F0F2F0F,F0F*F0F0**F8F+F5F0F6F0F7F0F0*&,&*&,&*&F1F0F7F0F0*&F6 F0F2F0F0F0F5F0F0*(F6F0F7F0F/F0F0F0F8F9F0*&,(*&,(*&FKF0F7F0F0FPF0*&F6F0 FLF0F0F0F5F0F0*&,&*&FJF0F7F0F0*&F2F0F/F0F0F0F6F0F0*(F7F0F/F0F1F0F0F0F8 F0F0*&I#X1GF$F0I#a1GF$F0F0F0I#b0GF$F0F0*&,&*&I#a2GF$F0I#b1GF$F0F,F,F0F 0F_oF0F0*&I#b2GF$F0,&*&I#C0GF$F0F`oF0F0FeoF0F0F0F0FaoF,\"\"!*&,(*&,**& FKF0F6F9F,*&,&*&,&F5F0F7F0F0FKF0F0*&,&F/F0F2F0F0F1F0F0F0F6F0F0*(F5F0F7 F0FKF0F,*&F1F0,&*&F/F0F7F0F0*&F5F0F2F0F0F0F,F0FaoF0F0*&,&*&F`oF0FfoF0F ,FeoF0F0F_oF0F0*&F`oF0FhoF0F0F0FaoF,F0*&,&**F1F0,&F6F0F7F,F0,&F5F0F6F, F0FaoF0F0F^oF0F0FaoF,F9" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 " EQ1:=simplify(residue(residue( (" }{MPLTEXT 1 0 32 "SpectralCurveGl3Sh iftedbis+1/b0*" }{MPLTEXT 1 0 17 "(y-X1)*E0(lambda," }{MPLTEXT 1 0 34 "y))/y^3,y=0)/lambda^2,lambda=0));\n" }{MPLTEXT 1 0 115 "EQ2:=simplify (residue(residue( (SpectralCurveGl3Shiftedbis+1/b0*(y-X1)*E0(lambda,y) )/y^3,y=0)/lambda^1,lambda=0));\n" }{MPLTEXT 1 0 115 "EQ3:=simplify(re sidue(residue( (SpectralCurveGl3Shiftedbis+1/b0*(y-X1)*E0(lambda,y))/y ^2,y=0)/lambda^3,lambda=0));\n" }{MPLTEXT 1 0 115 "EQ4:=simplify(resid ue(residue( (SpectralCurveGl3Shiftedbis+1/b0*(y-X1)*E0(lambda,y))/y^2, y=0)/lambda^2,lambda=0));\n" }{MPLTEXT 1 0 115 "EQ5:=simplify(residue( residue( (SpectralCurveGl3Shiftedbis+1/b0*(y-X1)*E0(lambda,y))/y^2,y=0 )/lambda^1,lambda=0));\n" }{MPLTEXT 1 0 115 "EQ6:=simplify(residue(res idue( (SpectralCurveGl3Shiftedbis+1/b0*(y-X1)*E0(lambda,y))/y^1,y=0)/l ambda^3,lambda=0));\n" }{MPLTEXT 1 0 115 "EQ7:=simplify(residue(residu e( (SpectralCurveGl3Shiftedbis+1/b0*(y-X1)*E0(lambda,y))/y^1,y=0)/lamb da^2,lambda=0));\n" }{MPLTEXT 1 0 114 "EQ8:=simplify(residue(residue( \+ (SpectralCurveGl3Shiftedbis+1/b0*(y-X1)*E0(lambda,y))/y^1,y=0)/lambda^ 1,lambda=0)):" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ1G6\"*&,&\"\"\"F'* &,*I#a1GF$F'I$t12GF$!\"\"I$t22GF$\"\"#I$t32GF$F,F'I#b0GF$F'F'F'F0F," } }{PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ2G6\"*&,&*&,,I#X1GF$\"\"\"I#a2GF$F *I$t11GF$!\"\"I$t21GF$F-I$t31GF$F-F*I#b0GF$F*F*I#b1GF$F-F*F0F-" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ3G6\"*&,&*(,&I$t12GF$\"\"\"I$t22GF$ !\"\"F*,&F+F*I$t32GF$F,F*I#b0GF$F*F,I#a1GF$F,F*F/F," }}{PARA 11 "" 1 " " {XPPMATH 20 ">I$EQ4G6\"*&,**&,,*&,(I$t22GF$!\"#I$t12GF$\"\"\"I$t32GF $F.F.I$t21GF$F.F.*&,&I$t11GF$!\"\"I$t31GF$F4F.F+F.F.*&I#X1GF$F.I#a1GF$ F.F4*&F-F.F5F.F.*&F/F.F3F.F.F.I#b0GF$F.F.*&F8F.I#b1GF$F.F.F7F4I#a2GF$F 4F.F;F4" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ5G6\"*&,,*&,0*&I$t11GF$ \"\"\",&I$t21GF$F+I$t31GF$F+F+F+*&,&I$t20GF$F+I$t30GF$F+F+I$t12GF$F+F+ *&I#X1GF$F+I#a2GF$F+!\"\"*&F-F+F.F+F+*&F1F+I$t22GF$F+F7*&F2F+I$t32GF$F +F7I#a1GF$F7F+I#b0GF$F+F+*&I#b1GF$F+F5F+F+*&F6F+F@F+F+I#b2GF$F7F+F+F+F >F7" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ6G6\"*&,&**I$t21GF$\"\"\",&I $t22GF$F)I$t32GF$!\"\"F),&I$t12GF$F)F+F-F)I#b0GF$F)F)*&I#X1GF$F)I#a1GF $F)F)F)F0F-" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ7G6\"*&,(*&,**&I$t20 GF$\"\"\"I$t22GF$\"\"#!\"\"*&,&*&,&I$t12GF$F+I$t32GF$F+F+F*F+F+*&,&I$t 11GF$F+I$t31GF$F+F+I$t21GF$F+F+F+F,F+F+*(F3F+F4F+F*F+F.*&F9F+,&*&F7F+F 4F+F+*&F3F+F8F+F+F+F.F+I#b0GF$F+F+*&,&*&I#a1GF$F+I#b1GF$F+F.I#a2GF$F+F +I#X1GF$F+F+*&FCF+I#b2GF$F+F+F+F?F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "a1:=-(t12-t22)*(t22-t32)*b0;" }{MPLTEXT 1 0 1 "\n" } {MPLTEXT 1 0 15 "simplify(EQ3);\n" }{MPLTEXT 1 0 17 "b0:=1/(t32-t22); \n" }{MPLTEXT 1 0 15 "simplify(EQ1);\n" }{MPLTEXT 1 0 8 "X1:=t21;" } {MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 15 "simplify(EQ6);\n" }{MPLTEXT 1 0 25 "a2:=b1*(t32-t22)+t11+t31;" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 15 " simplify(EQ2);\n" }{MPLTEXT 1 0 15 "simplify(EQ4);\n" }{MPLTEXT 1 0 20 "b1:=-t31/(t32-t22);\n" }{MPLTEXT 1 0 15 "simplify(EQ4);\n" } {MPLTEXT 1 0 9 "b2:=t20;\n" }{MPLTEXT 1 0 15 "simplify(EQ7);\n" } {MPLTEXT 1 0 11 "t30:=1-t20;" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 14 "s implify(EQ5);" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 18 "a1:=simplify(a1);\n" }{MPLTEXT 1 0 18 "a2:=simplify(a2);\n" } {MPLTEXT 1 0 18 "b0:=simplify(b0);\n" }{MPLTEXT 1 0 18 "b1:=simplify(b 1);\n" }{MPLTEXT 1 0 18 "b2:=simplify(b2);\n" }{MPLTEXT 1 0 17 "X1:=si mplify(X1);" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 1 "\n" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I#a1G6\",$*(,&I$t12GF$\"\"\"I$ t22GF$!\"\"F),&F*F)I$t32GF$F+F)I#b0GF$F)F+" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I#b0G6\"*$,&I$t32 GF$\"\"\"I$t22GF$!\"\"F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I#X1G6\"I$t21GF$" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I#a2G6\",(*&I#b1G F$\"\"\",&I$t32GF$F(I$t22GF$!\"\"F(F(I$t11GF$F(I$t31GF$F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ",$*&,&I$t3 2G6\"!\"\"I$t12GF&\"\"\"F),&*&I#b1GF&F),&I$t22GF&F)F%F'F)F)I$t31GF&F'F )F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I#b1G6\",$*&I$t31GF$\"\"\",&I$t3 2GF$F(I$t22GF$!\"\"F,F," }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I#b2G6\"I$t20GF$" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t30G6\",&\"\"\" F&I$t20GF$!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I#a1G6\",&I$t12GF$\"\"\"I$t22GF$!\"\"" }}{PARA 11 " " 1 "" {XPPMATH 20 ">I#a2G6\"I$t11GF$" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I#b0G6\",$*$,&I$t22GF$\"\"\"I$t32GF$!\"\"F+F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I#b1G6\"*&I$t31GF$\"\"\",&I$t22GF$F'I$t32GF$!\"\"F+" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I#b2G6\"I$t20GF$" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I#X1G6\"I$t21GF$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "simplify(V1prime(lambda));\n" }{MPLTEXT 1 0 28 "int(V1prime(la mbda),lambda);" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 11 "V2prime(y);" } {MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 19 "int(V2prime(y),y);\n" }{MPLTEXT 1 0 1 "\n" }}{PARA 11 "" 1 "" {XPPMATH 20 ",&*&,&I$t12G6\"\"\"\"I$t22G F&!\"\"F'I'lambdaGF&F'F'I$t11GF&F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ",& *&,&I$t12G6\"\"\"\"I$t22GF&!\"\"F'I'lambdaGF&\"\"##F'F+*&F*F'I$t11GF&F 'F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ",(*&,&I$t22G6\"\"\"\"I$t32GF&!\" \"F)I\"yGF&F'F)*&I$t31GF&F'F$F)F'*&I$t20GF&F',&F*F'I$t21GF&F)F)F'" }} {PARA 11 "" 1 "" {XPPMATH 20 ",(*&I$t20G6\"\"\"\"-I#lnG6$%*protectedGI (_syslibGF%6#,&I\"yGF%F&I$t21GF%!\"\"F&F&*(I$t31GF%F&,&I$t22GF%F&I$t32 GF%F0F0F.F&F&*&F3F0F.\"\"##F0F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "C0:=1/(t20*(t12-t22)" }{MPLTEXT 1 0 10 "*(t32-t22)" }{MPLTEXT 1 0 6 ")* ( " }{MPLTEXT 1 0 31 "(p^3-P1(q)*p^2+P2(q)*p-P3(q)) -" } {MPLTEXT 1 0 4 "t11*" }{MPLTEXT 1 0 31 "t21*t31+t11*t20*(t22-t32)-t21* (" }{MPLTEXT 1 0 3 "t12" }{MPLTEXT 1 0 8 "-t32));\n" }{MPLTEXT 1 0 14 "simplify(EQ8);" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I#C0G6\"**I$t20GF$! \"\",&I$t12GF$\"\"\"I$t22GF$F'F',&I$t32GF$F*F+F'F',4*$I\"pGF$\"\"$F**& ,*I$t11GF$F*I$t21GF$F*I$t31GF$F**&,(F)F*F+F*F-F*F*I\"qGF$F*F*F*F0\"\"# F'*&,2*&,(*&F)F*F+F*F**&F)F*F-F*F**&F+F*F-F*F*F*F9F:F**&,(*&,&F5F*F6F* F*F)F*F**&,&F4F*F6F*F*F+F*F**&F-F*,&F4F*F5F*F*F*F*F9F*F*F)F**&F&F*F+F* F'*&,&F*F*F&F'F*F-F*F'*&F5F*F4F*F**&F6F*F4F*F**&F5F*F6F*F*F*F0F*F***F9 F1F)F*F+F*F-F*F'*&,(*(F4F*F+F*F-F*F**(F)F*F5F*F-F*F**(F)F*F+F*F6F*F*F* F9F:F'*&,.FAF'*(F-F*F4F*F5F*F**(F+F*F4F*F6F*F**(F)F*F-F*F&F*F**(F)F*F5 F*F6F*F**(F)F*F+F*FLF*F*F*F9F*F'*(F4F*F5F*F6F*F'*(F4F*F&F*,&F+F*F-F'F* F**&F5F*,&F-F'F)F*F*F'F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 246 54 "3. Dual spectral curve and dual spectral curve shifted" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "DualSpectralCurveShifted: =simplify(series(" }{MPLTEXT 1 0 23 "SpectralCurveGl3Shifted" } {MPLTEXT 1 0 2 "(y" }{MPLTEXT 1 0 52 ",lambda,Q,P,t12,t22,t32,t11,t21, t31,t20,t30),y=0)):\n" }{MPLTEXT 1 0 86 "simplify(series(SpectralCurve Gl2(lambda,y,q,p,s12,s22,s11,s21,X1,s10,s20,sX10),y=0)):\n" }{MPLTEXT 1 0 33 "ToCancelShifted:=simplify(series(" }{MPLTEXT 1 0 25 "DualSpect ralCurveShifted-" }{MPLTEXT 1 0 20 "(t22-t32)*(t12-t22)*" }{MPLTEXT 1 0 13 "(t21-lambda)*" }{MPLTEXT 1 0 70 "SpectralCurveGl2(lambda,y,q,p,s 12,s22,s11,s21,X1,s10,s20,sX10),y=0)):\n" }{MPLTEXT 1 0 54 "ToCancelSh iftedfunction:=unapply(ToCancelShifted,Q,P):" }{MPLTEXT 1 0 1 "\n" } {MPLTEXT 1 0 92 "TermProportionalToySquareShifted:=series(simplify(ser ies((lambda-X1)*residue(ToCancelShifted" }{MPLTEXT 1 0 31 "/y^3,y=0),l ambda=0)),lambda=0);" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 71 "TermPropo rtionalToyShifted:=series(simplify(series((lambda-X1)*residue(" } {MPLTEXT 1 0 15 "ToCancelShifted" }{MPLTEXT 1 0 32 "/y^2,y=0),lambda=0 )),lambda=0);\n" }{MPLTEXT 1 0 12 "TermConstant" }{MPLTEXT 1 0 7 "Shif ted" }{MPLTEXT 1 0 47 ":=series(simplify(series((lambda-X1)^2*residue( " }{MPLTEXT 1 0 15 "ToCancelShifted" }{MPLTEXT 1 0 36 "/y,y=0),lambda= 0,10)),lambda=0,10):\n" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 36 "simplif y(residue(TermProportionalToy" }{MPLTEXT 1 0 28 "Shifted/lambda^5,lamb da=0));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 41 "EQ1:=simplify(residue( TermProportionalToy" }{MPLTEXT 1 0 7 "Shifted" }{MPLTEXT 1 0 21 "/lamb da^4,lambda=0));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 41 "EQ2:=simplify (residue(TermProportionalToy" }{MPLTEXT 1 0 7 "Shifted" }{MPLTEXT 1 0 22 "/lambda^3,lambda=0)):\n" }{MPLTEXT 1 0 41 "EQ3:=simplify(residue(T ermProportionalToy" }{MPLTEXT 1 0 7 "Shifted" }{MPLTEXT 1 0 22 "/lambd a^2,lambda=0)):\n" }{MPLTEXT 1 0 41 "EQ4:=simplify(residue(TermProport ionalToy" }{MPLTEXT 1 0 7 "Shifted" }{MPLTEXT 1 0 20 "/lambda,lambda=0 )):\n" }{MPLTEXT 1 0 36 "simplify(residue(TermConstantShifted" } {MPLTEXT 1 0 21 "/lambda^7,lambda=0));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 41 "EQ5:=simplify(residue(TermConstantShifted" }{MPLTEXT 1 0 21 " /lambda^6,lambda=0));" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 34 "EQ6:=sim plify(residue(TermConstant" }{MPLTEXT 1 0 7 "Shifted" }{MPLTEXT 1 0 22 "/lambda^5,lambda=0)):\n" }{MPLTEXT 1 0 34 "EQ7:=simplify(residue(T ermConstant" }{MPLTEXT 1 0 7 "Shifted" }{MPLTEXT 1 0 22 "/lambda^4,lam bda=0)):\n" }{MPLTEXT 1 0 34 "EQ8:=simplify(residue(TermConstant" } {MPLTEXT 1 0 7 "Shifted" }{MPLTEXT 1 0 22 "/lambda^3,lambda=0)):\n" } {MPLTEXT 1 0 34 "EQ9:=simplify(residue(TermConstant" }{MPLTEXT 1 0 7 " Shifted" }{MPLTEXT 1 0 22 "/lambda^2,lambda=0)):\n" }{MPLTEXT 1 0 35 " EQ10:=simplify(residue(TermConstant" }{MPLTEXT 1 0 7 "Shifted" } {MPLTEXT 1 0 19 "/lambda,lambda=0)):" }}{PARA 11 "" 1 "" {XPPMATH 20 " >IATermProportionalToySquareShiftedG6\"\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I;TermProportionalToyShiftedG6\"++I'lambdaGF$*&I$t21GF$ \"\"\",**&,**&,&I$s11GF$!\"\"I$s21GF$F0F)F(F)F)I$s10GF$F)I$t20GF$F)F0F )F)I$t22GF$\"\"#F)*&,&*&,**&,&F1F)F/F)F)I$t12GF$F)F)*&F;F)I$t32GF$F)F) I$t11GF$F0I$t31GF$F0F)F(F)F)*&,&FF)F),(F2F)F3F)F0F)F)F0F)F4F)F)*& ,&*&,&*&F.F)F>F)F)F@F)F)FF)F?F)F)F)F(F)F)*(F>F)FF)F)F)F(F5F)*&,**&, &F/!\"#F1FjnF)FF)F)F@F5F?F5F)F(F)F)FAF)F)F4F)F)*&,&*&,&F 0F)*&FPF)F>F)F)F)FF0F)F(F5F)*&,&*&,&*&FTF)F>F)F)F@FjnF)FF)F)F)F(F)F)F:F)F=F)F?F0F@F0F)F4F)F) *&,&*&,&F5F)*&FjoF)F>F)F)F)FF5F)F(F)F)FFF)FIF)F5,**&FPF)F4F5F)* &FXF)F4F)F)F^oF)F>F0\"\"$" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ1G6\",**&,&I$s12GF$!\"\"I$s22GF$F) \"\"\"I$t22GF$\"\"#F+*&,(*&,&F(F+F*F+F+I$t12GF$F+F+F-F+*&F1F+I$t32GF$F +F+F+F,F+F+*&,&F)F+*&F'F+F4F+F+F+F2F+F+F4F)" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ5G6\",&\"\"\" F&**,&I$t12GF$F&I$t22GF$!\"\"F&,&F*F&I$t32GF$F+F&I$s22GF$F&I$s12GF$F&F &" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "solve(\{EQ1,EQ5\},\{t1 2,t32\});" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$<$/I$t12G6\"*&,&*&I$s12GF &\"\"\"I$t22GF&F+F+!\"\"F+F+F*F-/I$t32GF&*&,&*&I$s22GF&F+F,F+F+F-F+F+F 3F-<$/F%F0/F/F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {SECT 0 {PARA 3 "" 0 "" {TEXT 247 14 "First Solution" }{TEXT 247 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "t12 := (t22*s12-1)/s12;\n" }{MPLTEXT 1 0 24 "t32 := (t22*s22-1)/s22;\n" }{MPLTEXT 1 0 15 "simpli fy(EQ1);\n" }{MPLTEXT 1 0 15 "simplify(EQ5);\n" }{MPLTEXT 1 0 20 "EQ2: =simplify(EQ2);\n" }{MPLTEXT 1 0 19 "EQ6:=simplify(EQ6);" }{MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t12G6\"*&,&*&I$t22GF$\"\"\"I )sinfty12GF$F)F)F)!\"\"F)F*F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t32G 6\"*&,&*&I$t22GF$\"\"\"I)sinfty22GF$F)F)F)!\"\"F)F*F+" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ2G6\"*(,**&I$t11GF$\"\"\"I)sinfty12 GF$F)!\"\"*&I$t31GF$F)I)sinfty22GF$F)F+I)sinfty11GF$F+I)sinfty21GF$F+F )F.F+F*F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ6G6\"*(,&*&,&*&,&I$t11 GF$!\"\"I$t31GF$F,\"\"\"I)sinfty22GF$F.F.I)sinfty21GF$F,F.I)sinfty12GF $F.F.*&I)sinfty11GF$F.F/F.F,F.F1F,F/F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "solve(\{EQ2,EQ6\},\{t11,t31\});" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 17 "t11 := -s11/s12;\n" }{MPLTEXT 1 0 17 "t31 := -s21/s 22;\n" }{MPLTEXT 1 0 15 "simplify(EQ2);\n" }{MPLTEXT 1 0 15 "simplify( EQ6);\n" }{MPLTEXT 1 0 20 "EQ3:=simplify(EQ3);\n" }{MPLTEXT 1 0 19 "EQ 7:=simplify(EQ7);" }}{PARA 11 "" 1 "" {XPPMATH 20 "<$/I$t11G6\",$*&I)s infty11GF%\"\"\"I)sinfty12GF%!\"\"F+/I$t31GF%,$*&I)sinfty21GF%F)I)sinf ty22GF%F+F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t11G6\",$*&I)sinfty11G F$\"\"\"I)sinfty12GF$!\"\"F*" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t31G6 \",$*&I)sinfty21GF$\"\"\"I)sinfty22GF$!\"\"F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ3G6\"*(,(I$t20GF$!\"\"I)sinfty10GF$F(I)sinft y20GF$F(\"\"\"I)sinfty22GF$F(I)sinfty12GF$F(" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ7G6\"*(,&*&,(I$t20GF$!\"\"I$t30GF$F*I)sinfty10GF$F* \"\"\"I)sinfty22GF$F-F-*&I)sinfty12GF$F-,&F+F-I)sinfty20GF$F*F-F-F-F0F *F.F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "solve(\{EQ3,EQ7\}, \{t20,t30\});" }{MPLTEXT 1 0 1 "\n" }{MPLTEXT 1 0 17 "t20 := -s10-s20; \n" }{MPLTEXT 1 0 12 "t30 := s20;\n" }{MPLTEXT 1 0 15 "simplify(EQ3); \n" }{MPLTEXT 1 0 15 "simplify(EQ7);\n" }{MPLTEXT 1 0 14 "EQ4:=simplif y(" }{MPLTEXT 1 0 8 "unapply(" }{MPLTEXT 1 0 11 "EQ4,Q,P)):\n" } {MPLTEXT 1 0 14 "EQ8:=simplify(" }{MPLTEXT 1 0 8 "unapply(" }{MPLTEXT 1 0 11 "EQ8,Q,P)):\n" }{MPLTEXT 1 0 33 "EQ9:=simplify(unapply(EQ9,Q,P) ):\n" }{MPLTEXT 1 0 34 "EQ10:=simplify(unapply(EQ10,Q,P)):" }}{PARA 11 "" 1 "" {XPPMATH 20 "<$/I$t20G6\",&I)sinfty10GF%!\"\"I)sinfty20GF%F(/ I$t30GF%F)" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t20G6\",&I)sinfty10GF$! \"\"I)sinfty20GF$F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t30G6\"I)sinft y20GF$" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "t21:=X 1;\n" }{MPLTEXT 1 0 25 "simplify(EQ4(p,q+t22*p));" }{MPLTEXT 1 0 1 "\n " }{MPLTEXT 1 0 7 "series(" }{MPLTEXT 1 0 13 "simplify(EQ8(" }{MPLTEXT 1 0 1 "p" }{MPLTEXT 1 0 3 ",q+" }{MPLTEXT 1 0 13 "t22*p)),p=0);" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I$t21G6\"I#X1GF$" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 212 19 "We find sX10*sX20=0" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 9 "sX10:=0;\n" }{MPLTEXT 1 0 9 "simplify(" } {MPLTEXT 1 0 24 "ToCancelShiftedfunction(" }{MPLTEXT 1 0 9 "p,q+t22*p" }{MPLTEXT 1 0 3 "));" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I%sX10G6\"\"\" !" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "t12:=t12;\n" }{MPLTEXT 1 0 10 "t32:=t32;\n" }{MPLTEXT 1 0 10 "t22:=t22;\n" }{MPLTEXT 1 0 10 "t11:=t11;\n" }{MPLTEXT 1 0 10 "t21:=t21;\n" }{MPLTEXT 1 0 10 "t31:=t31;\n" }{MPLTEXT 1 0 10 "t20:=t2 0;\n" }{MPLTEXT 1 0 10 "t30:=t30;\n" }{MPLTEXT 1 0 11 "sX10:=sX10;" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I$t12G6\"*&,&*&I$t22GF$\"\"\"I)sinfty12 GF$F)F)F)!\"\"F)F*F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t32G6\"*&,&*& I$t22GF$\"\"\"I)sinfty22GF$F)F)F)!\"\"F)F*F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t22G6\"F#" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t11G6\", $*&I)sinfty11GF$\"\"\"I)sinfty12GF$!\"\"F*" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t21G6\"I#X1GF$" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t31 G6\",$*&I)sinfty21GF$\"\"\"I)sinfty22GF$!\"\"F*" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t20G6\",&I)sinfty10GF$!\"\"I)sinfty20GF$F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t30G6\"I)sinfty20GF$" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I%sX10G6\"\"\"!" }}}}{SECT 0 {PARA 3 "" 0 "" {TEXT 247 15 "Second Solution" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "t12 : = (t22*s22-1)/s22;\n" }{MPLTEXT 1 0 23 "t32 := (t22*s12-1)/s12;" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I$t12G6\"*&,&*&I$t22GF$\"\"\"I)sinfty22 GF$F)F)F)!\"\"F)F*F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t32G6\"*&,&*& I$t22GF$\"\"\"I)sinfty12GF$F)F)F)!\"\"F)F*F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "simplify(EQ1);\n" }{MPLTEXT 1 0 15 "simplify(EQ5) ;\n" }{MPLTEXT 1 0 20 "EQ2:=simplify(EQ2);\n" }{MPLTEXT 1 0 19 "EQ6:=s implify(EQ6);" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ2G6\"*(,** &I$t11GF$\"\"\"I)sinfty22GF$F)!\"\"*&I$t31GF$F)I)sinfty12GF$F)F+I)sinf ty11GF$F+I)sinfty21GF$F+F)F*F+F.F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I $EQ6G6\"*(,&*&,&*&,&I$t11GF$!\"\"I$t31GF$F,\"\"\"I)sinfty22GF$F.F.I)si nfty21GF$F,F.I)sinfty12GF$F.F.*&F/F.I)sinfty11GF$F.F,F.F1F,F/F," }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "solve(\{EQ2,EQ6\},\{t11,t31 \});\n" }{MPLTEXT 1 0 17 "t11 := -s21/s22;\n" }{MPLTEXT 1 0 17 "t31 := -s11/s12;\n" }{MPLTEXT 1 0 15 "simplify(EQ2);\n" }{MPLTEXT 1 0 15 "si mplify(EQ6);\n" }{MPLTEXT 1 0 20 "EQ3:=simplify(EQ3);\n" }{MPLTEXT 1 0 19 "EQ7:=simplify(EQ7);" }}{PARA 11 "" 1 "" {XPPMATH 20 "<$/I$t11G6 \",$*&I)sinfty21GF%\"\"\"I)sinfty22GF%!\"\"F+/I$t31GF%,$*&I)sinfty11GF %F)I)sinfty12GF%F+F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t11G6\",$*&I) sinfty21GF$\"\"\"I)sinfty22GF$!\"\"F*" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t31G6\",$*&I)sinfty11GF$\"\"\"I)sinfty12GF$!\"\"F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ3G6\"*(,(I$t20GF$!\"\"I)sinfty10GF$ F(I)sinfty20GF$F(\"\"\"I)sinfty22GF$F(I)sinfty12GF$F(" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$EQ7G6\"*(,&*&,(I$t20GF$!\"\"I$t30GF$F*I)sinfty20GF $F*\"\"\"I)sinfty12GF$F-F-*&I)sinfty22GF$F-,&F+F-I)sinfty10GF$F*F-F-F- F.F*F0F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "solve(\{EQ3,EQ7 \},\{t20,t30\});\n" }{MPLTEXT 1 0 17 "t20 := -s10-s20;\n" }{MPLTEXT 1 0 12 "t30 := s10;\n" }{MPLTEXT 1 0 15 "simplify(EQ3);\n" }{MPLTEXT 1 0 15 "simplify(EQ7);\n" }{MPLTEXT 1 0 33 "EQ4:=simplify(unapply(EQ4,Q, P)):\n" }{MPLTEXT 1 0 33 "EQ8:=simplify(unapply(EQ8,Q,P)):\n" } {MPLTEXT 1 0 33 "EQ9:=simplify(unapply(EQ9,Q,P)):\n" }{MPLTEXT 1 0 34 "EQ10:=simplify(unapply(EQ10,Q,P)):" }}{PARA 11 "" 1 "" {XPPMATH 20 "< $/I$t20G6\",&I)sinfty10GF%!\"\"I)sinfty20GF%F(/I$t30GF%F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t20G6\",&I)sinfty10GF$!\"\"I)sinfty20GF$F'" }} {PARA 11 "" 1 "" {XPPMATH 20 ">I$t30G6\"I)sinfty10GF$" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "t21:=X1;\n" }{MPLTEXT 1 0 26 "simplify(EQ4(p,q+t22*p));\n" }{MPLTEXT 1 0 37 "series(simplify(EQ8(p, q+t22*p)),p=0);" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t21G6\"I#X1GF$" }} {PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "+ %I\"pG6\"*,I%sX10GF$\"\"\",(F&F'I)sinfty10GF$F'I)sinfty20GF$F'F'I)sinf ty22GF$!\"\"I)sinfty12GF$F,,&I\"qGF$F,I#X1GF$F'F,\"\"!" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 212 19 "We find sX10*sX20=0" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 9 "sX10:=0;\n" }{MPLTEXT 1 0 45 "simplify(ToCanc elShiftedfunction(p,q+t22*p));" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I%sX1 0G6\"\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "\"\"!" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 10 "t12:=t12;\n" }{MPLTEXT 1 0 10 "t32:=t32;\n" }{MPLTEXT 1 0 10 "t22:=t22;\n" }{MPLTEXT 1 0 10 "t11:=t11;\n" } {MPLTEXT 1 0 10 "t21:=t21;\n" }{MPLTEXT 1 0 10 "t31:=t31;\n" }{MPLTEXT 1 0 10 "t20:=t20;\n" }{MPLTEXT 1 0 10 "t30:=t30;\n" }{MPLTEXT 1 0 11 "sX10:=sX10;" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t12G6\"*&,&*&I$t22GF$ \"\"\"I)sinfty22GF$F)F)F)!\"\"F)F*F+" }}{PARA 11 "" 1 "" {XPPMATH 20 " >I$t32G6\"*&,&*&I$t22GF$\"\"\"I)sinfty12GF$F)F)F)!\"\"F)F*F+" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t22G6\"F#" }}{PARA 11 "" 1 "" {XPPMATH 20 " >I$t11G6\",$*&I)sinfty21GF$\"\"\"I)sinfty22GF$!\"\"F*" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t21G6\"I#X1GF$" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I $t31G6\",$*&I)sinfty11GF$\"\"\"I)sinfty12GF$!\"\"F*" }}{PARA 11 "" 1 " " {XPPMATH 20 ">I$t20G6\",&I)sinfty10GF$!\"\"I)sinfty20GF$F'" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I$t30G6\"I)sinfty10GF$" }}{PARA 11 "" 1 "" {XPPMATH 20 ">I%sX10G6\"\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}} {MARK "0 0 0" 0 }{VIEWOPTS 1 1 0 99 100 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }