{VERSION 2 3 "SUN SPARC SOL23" "2.3" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 229 191 196 0 0 0 2 0 0 0 0 0 0 }{CSTYLE "2D Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 } {CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 }{PSTYLE " Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 0 12 0 0 40 0 2 2 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Heading 1" 0 3 1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }1 0 0 0 6 6 0 0 0 0 0 0 -1 0 }{PSTYLE "Heading 2" 3 4 1 {CSTYLE "" -1 -1 "" 1 14 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 4 4 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 40 1 184 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Plot" 0 13 1 {CSTYLE "" -1 -1 " " 0 1 73 225 111 0 0 0 0 0 0 0 0 0 0 }3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 0" -1 256 1 {CSTYLE "" -1 -1 "New century schoolbook " 0 12 0 0 0 0 1 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "R3 Font 2" -1 257 1 {CSTYLE "" -1 -1 "Courier" 0 12 0 0 9 0 2 2 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 3 " -1 258 1 {CSTYLE "" -1 -1 "Helvetica" 0 12 0 0 20 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 4" -1 259 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 29 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 5" -1 260 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 6" -1 261 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 3 0 40 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "R3 Font 7" -1 262 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 2 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 8" -1 263 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 20 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 9" -1 264 1 {CSTYLE "" -1 -1 "Helvetica" 0 12 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 10" -1 265 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 8 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 11" -1 266 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 4 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "R3 Font 12" -1 267 1 {CSTYLE "" -1 -1 "Helvetica" 0 12 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 13" -1 268 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 14" -1 269 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 15" -1 270 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 16" -1 271 1 {CSTYLE "" -1 -1 "Helvetica" 0 12 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "R3 Font 17" -1 272 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 114 114 66 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE " R3 Font 18" -1 273 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 89 69 45 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 19" -1 274 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 207 63 85 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 20" -1 275 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 50 165 110 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 21" -1 276 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 10 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 22" -1 277 1 {CSTYLE "" -1 -1 "Helvetic a" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "R3 Font 23" -1 278 1 {CSTYLE "" -1 -1 "Helvetica" 0 12 0 0 46 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 F ont 24" -1 279 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 25" -1 280 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 220 0 172 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 26" -1 281 1 {CSTYLE " " -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 27" -1 282 1 {CSTYLE "" -1 -1 "Helvet ica" 0 10 40 1 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 28" -1 283 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 4 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Fo nt 29" -1 284 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 30" -1 285 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 217 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 31" -1 286 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 237 225 100 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 32" -1 287 1 {CSTYLE "" -1 -1 "H elvetica" 0 10 40 1 115 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 33" -1 288 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 11 0 20 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "R3 Font 34" -1 289 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 35" -1 290 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 180 0 88 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 36" -1 291 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 168 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 37" -1 292 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 2 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 38" -1 293 1 {CSTYLE "" -1 -1 "Helvetic a" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "R3 Font 39" -1 294 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 40 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 F ont 40" -1 295 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 1 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 41" -1 296 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 20 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 42" -1 297 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 1 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 43" -1 298 1 {CSTYLE "" -1 -1 "Helvetic a" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "R3 Font 44" -1 299 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 45" -1 300 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 46" -1 301 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 40 1 6 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 47" -1 302 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 48" -1 303 1 {CSTYLE "" -1 -1 "Helvetic a" 0 10 223 0 120 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 49" -1 304 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 79 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 \+ Font 50" -1 305 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 51" -1 306 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 52" -1 307 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 84 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 53" -1 308 1 {CSTYLE "" -1 -1 "Helvetic a" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "R3 Font 54" -1 309 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 55" -1 310 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 56" -1 311 1 {CSTYLE "" -1 -1 "Helvetica" 0 12 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 57" -1 312 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 58" -1 313 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 64 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "R3 Font 59" -1 314 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 148 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 \+ Font 60" -1 315 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 61" -1 316 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 232 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 62" -1 317 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 45 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 63" -1 318 1 {CSTYLE "" -1 -1 "Helvetic a" 0 10 0 0 255 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "R3 Font 64" -1 319 1 {CSTYLE "" -1 -1 "Helvetica" 0 12 0 0 161 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 \+ Font 65" -1 320 1 {CSTYLE "" -1 -1 "Helvetica" 0 12 0 0 1 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 66" -1 321 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 67" -1 322 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 105 99 97 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 68" -1 323 1 {CSTYLE "" -1 -1 "Helv etica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 69" -1 324 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 84 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 70" -1 325 1 {CSTYLE "" -1 -1 "Helvetica" 0 12 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 71" -1 326 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 72" -1 327 1 {CSTYLE " " -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 73" -1 328 1 {CSTYLE "" -1 -1 "Helvet ica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "R3 Font 74" -1 329 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 41 1 176 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 \+ Font 75" -1 330 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 41 1 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 76" -1 331 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 77" -1 332 1 {CSTYLE " " -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 78" -1 333 1 {CSTYLE "" -1 -1 "Helvet ica" 0 12 79 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 79" -1 334 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 244 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 \+ Font 80" -1 335 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 88 84 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 81" -1 336 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 11 0 20 0 2 1 2 0 0 0 0 0 0 } 0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 82" -1 337 1 {CSTYLE "" -1 -1 "Helvetica" 0 10 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 83" -1 338 1 {CSTYLE "" -1 -1 "Helvetica" 0 12 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 3 "" 0 "" {TEXT -1 25 "Problem Set D, Problem 1. " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 50 "We consider the second order differential equation" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "airy := diff(y(x), x$2 ) = x*y(x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%airyG/-%%diffG6$-F'6 $-%\"yG6#%\"xGF.F.*&F.\"\"\"F+F0" }}}{EXCHG {PARA 4 "" 0 "" {TEXT -1 3 "(a)" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 266 "When x is close to 0, \+ we want to compare the solution of Airy's equation with the solution o f the IVP y''(x) = 0, y'(0) = 1, y(0) = 0. The solution of this IVP is y = x. Here is a plot of the numerical solution of Airy's equation together with the function y = x." }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "with(plots): with(DEtools):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "fac1plot := plot(x, x = -2..2):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 106 "airy1plot := DEplot(airy, y(x), x = -2..2, \{[y(0) = 0, D(y)(0) = 1]\}, \nmethod = rkf45, linecolor = black):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "display(\{fac1plot, airy1plot\});" }}{PARA 13 "" 1 "" {INLPLOT "6&-%'CURVESG6$7S7$$!\"#\"\"!F(7$$!1LLL$Q6 G\">!#:F,7$$!1nm;M!\\p$=F.F07$$!1LLL))Qj^'***! #;FN7$$!1++++0\"*H\"*FPFR7$$!1++++83&H)FPFU7$$!1LLL3k(p`(FPFX7$$!1nmmm j^NmFPFen7$$!1ommm9'=(eFPFhn7$$!1,++v#\\N)\\FPF[o7$$!1pmmmCC(>%FPF^o7$ $!1*****\\FRXL$FPFao7$$!1+++D=/8DFPFdo7$$!1mmm;a*el\"FPFgo7$$!1pmm;Wn( o)!#!#=F^p7$$\"1Mmm;f`@')F\\pFbp7$$\"1)****\\nZ)H;FP Fep7$$\"1lmm;$y*eCFPFhp7$$\"1*******R^bJ$FPF[q7$$\"1'*****\\5a`TFPF^q7 $$\"1(****\\7RV'\\FPFaq7$$\"1'*****\\@fkeFPFdq7$$\"1JLLL&4Nn'FPFgq7$$ \"1*******\\,s`(FPFjq7$$\"1lmm\"zM)>$)FPF]r7$$\"1*******pfa<*FPF`r7$$ \"1HLLeg`!)**FPFcr7$$\"1++]#G2A3\"F.Ffr7$$\"1LLL$)G[k6F.Fir7$$\"1++]7y h]7F.F\\s7$$\"1nmm')fdL8F.F_s7$$\"1nmm,FT=9F.Fbs7$$\"1LL$e#pa-:F.Fes7$ $\"1+++Sv&)z:F.Fhs7$$\"1LLLGUYo;F.F[t7$$\"1nmm1^rZF.Fdt7$$\"\"#F*Fgt-%'COLOURG6&%$RGBG$\"#5!\"\"F*F* -F$6&777$$!+++++?!\"*$!19$>Ch*z\"**)FP7$$!+++++=Ffu$!1NKtx!)3R5F.7$$!+ ++++;Ffu$!19$[aGmZ5\"F.7$$!+++++9Ffu$!1a*H\"fa:+6F.7$$!+++++7Ffu$!1w$z c\\uT.\"F.7$$!+++++5Ffu$!1MpX!)*)G'=*FP7$$!+++++!)!#5$!1^PmlT!Gm(FP7$$ !+++++gFew$!15$34:aD*eFP7$$!+++++SFew$!11\">=<*pyRFP7$$FeuFew$!1on$H#p m)*>FP7$F*F*7$$\"+++++?Few$\"1Mfk*eL8+#FP7$$\"+++++SFew$\"1WKb%)eO@SFP 7$$\"+++++gFew$\"1v^\"f\"ob3hFP7$$\"+++++!)Few$\"1:I@w\"=bM)FP7$$\"+++ ++5Ffu$\"1oH1e'R`3\"F.7$$\"+++++7Ffu$\"1)R&3Bv/!Q\"F.7$$\"+++++9Ffu$\" 18rgexpTXW!GF.7 $$FixFfu$\"1aaxlP26OF.-%&STYLEG6#%%LINEG-%*THICKNESSG6#\"\"$-Fjt6&F\\u F*F*F*-%+AXESLABELSG6$%\"xG%!G-%%VIEWG6$;$!+++++AFfu$\"+++++AFfu;$!+)G e0M\"Ffu$\"+pd'o%QFfu" 2 241 241 241 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 83 "The facsimile solutio n agrees well with the actual solution in a neighborhood of 0." }}} {EXCHG {PARA 4 "" 0 "" {TEXT -1 3 "(b)" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 15 "For x close to " }{XPPEDIT 18 0 "-16 = -(4^2)" "/,$\"#;! \"\",$*$\"\"%\"\"#F%" }{TEXT -1 78 ", we want to compare the solution \+ of Airy's equation to the facsimile solution" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "fac2 := (c1, c2) -> c1*sin(4*x + c2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%fac2G:6$%#c1G%#c2G6\"6$%)operatorG%&arrowGF)*&9 $\"\"\"-%$sinG6#,&%\"xG\"\"%9%F/F/F)F)" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 57 "First we'll plot a numerical solution of Airy's equation. " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 121 "airy2plot := DEplot(airy, y(x) , -18..-14, \{[y(0) = 0, D(y)(0) = 1]\}, \nmethod = rkf45, stepsize = \+ 0.1, linecolor = black):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "airy2plot;" }}{PARA 13 "" 1 "" {INLPLOT "6&-%'CURVESG6%7K7$$!$!=!\"\" $!1;\"Q&pYF6[!#;7$$!$z\"F*$!10![!))zWTGF-7$$!$y\"F*$!1W,VxFp,P!#<7$$!$ x\"F*$\"1N**RI.Xm@F-7$$!$w\"F*$\"1f)yJ*piDVF-7$$!$v\"F*$\"1$4VRt%*[t&F -7$$!$u\"F*$\"1]Cz.4EbhF-7$$!$t\"F*$\"1edx(QL+_&F-7$$!$s\"F*$\"10l^#zT L%RF-7$$!$r\"F*$\"1!ym6?Rxp\"F-7$$!$q\"F*$!1&4M#o6mW$)F87$$!$p\"F*$!1R _\")GcAFKF-7$$!$o\"F*$!1\"\\a9%*zD3&F-7$$!$n\"F*$!1.n[F+>'4'F-7$$!$m\" F*$!1&>aB%>\"f5'F-7$$!$l\"F*$!1Z+z=O\"f6&F-7$$!$k\"F*$!1GP9Cb4$H$F-7$$ !$j\"F*$!1c7ABK)>P*F87$$!$i\"F*$\"1J]bJ\"3)p:F-7$$!$h\"F*$\"1l3-I;KEQF -7$$!$g\"F*$\"1$o#\\MsMvaF-7$$!$f\"F*$\"1w9;H39giF-7$$!$e\"F*$\"1>#3jD SF1'F-7$$!$d\"F*$\"1V(>#>+')>\\F-7$$!$c\"F*$\"1CtJ8!eV,$F-7$$!$b\"F*$ \"1$[p^$[PVkF87$$!$a\"F*$!1&[BwYzY#=F-7$$!$`\"F*$!1:dU:fn;SF-7$$!$_\"F *$!1WmF:YB-cF-7$$!$^\"F*$!14(oSV\"=ZjF-7$$!$]\"F*$!1,LLV\"\\d9'F-7$$!$ \\\"F*$!1u+%zj4Q.&F-7$$!$[\"F*$!1_g='o\\3=$F-7$$!$Z\"F*$!1qo'H,/bi)F87 $$!$Y\"F*$\"1Y5&[%*)R\"e\"F-7$$!$X\"F*$\"1\"=)HY;l(z$F-7$$!$W\"F*$\"1' )4oiP>qaF-7$$!$V\"F*$\"1s6#e7^YO'F-7$$!$U\"F*$\"1yIlcC$)fjF-7$$!$T\"F* $\"1N\"QHvxCY&F-7$$!#9\"\"!$\"1L][(31P!QF--%&STYLEG6#%%LINEG-%*THICKNE SSG6#\"\"$-%'COLOURG6&%$RGBGF_xF_xF_x-%%VIEWG6$;$!++++?=!\")$!++++!Q\" Fdy;$!+iIx#)p!#5$\"+aFC+qFjy-%+AXESLABELSG6$%\"xG%%y(x)G" 2 241 241 241 2 0 1 0 2 6 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 131 "This certainly looks like a sine wave. Let's see how wel l it matches up with an appropriate sine wave. We have to choose const ants " }{XPPEDIT 18 0 "c[1]" "&%\"cG6#\"\"\"" }{TEXT -1 5 " and " } {XPPEDIT 18 0 "c[2]" "&%\"cG6#\"\"#" }{TEXT -1 64 " in the facsimile s olution to make it match up. Note first that " }{XPPEDIT 18 0 "c[1]" " &%\"cG6#\"\"\"" }{TEXT -1 138 " is the amplitude of the facsimile solu tion, and we can see from the graph that the amplitude of the solution of Airy's equation is about " }{XPPEDIT 18 0 ".61" "$\"#h!\"#" } {TEXT -1 32 " on this interval. The constant " }{XPPEDIT 18 0 "c[2]" " &%\"cG6#\"\"#" }{TEXT -1 148 " determines the phase shift, and can be \+ read off from the zeros of the solution. In particular, the solution o f Airy's equation has a zero at about " }{XPPEDIT 18 0 "-16.3" ",$$\"$ j\"!\"\"!\"\"" }{TEXT -1 22 ", so we should choose " }{XPPEDIT 18 0 "c [2]" "&%\"cG6#\"\"#" }{TEXT -1 12 " to satisfy " }{XPPEDIT 18 0 "4*(-1 6.3) + c[2] = 0" "/,&*&\"\"%\"\"\",$$\"$j\"!\"\"!\"\"F&F&&%\"cG6#\"\"# F&\"\"!" }{TEXT -1 1 "." }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 66 "fac2plot := plot(fac2(0.61, 4*16.3), x = -18..-14, style = POINT):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "display(\{fac2plot, airy2plot\});" }}{PARA 13 "" 1 "" {INLPLOT "6&-%'CURVESG6&7K7$$!$!=!\"\"$!1;\"Q&pYF6[ !#;7$$!$z\"F*$!10![!))zWTGF-7$$!$y\"F*$!1W,VxFp,P!#<7$$!$x\"F*$\"1N**R I.Xm@F-7$$!$w\"F*$\"1f)yJ*piDVF-7$$!$v\"F*$\"1$4VRt%*[t&F-7$$!$u\"F*$ \"1]Cz.4EbhF-7$$!$t\"F*$\"1edx(QL+_&F-7$$!$s\"F*$\"10l^#zTL%RF-7$$!$r \"F*$\"1!ym6?Rxp\"F-7$$!$q\"F*$!1&4M#o6mW$)F87$$!$p\"F*$!1R_\")GcAFKF- 7$$!$o\"F*$!1\"\\a9%*zD3&F-7$$!$n\"F*$!1.n[F+>'4'F-7$$!$m\"F*$!1&>aB%> \"f5'F-7$$!$l\"F*$!1Z+z=O\"f6&F-7$$!$k\"F*$!1GP9Cb4$H$F-7$$!$j\"F*$!1c 7ABK)>P*F87$$!$i\"F*$\"1J]bJ\"3)p:F-7$$!$h\"F*$\"1l3-I;KEQF-7$$!$g\"F* $\"1$o#\\MsMvaF-7$$!$f\"F*$\"1w9;H39giF-7$$!$e\"F*$\"1>#3jDSF1'F-7$$!$ d\"F*$\"1V(>#>+')>\\F-7$$!$c\"F*$\"1CtJ8!eV,$F-7$$!$b\"F*$\"1$[p^$[PVk F87$$!$a\"F*$!1&[BwYzY#=F-7$$!$`\"F*$!1:dU:fn;SF-7$$!$_\"F*$!1WmF:YB-c F-7$$!$^\"F*$!14(oSV\"=ZjF-7$$!$]\"F*$!1,LLV\"\\d9'F-7$$!$\\\"F*$!1u+% zj4Q.&F-7$$!$[\"F*$!1_g='o\\3=$F-7$$!$Z\"F*$!1qo'H,/bi)F87$$!$Y\"F*$\" 1Y5&[%*)R\"e\"F-7$$!$X\"F*$\"1\"=)HY;l(z$F-7$$!$W\"F*$\"1')4oiP>qaF-7$ $!$V\"F*$\"1s6#e7^YO'F-7$$!$U\"F*$\"1yIlcC$)fjF-7$$!$T\"F*$\"1N\"QHvxC Y&F-7$$!#9\"\"!$\"1L][(31P!QF--%&STYLEG6#%%LINEG-%*THICKNESSG6#\"\"$-% 'COLOURG6&%$RGBGF_xF_xF_x-F$6%7[s7$$!#=F_x$!1'\\X>W\"49IF-7$$!1nm;p0k& z\"F^x$!1$3=cb#G[?F-7$$!1LLLQ6G\"z\"F^x$!1ZYbW$[.-\"F-7$$!1+](3-)[(y\" F^x$!1>$e%)zGU'**Fcy7$$!1nmT.\\p$y\"F^x$\"1dXZ`<`L#)F87$$!1+]7Y\"H%zx$=F-7$$!1LL$))Qj^x\"F^x$\"1!RNK75()z#F-7$$!1LLLb$p3x\"F^ x$\"1X)=L^;Ro$F-7$$!1LL$=Kvlw\"F^x$\"1E%))p322Y%F-7$$!1+]7(p,Bw\"F^x$ \"1C^'fI&\\.^F-7$$!1nmTs!G!e.a.\"F-7$$!1+++()>'**p\"F^x$!1 HGnCY;_?F-7$$!1+++Y0j&p\"F^x$!1\\yS4rt6IF-7$$!1+++0\"*H\"p\"F^x$!1`m3m &G6)QF-7$$!1+++f\\7(o\"F^x$!13uD'ee#4YF-7$$!1+++83&Ho\"F^x$!13!R6\"=>4 _F-7$$!1n;a)Gg\"z;F^x$!181\"\\'Q$)GcF-7$$!1LL3k(p`n\"F^x$!1G+75GK>fF-7 $$!1n\"zR6;Jn\"F^x$!1O(f4)4&z-'F-7$$!1+](QYi3n\"F^x$!1Ii]kti(3'F-7$$!1 [n;F^x$!1m@nmpS%3'F-7$$!1nmmj^Nm;F^x$!183!Hv(eegF-7$$!1nm;*)o`i;F^x$!1 BDywi5!)eF-7$$!1nmm9'=(e;F^x$!1&oEKWFZc&F-7$$!1M$3P0xUl\"F^x$!1O,(e]Jb .&F-7$$!1++v#\\N)\\;F^x$!1#\\o@(>\"yM%F-7$$!1L$3(eR!fk\"F^x$!1e4([)*oS i$F-7$$!1nmmCC(>k\"F^x$!1OkQ=K)3\"GF-7$$!1L$3(3*ewj\"F^x$!1fEi[&y'R=F- 7$$!1++v#RXLj\"F^x$!1.z%R%)=%Q\")F87$$!1++]0zBH;F^x$\"1#)*>$)fA#f=F87$ $!1++D=/8D;F^x$\"1Zk]Q)y1=\"F-7$$!1L$3ioW3i\"F^x$\"1T2?,%)H%=#F-7$$!1n m;a*elh\"F^x$\"1#[!=eG)Q7$F-7$$!1n;H9Li7;F^x$\"19Pg#3nm!RF-7$$!1nmTuwo 3;F^x$\"1?i8vG$Gf%F-7$$!1+]7bDW/;F^x$\"1!f:-*4=0_F-7$$!1ML$eV(>+;F^x$ \"1k91h\\!ym&F-7$$!1Le*Gp#*zf\"F^x$\"1fJE#p2W%eF-7$$!1L$e*\\zy&f\"F^x$ \"1_-yDaevfF-7$$!1$e*[ybo%f\"F^x$\"1fAXxs!Q-'F-7$$!1L3-2Ke$f\"F^x$\"1` u^(f=.1'F-7$$!1$3_b$3[#f\"F^x$\"1kFX1%[]3'F-7$$!1LL3k%y8f\"F^x$\"1=A[G '[z4'F-7$$!1n\"zk%)=/f\"F^x$\"1+Rgis_*4'F-7$$!1+]()G#f%*e\"F^x$\"11\") *\\/?@4'F-7$$!1L3F6'*\\)e\"F^x$\"1:?,))ytvgF-7$$!1nmm$**Rve\"F^x$\"1W \\\"f#\\S]gF-7$$!1L$e%e2i&e\"F^x$\"1%G@.+\\I(fF-7$$!1++DB:q$e\"F^x$\"1 $=cZ%z]geF-7$$!1n;/qebz:F^x$\"1-KGTXu+bF-7$$!1LL$o@5ad\"F^x$\"1pyy)Gm+ *\\F-7$$!1nmT^t7r:F^x$\"1-4@Qd!*=VF-7$$!1+++'[Woc\"F^x$\"1\\y&3j+8_$F- 7$$!1++vPXli:F^x$\"11l/$Gd5k#F-7$$!1++]*ek%e:F^x$\"1.:e)e-oo\"F-7$$!1+ ]7*f5Wb\"F^x$\"1H(o/:9B=(F87$$!1++v3mN]:F^x$!13ewd$[=p#F87$$!1+]iV`&ea \"F^x$!1sj?CL:c8F-7$$!1++]ySNT:F^x$!1Z=#oPw#*R#F-7$$!1LLe\"\\4t`\"F^x$ !1bLYl$H8F$F-7$$!1nmm/\\EL:F^x$!15'3O_Xz0%F-7$$!1ML$[WY*G:F^x$!1p4(QBx .y%F-7$$!1+++&)ziC:F^x$!1%e9TtB0O&F-7$$!1n;a=[r?:F^x$!1w!Q)*f.)[dF-7$$ !1LL3_;!o^\"F^x$!17!4tp@l*fF-7$$!1;z%47Kd^\"F^x$!1*Q'=SV))QgF-7$$!1+D \")*eiY^\"F^x$!1l,Y\"4'>qgF-7$$!1$3x'eIf8:F^x$!1l&3?l*R!4'F-7$$!1m;aFN _7:F^x$!1\"=3-0e%*4'F-7$$!1]iS'*RX6:F^x$!1A/f4ZN(4'F-7$$!1L3FlWQ5:F^x$ !1;d+:F^x$!1Sy1[1;6aF-7$$!1 LLebp)f\\\"F^x$!1>YKSd*H'[F-7$$!1++vr#z<\\\"F^x$!10]\"y&)*RxTF-7$$!1M$ 3<\\lw[\"F^x$!1Cq&F87$$!1LLL,Ckm9F^x$\"1,/OuZx::F-7$$!1LLel0Si9F^x$\"1LoF& o\\<\\#F-7$$!1LL$)H(e\"e9F^x$\"1Vr)pOhhR$F-7$$!1+]i=?&RX\"F^x$\"12lP*f >o>%F-7$$!1nmT2`u\\9F^x$\"1=_$G1G*y[F-7$$!1L$3nxzeW\"F^x$\"1)*>V;Og%Q& F-7$$!1+++YU,U9F^x$\"1*zzX#=!=w&F-7$$!1n;zy!*zR9F^x$\"166eUrV;fF-7$$!1 LLe6ReP9F^x$\"1\\nXO?lCgF-7$$!1n\"zzKwkV\"F^x$\"1.v^l?2hgF-7$$!1+]PW(o `V\"F^x$\"1YH3^uf&3'F-7$$!1M3xg6EM9F^x$\"1%RNH1!=)4'F-7$$!1nm;xN:L9F^x $\"1Uf83_z)4'F-7$$!1+v=TH;K9F^x$\"1OC0i^?*3'F-7$$!1M$3_Is6V\"F^x$\"1^z iY_0qgF-7$$!1n\"H#p;=I9F^x$\"1M\\lEbPTgF-7$$!1++DL5>H9F^x$\"1SHVG5@.gF -7$$!1n;Hh(4sU\"F^x$\"1C!eC;#o)*eF-7$$!1LLL*[G_U\"F^x$\"1Y()y>[7ddF-7$ $!1m;/\"f.5U\"F^x$\"1&z8Ku!)fL&F-7$$!1++v#pynT\"F^x$\"1:f&\\S0Gw%F-7$$ !1+++E\\t79F^x$\"1bj&z*p%o3%F-7$$!1++Df6p39F^x$\"1!f9\\>'>/LF-7$$!1+]i zbM/9F^x$\"1Eo4V,fnBF-7$F]x$\"1*[6gZG'f8F--F[y6&F]y$\"#5F*F_xF_x-Fcx6# %&POINTG-%+AXESLABELSG6$%\"xG%%y(x)G-%%VIEWG6$;$!++++?=!\")$!++++!Q\"F \\bn;$!+iIx#)p!#5$\"+aFC+qFbbn" 2 241 241 241 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 -18324 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 65 "The pl ots match up well. Why did we have to choose the values of " } {XPPEDIT 18 0 "c[1]" "&%\"cG6#\"\"\"" }{TEXT -1 5 " and " }{XPPEDIT 18 0 "c[2]" "&%\"cG6#\"\"#" }{TEXT -1 104 " by hand? Our analysis sugg ests that the facsimile solution should approximate the actual solutio n near " }{XPPEDIT 18 0 "x = -K^2" "/%\"xG,$*$%\"KG\"\"#!\"\"" }{TEXT -1 77 ". But the initial condition that we used for Airy's equation is at the point " }{XPPEDIT 18 0 "x = 0" "/%\"xG\"\"!" }{TEXT -1 308 ", \+ where the facsimile solution is not a good approximation. Thus, the un determined constants in the facsimile solution are unrelated to the in itial conditions in Airy's equation, and we needed to choose them by h and to get a good match. Nevertheless, the frequency of the facsimile \+ solution is determined by " }{XPPEDIT 18 0 "K" "I\"KG6\"" }{TEXT -1 159 ", and is independent of the undetermined constants. Thus, we can \+ at least conclude that the frequency of the solutions of Airy's equati on in a neighborhood of " }{XPPEDIT 18 0 "x = -K^2" "/%\"xG,$*$%\"KG\" \"#!\"\"" }{TEXT -1 32 " will be almost proportional to " }{XPPEDIT 18 0 "K" "I\"KG6\"" }{TEXT -1 1 "." }}}{EXCHG {PARA 4 "" 0 "" {TEXT -1 3 "(c)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "fac3 := (c1, c 2) -> c1*sinh(4*x + c2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%fac3G:6 $%#c1G%#c2G6\"6$%)operatorG%&arrowGF)*&9$\"\"\"-%%sinhG6#,&%\"xG\"\"%9 %F/F/F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 103 "airy3plot := \+ DEplot(airy, y(x), 14..18, \{[y(0) = 0, D(y)(0) = 1]\}, \nmethod = rkf 45, linecolor = black):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 " airy3plot;" }}{PARA 13 "" 1 "" {INLPLOT "6&-%'CURVESG6%777$$\"#9\"\"!$ \"1@N,x^p#y%!\"\"7$$\"++++?9!\")$\"1<*GM3w)45F*7$$\"++++S9F1$\"1Sy%etJ Q9#F*7$$\"++++g9F1$\"1546**[MvXF*7$$\"++++![\"F1$\"1!RUp*eP;)*F*7$$\"+ ++++:F1$\"1MYp'*[<<@\"\"\"7$$\"++++?:F1$\"112Jc&G,f%FH7$$\"++++S:F1$\" 1?LQUGK+5\"\"#7$$\"++++g:F1$\"1cRRz(G7>#FS7$$\"++++!e\"F1$\"1]1/PZ]C[F S7$$\"+++++;F1$\"1A!=C1Iw1\"\"\"$7$$\"++++?;F1$\"1,LLS/`uBF]o7$$\"++++ S;F1$\"1)RJ=pSxI&F]o7$$\"++++g;F1$\"1m30W![B>\"\"\"%7$$\"++++!o\"F1$\" 1)\\,t35=p#F]p7$$\"+++++\"#6$\"+b9]WT\"#7-%+AXESLABELSG6$%\"xG%%y(x)G " 2 241 241 241 2 0 1 0 2 6 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 -21657 7 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 99 "We'd like to compare this with the graph \+ of the hyperbolic sine function. Again, we have to choose " }{XPPEDIT 18 0 "c[1]" "&%\"cG6#\"\"\"" }{TEXT -1 5 " and " }{XPPEDIT 18 0 "c[2] " "&%\"cG6#\"\"#" }{TEXT -1 48 " by hand. We'll start with an arbitrar y choice: " }{XPPEDIT 18 0 "c[1] = 1" "/&%\"cG6#\"\"\"\"\"\"" }{TEXT -1 2 ", " }{XPPEDIT 18 0 "c[2] = 0" "/&%\"cG6#\"\"#\"\"!" }{TEXT -1 1 "." }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "plot(fac3(1, 0), x = 14..18); " }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURVESG6$7fn7$$\"#9\"\"!$\"1)\\1![ (He/\"\"\"*7$$\"1nmmh)=(39!#9$\"1%[GwqbA[\"F-7$$\"1LLe'40jT\"F1$\"102z :&\\x+#F-7$$\"1nm;6m$[U\"F1$\"1@&f'=4MCGF-7$$\"1nm;yYUL9F1$\"1c)Q;z`?) RF-7$$\"1LLeF>(>W\"F1$\"1$)f1)\\g^g&F-7$$\"1nm\">K'*)\\9F1$\"1s$fhL8dp (F-7$$\"1++Dt:5e9F1$\"1XUXk[`o5\"#57$$\"1nm\"fX(em9F1$\"1+**)[)zQ+:FR7 $$\"1++DCh/v9F1$\"1KV\"GL%[/@FR7$$\"1LLL/pu$[\"F1$\"1sPF#eJ0)HFR7$$\"1 nm;c0T\"\\\"F1$\"1,`B$**>(\\SFR7$$\"1+++8!Q+]\"F1$\"1(pb&yds=dFR7$$\"1 +++&*3q3:F1$\"1q:\"\\)z-(3)FR7$$\"1+++(=\\q^\"F1$\"1%4Y7>6$H6\"#67$$\" 1nm\"fBIY_\"F1$\"1w4&4vg$H:F`p7$$\"1LLLO[kL:F1$\"15ulL$eL>#F`p7$$\"1LL L&Q\"GT:F1$\"12&QamRp(HF`p7$$\"1++D2X;]:F1$\"1:1t(HLqC%F`p7$$\"1LLLvv- e:F1$\"1qkp`+w;eF`p7$$\"1++D2Ylm:F1$\"1$RD,8uQ@)F`p7$$\"1++v\"ep[d\"F1 $\"1y<$[8C49\"\"#77$$\"1LL$e/TMe\"F1$\"1!fa6FFvg\"Fdr7$$\"1LLeDBJ\"f\" F1$\"1d3k\"Fht7$$\"1++D\"RV'\\;F1$\"1h]Z.t'4F#Fht7$$\"1++]@fke;F1$\"1\"ou _pt`D$Fht7$$\"1LLL&4Nnm\"F1$\"1;vyP\\3*\\%Fht7$$\"1+++:?Pv;F1$\"1Nk(o; #pbjFht7$$\"1nm\"zM)>$o\"F1$\"1([&R*H4?p)Fht7$$\"1+++(fa \\[O#F)7$$\"1LLL)G[kr\"F1$\"1oK$efykG$F)7$$\"1++D\"yh]s\"F1$\"1(Rso?R$ QYF)7$$\"1nmm)fdLt\"F1$\"1\"Q5o+^`5t\" F_y7$$\"1nmT)3;Cw\"F1$\"1KG/I-om?F_y7$$\"1LL$GUYow\"F1$\"1**)Gt?!QnCF_ y7$$\"1++vm*33x\"F1$\"1*GPXei6*GF_y7$$\"1nmm5:xuV_y\"F1$\"18;&)F_y7$$\"#=F*$\"1R1UE(eLH*F_y-%'COLOURG6&%$RGBG$ FR!\"\"F*F*-%+AXESLABELSG6$%\"xG%!G-%%VIEWG6$;F(Fg]l%(DEFAULTG" 2 250 250 250 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "" 0 " " {TEXT -1 96 "The graphs are remarkably similar. Note, however, that \+ the values in the second graph are about " }{XPPEDIT 18 0 "10^9" "*$\" #5\"\"*" }{TEXT -1 67 " greater than in the first, which means that we should have chosen " }{XPPEDIT 18 0 "c[1]" "&%\"cG6#\"\"\"" }{TEXT -1 13 " to be about " }{XPPEDIT 18 0 "10^(-9)" ")\"#5,$\"\"*!\"\"" } {TEXT -1 1 "." }}}{EXCHG {PARA 4 "" 0 "" {TEXT -1 3 "(d)" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 92 "Finally, we want to produce a graph of th e numerical solution on the interval from -20 to 2." }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 105 "DEplot(airy, y(x), -20..2, \{[y(0) = 0, D(y)(0) = 1]\}, method = rkf45, stepsize = 0.1, linecolor = black);" }}{PARA 13 "" 1 "" {INLPLOT "6&-%'CURVESG6%7ix7$$!$+#!\"\"$\"1)*=Fy$Rc<\"!#;7$ $!$*>F*$!1!*odr![:Y\"F-7$$!$)>F*$!1cZZ=,58QF-7$$!$(>F*$!1.%)Gb#oBU&F-7 $$!$'>F*$!13l5xW.\")fF-7$$!$&>F*$!10>ONuV'Q&F-7$$!$%>F*$!1ULfM]DePF-7$ $!$$>F*$!1^9@\\nM79F-7$$!$#>F*$\"1:2ZBt?-7F-7$$!$\">F*$\"1zQr#[H+f$F-7 $$!$!>F*$\"1`VQzoM.`F-7$$!$*=F*$\"1AWtet3DgF-7$$!$)=F*$\"1NxVBg$fi&F-7 $$!$(=F*$\"1'=bV7?a=%F-7$$!$'=F*$\"1xX*\\IVS(>F-7$$!$&=F*$!1yn,bM`#*f! #<7$$!$%=F*$!1pr16=\"Q1$F-7$$!$$=F*$!1n&px6*et\\F-7$$!$#=F*$!1.aXJ=C() fF-7$$!$\"=F*$!1q!\\NxBx#fF-7$$!$!=F*$!11DhoUF6[F-7$$!$z\"F*$!1x*y$QxW TGF-7$$!$y\"F*$!1g'zQB#p,PFcp7$$!$x\"F*$\"1?X()z,Xm@F-7$$!$w\"F*$\"1TJ *RmEcK%F-7$$!$v\"F*$\"1?P;$G%*[t&F-7$$!$u\"F*$\"1r![\"4/EbhF-7$$!$t\"F *$\"1$[$4MH.?bF-7$$!$s\"F*$\"1#orrXTL%RF-7$$!$r\"F*$\"1Z:/T!Rxp\"F-7$$ !$q\"F*$!1%>8f6 &F-7$$!$k\"F*$!1arnQ_4$H$F-7$$!$j\"F*$!1_H'>A#)>P*Fcp7$$!$i\"F*$\"1Cu? I!3)p:F-7$$!$h\"F*$\"1#=lLM@j#QF-7$$!$g\"F*$\"1mq.3oMvaF-7$$!$f\"F*$\" 1Yg@I.9giF-7$$!$e\"F*$\"1\"4aJwRF1'F-7$$!$d\"F*$\"1(>i(3'f)>\\F-7$$!$c \"F*$\"1R(y\"\\xN9IF-7$$!$b\"F*$\"1b=)R1uLW'Fcp7$$!$a\"F*$!1+-*eMzY#=F -7$$!$`\"F*$!13gJ8cn;SF-7$$!$_\"F*$!1:/SyTB-cF-7$$!$^\"F*$!1wq(z#4=ZjF -7$$!$]\"F*$!1qaF-7$$!$V\"F*$\"1jhG?1lkjF-7$$!$U \"F*$\"1UdpT>$)fjF-7$$!$T\"F*$\"1m_#3IxCY&F-7$$!$S\"F*$\"1$Re7w0P!QF-7 $$!$R\"F*$\"1#[bCyv#=;F-7$$!$Q\"F*$!16a7KU())*yFcp7$$!$P\"F*$!1Bt\\F-7$$!$N\"F*$!12F`u`I(='F-7$$!$M\"F*$!1N[[L? evlF-7$$!$L\"F*$!1#f)zR!=D4'F-7$$!$K\"F*$!1x'ywdTz![F-7$$!$J\"F*$!1MmE Q%)R&*GF-7$$!$I\"F*$!12Ql9aFtgFcp7$$!$H\"F*$\"1DT\"F*$!1%o)=@)H&*3%F-7$$!$=\"F*$!1?)*\\*oV\\o&F-7$$!$<\"F*$!15Sn *)oJ;mF-7$$!$;\"F*$!1i9/q6>\"y'F-7$$!$:\"F*$!1YU]eS)p;'F-7$$!$9\"F*$!1 gWsV?=][F-7$$!$8\"F*$!1aPZh[U&)HF-7$$!$7\"F*$!1v()R(y\"QhyFcp7$$!$6\"F *$\"19;$4%Rv+:F-7$$!$5\"F*$\"13kJAx'Hi$F-7$$!$4\"F*$\"14(*>\")zh]`F-7$ $!$3\"F*$\"1OSU)pq0]'F-7$$!$2\"F*$\"1T%*))*=#*[&pF-7$$!$1\"F*$\"1L\\F( Qm;n'F-7$$!$0\"F*$\"1!*f#yKito&F-7$$!$/\"F*$\"1L?5Ls(36%F-7$$!$.\"F*$ \"1#\\1i6`-6#F-7$$!$-\"F*$!1n-icr@i5Fcp7$$!$,\"F*$!1ezi%yCBJ#F-7$$!$+ \"F*$!1W-A^G>(G%F-7$$!#**F*$!1%G3(\\!)>PeF-7$$!#)*F*$!1bx$[O%G9oF-7$$! #(*F*$!1PI?')\\6HrF-7$$!#'*F*$!1ZzH!R))zv'F-7$$!#&*F*$!11Zk4@:VdF-7$$! #%*F*$!1*>$*QK1o=%F-7$$!#$*F*$!1K1#>7!oRAF-7$$!##*F*$!1,xVQ!)*Gb)!#=7$ $!#\"*F*$\"1Bt$Hh#zw?F-7$$!#!*F*$\"10%F-7$$!#*)F*$\"19HWktOlcF- 7$$!#))F*$\"12]o2BdynF-7$$!#()F*$\"1$HL(39w*H(F-7$$!#')F*$\"1FZ;nm\\!> (F-7$$!#&)F*$\"1'yC&p$)>nkF-7$$!#%)F*$\"1V/S\")Q!z>&F-7$$!#$)F*$\"1zZn 1Ty%\\$F-7$$!##)F*$\"1DI&fN)G.:F-7$$!#\")F*$!1u1[#[5)4hFcp7$$!#!)F*$!1 oe>IVWwEF-7$$!#zF*$!1#pO?&RaHXF-7$$!#yF*$!17\\)H!)Ru-'F-7$$!#xF*$!1;RH u]XeqF-7$$!#wF*$!1;'ee@v&\\vF-7$$!#vF*$!1D1d/nequF-7$$!#uF*$!1.Ra!HPZ$ oF-7$$!#tF*$!1P%Qm#)zgp&F-7$$!#sF*$!1!ySx\\1R9%F-7$$!#rF*$!1#>R6\"H([H #F-7$$!#qF*$!1nK4X%=a$GFcp7$$!#pF*$\"1$HPz6gyu\"F-7$$!#oF*$\"1(RUxRhF-7$$!#gF*$\"1gMxKBQAZF-7$$!#fF*$\"1:kb(y-G-$F- 7$$!#eF*$\"1k#)3$)F-7$$!#\\F *$!1!47r:b&zyF-7$$!#[F*$!1N\\Ib?+bqF-7$$!#ZF*$!1G78a]*H*eF-7$$!#YF*$!1 .mrNH)[X%F-7$$!#XF*$!1:9/jHP7GF-7$$!#WF*$!1-,m+\\\\V5F-7$$!#VF*$\"1AWn 'y$G9xFcp7$$!#UF*$\"1yXKP&*f`DF-7$$!#TF*$\"1(=U)zK=HUF-7$$!#SF*$\"1`-p rwAKdF-7$$!#RF*$\"1%>%RX#yp+(F-7$$!#QF*$\"1[-h-Q`4!)F-7$$!#PF*$\"1+cD= <$)3()F-7$$!#OF*$\"1:;7M])p3*F-7$$!#NF*$\"1!\\X5*G-R\"*F-7$$!#MF*$\"1' )=U+(3@())F-7$$!#LF*$\"1ojThmK/$)F-7$$!#KF*$\"1:Bg;o8juF-7$$!#JF*$\"15 UsWAg$Q'F-7$$!#IF*$\"1emm(z*[1^F-7$$!#HF*$\"1#y-17Rjn$F-7$$!#GF*$\"1Tk 6IUeR@F-7$$!#FF*$\"1BVgl)*)zU&Fcp7$$!#EF*$!1hF*$!1K!* exN3%y*F-7$$Fe]mF*$!1&\\VE2)3R5!#:7$$FcpF*$!1A\"z9z+63\"Fgdn7$$F-F*$!1 ZT/!GmZ5\"Fgdn7$$FgdnF*$!1GEe@:y56Fgdn7$$!#9F*$!1nz&RXb,5\"Fgdn7$$!#8F *$!1PgP'4UT2\"Fgdn7$$!#7F*$!1!Q]9\\uT.\"Fgdn7$$!#6F*$!1v5`$z9!=)*F-7$$ !#5F*$!1F-7$$F*F*$!1H&)=)om\"****Fcp7$\"\"!Fjin7$$\"\"\"F*$\"1Pb[NL3+5F-7$$\" \"#F*$\"1Ex+\"fL8+#F-7$$\"\"$F*$\"15K[^Vv1IF-7$$\"\"%F*$\"1%Gth)eO@SF- 7$$\"\"&F*$\"1@l+&fQA0&F-7$$\"\"'F*$\"1y(>y\"ob3hF-7$$\"\"(F*$\"15CHkO s,sF-7$$\"\")F*$\"1!R[%y\"=bM)F-7$$\"\"*F*$\"1\"=MFgdn7$$\"#;F*$\"1fAiiI)=?#Fgdn7$$\"#XW!GFgdn7$$\"#>F*$\"1I*))z$>\\xJFgdn7$$\"#?F*$\"1*4iLwt5h$Fgdn -%&STYLEG6#%%LINEG-%*THICKNESSG6#Fgjn-%'COLOURG6&%$RGBGFjinFjinFjin-%% VIEWG6$;$!++++5@Fdgn$\"+++++JF_gn;$!+'GuoM\"F_gn$\"+Fl;ZQF_gn-%+AXESLA BELSG6$%\"xG%%y(x)G" 2 250 250 250 2 0 1 0 2 6 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 18604 0 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 81 "This graph indica tes that the frequency increases and the amplitude decreases as " } {XPPEDIT 18 0 "x" "I\"xG6\"" }{TEXT -1 9 " goes to " }{XPPEDIT 18 0 "- infinity" ",$%)infinityG!\"\"" }{TEXT -1 113 ". The increasing frequen cy is predicted by our facsimile analysis; the decreasing amplitude is harder to explain." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "26 0 0" 0 } {VIEWOPTS 1 1 0 1 1 1803 }