{VERSION 5 0 "IBM INTEL NT" "5.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 1 }{CSTYLE "2D Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 1 } {CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 } {CSTYLE "" -1 256 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 257 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 258 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 259 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 260 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 261 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 262 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 263 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 264 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 265 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 266 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 267 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 268 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 269 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 270 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 271 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 272 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 273 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 274 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 275 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 276 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 277 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 278 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 279 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 280 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 281 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 282 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 283 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 284 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 285 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 286 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 287 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 288 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 289 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 290 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 291 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 292 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 293 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 294 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 295 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 296 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 297 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 298 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 300 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 302 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 303 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 304 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 305 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 306 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 307 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 308 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 309 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 310 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 311 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 312 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 313 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 314 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 315 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 316 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 317 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 318 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 319 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 320 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 321 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 322 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 323 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 324 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 325 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 326 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 327 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 328 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 329 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 330 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 331 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 332 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 333 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 334 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 335 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 336 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 337 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 338 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 339 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 340 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 341 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 342 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 343 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 344 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 345 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 346 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 347 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 348 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 349 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 350 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 351 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 352 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 353 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 354 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 355 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 356 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 357 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 358 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 359 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 360 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 361 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 362 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 363 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 364 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 365 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 366 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 367 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 368 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 369 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 370 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 371 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 372 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 373 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 374 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 375 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 376 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 377 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 378 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 379 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 380 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 381 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 382 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 383 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 384 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 385 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 386 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 387 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 388 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 389 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 390 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 391 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 392 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 393 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 394 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 395 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 396 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 397 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 398 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 399 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 400 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 401 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 402 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 403 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 404 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 405 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 406 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 407 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 408 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 409 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 410 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 411 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 412 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 413 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 414 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 415 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 416 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 417 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 418 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 419 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 420 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Tim es" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 } {PSTYLE "Heading 1" -1 3 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 8 4 1 0 1 0 2 2 0 1 }{PSTYLE "Warning" -1 7 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 1 3 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple P lot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Normal" -1 256 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 3 0 0 0 0 3 4 3 4 2 2 0 1 }{PSTYLE "Normal" -1 257 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 3 4 3 4 2 2 0 1 }} {SECT 0 {PARA 256 "" 0 "" {TEXT -1 16 "Leobardo Rosales" }}{PARA 256 " " 0 "" {TEXT -1 5 "Final" }}{PARA 256 "" 0 "" {TEXT -1 9 "math 107B" } }{PARA 256 "" 0 "" {TEXT -1 0 "" }}{PARA 257 "" 0 "" {TEXT -1 405 "Thi s project is concerned with several examples of sets and functions whi ch can be constructed iteratively. These sets and functions are import ant ones, for they have been the source of examples and counter-exampl es for analysts and topologists. As such, this project deals not only \+ with the technical challenges of reproducing the construction of these examples, but we will also discuss their relevance." }}{PARA 0 "" 0 " " {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 67 " We start with an inter esting example, the Cantor Set and function." }}{SECT 0 {PARA 3 "" 0 " " {TEXT -1 10 "Cantor Set" }}{PARA 0 "" 0 "" {TEXT -1 589 "The Cantor \+ Set is a subset of the interval [0,1] which was discovered by Georg Ca ntor and presented in the appendix of a paper written in 1883. The set is constructed as follows, we start with the interval [0,1]. We remov e the open middle segment (1/3,2/3) from this interval, and we are lef t with two closed segements, [0,1/3] and [2/3,1]. We grab each of thes e segments and remove the middle thirds from them, so that we are left with the union of the closed intervals [0,1/9],[2/9,1/3],[2/3,7/9], a nd [8/9,1]. We then continue this process. What is left is what we cal l the Cantor Set. " }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 775 "This set has remarkable properties. Firstly, we should r emark that this set is non-empty. We always remove the middle thirds o f intervals in constructing the set, and as such, we will never remove the endpoints of any segment from the previous step of the constructi on. Thus, the points 0,1/9,2/9,1/3 and so on will be in the Cantor Set . However, much more is left than just these endpoints, in fact so muc h is left over as to make the Cantor Set uncountable. The proof is sim ple, once we identify that the Cantor Set is the set of all number in \+ [0,1] whose ternary decimal expansion contains only 0's and 1's. Such \+ a set is uncountable by a diagonalization argument. For supposing that we had such an enumeration of numbers, then we could list them as a s equence of points a" }{TEXT 292 3 "(n)" }{TEXT -1 43 " in their ternar y represenation as follows:" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT 293 1 "a" }{TEXT -1 21 "(0)= .020200020020..." }} {PARA 0 "" 0 "" {TEXT 294 1 "a" }{TEXT -1 21 "(1)= .220220020000..." } }{PARA 0 "" 0 "" {TEXT 295 1 "a" }{TEXT -1 21 "(2)= .000022222022..." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 39 "and so \+ forth. However, then by letting " }{TEXT 296 1 "A" }{TEXT -1 21 " be t he number whose " }{TEXT 297 1 "n" }{TEXT -1 31 "th decimal place is a 0 if the " }{TEXT 298 1 "n" }{TEXT -1 20 "th decimal place of " } {TEXT 419 4 "a(n)" }{TEXT -1 35 " is 2, and vice versa, we get that " }{TEXT 300 1 "A" }{TEXT -1 48 " is in the Cantor Set but is different \+ from any " }{TEXT 420 4 "a(n)" }{TEXT -1 62 " in our enumeration. Thus , the Cantor Set must be uncountable." }}{PARA 0 "" 0 "" {TEXT -1 0 " " }}{PARA 0 "" 0 "" {TEXT -1 652 "The Cantor Set is also compact, perf ect, and its closure has an empty interior. That the Cantor Set is com pact is easy to see, for it is the countable intersection of the compa ct sets [0,1/3], [2/3,1], [0,1/9], [2/9,1/3], [2/3,7/9], [8/9,1], and \+ so forth. The Cantor Set is also totally disconnected, meaning that we cannot find two distinct points in the Cantor Set that can be connect ed by a continuous function on [0,1] whose image lies totally inside t he Cantor Set. Thus, the Cantor Set is in some respects very meaty. Ho wever, in other respects the Cantor Set is also very thin, in particul ar with respect to measure which we shall discuss later." }}{PARA 0 " " 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 120 "Now, how can we u se maple to better understand the Cantor Set? My first goal was to dev ise an algorithm which given and " }{TEXT 277 1 "i" }{TEXT -1 7 " and \+ a " }{TEXT 278 1 "k" }{TEXT -1 12 ", gives the " }{TEXT 279 1 "i" } {TEXT -1 58 "th point which is an endpoint of a segment removed at the " }{TEXT 280 4 " k" }{TEXT -1 75 "th step of the construction of th e Cantor Set. The algorithm is as follows:" }}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 196 "cantorpoint:= proc(i,k) \noption remember ; \nif i =1 then 0 else \nif i mod 2 = 0 \nthen cantorpoint(i-1,k)+(1/(3^k)) \+ ; \nelse cantorpoint(i-1,k)+((3^((ifactors(i-1)[2][1][2])-1))/(3^k)) ; \nfi fi end;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%,cantorpointGf*6$%\" iG%\"kG6\"6#%)rememberGF)@%/9$\"\"\"\"\"!@%/-%$modG6$F.\"\"#F0,&-F$6$, &F.F/F/!\"\"9%F/*&F/F/)\"\"$FF;F/F)F)F)" }}}{PARA 0 "" 0 "" {TEXT -1 32 "The algori thm is recursive. The " }{TEXT 281 1 "i" }{TEXT -1 124 "th point is gi ven by adding an appropriate amount to the previous point, what you ad d depends highly on the divisibility of " }{TEXT 282 1 "i" }{TEXT -1 35 " by 2. In this algorithm, for each " }{TEXT 283 1 "k" }{TEXT -1 2 ", " }{TEXT 284 1 "i" }{TEXT -1 21 " ranges from 1 to 2^(" }{TEXT 291 1 "k" }{TEXT -1 4 "+1)." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 82 "To verify the validity of this algorithm, let us mak e a list of the cantor points:" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "cantorsequence:=(k)-> [seq(cantorpoint(i,k),i=1..2^(k+1))];" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%/cantorsequenceGf*6#%\"kG6\"6$%)oper atorG%&arrowGF(7#-%$seqG6$-%,cantorpointG6$%\"iG9$/F3;\"\"\")\"\"#,&F4 F7F7F7F(F(F(" }}}{PARA 0 "" 0 "" {TEXT -1 95 "and let us thus list the points used in the construction of the cantor set for the steps 1,2,3 :" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "cantorsequence(1);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#7&\"\"!#\"\"\"\"\"$#\"\"#F'F&" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "cantorsequence(2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7*\"\"!#\"\"\"\"\"*#\"\"#F'#F&\"\"$#F)F+#\" \"(F'#\"\")F'F&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "cantorse quence(3);\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#72\"\"!#\"\"\"\"#F#\" \"#F'#F&\"\"*#F)F+#\"\"(F'#\"\")F'#F&\"\"$#F)F2#\"#>F'#\"#?F'#F.F+#F0F +#\"#DF'#\"#EF'F&" }}}{PARA 0 "" 0 "" {TEXT -1 175 "This all checks ou t. We see that on the second step of the construction, for example, af ter having removed the segment (1/3,2/3), we then remove (1/9,2/9) and (7/9,8/9). Thus " }{TEXT 285 14 "cantorsequence" }{TEXT -1 144 "(2) g ives all of the important points of our construction, including 0 and \+ 1. So, now let us make a procedure that gives us what is left at the \+ " }{TEXT 286 1 "k" }{TEXT -1 60 "th step of the Cantor Set constructio n. Specifically, given " }{TEXT 287 1 "k" }{TEXT -1 295 "=1 this proce dure will tell us that we have removed the segment (1/3,2/3) from [0,1 ], leaving us with the union of the closed segments [0,1/3] and [2/3,1 ]. We will do so by making a procedure that spits out a list of lists \+ which is to represent a union of closed intervals. Thus in the case fo r " }{TEXT 288 1 "k" }{TEXT -1 67 "=1, this procedure will give [[0,1/ 3], [2/3,1]] as the answer. So: " }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 76 "cantorset:=(k)->[seq([cantorpoint(2*i-1,k), cantorpoint(2*i,k)],i=1..(2^k))];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#> %*cantorsetGf*6#%\"kG6\"6$%)operatorG%&arrowGF(7#-%$seqG6$7$-%,cantorp ointG6$,&%\"iG\"\"#\"\"\"!\"\"9$-F26$,$F5F6F9/F5;F7)F6F9F(F(F(" }}} {PARA 0 "" 0 "" {TEXT -1 57 "and now let us see what is left after ste ps 1,2,3,and 4: " }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "cantorset(1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7$7$ \"\"!#\"\"\"\"\"$7$#\"\"#F(F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "cantorset(2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7&7$\"\"!#\"\" \"\"\"*7$#\"\"#F(#F'\"\"$7$#F+F-#\"\"(F(7$#\"\")F(F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "cantorset(3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7*7$\"\"!#\"\"\"\"#F7$#\"\"#F(#F'\"\"*7$#F+F-#\"\"(F(7$ #\"\")F(#F'\"\"$7$#F+F6#\"#>F(7$#\"#?F(#F1F-7$#F4F-#\"#DF(7$#\"#EF(F' " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "cantorset(4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#727$\"\"!#\"\"\"\"#\")7$#\"\"#F(#F'\"#F7$#F+ F-#\"\"(F(7$#\"\")F(#F'\"\"*7$#F+F6#\"#>F(7$#\"#?F(#F1F-7$#F4F-#\"#DF( 7$#\"#EF(#F'\"\"$7$#F+FG#\"#bF(7$#\"#cF(#F:F-7$#F=F-#\"#hF(7$#\"#iF(#F 1F67$#F4F6#\"#tF(7$#\"#uF(#FBF-7$#FEF-#\"#zF(7$#\"#!)F(F'" }}}{PARA 0 "" 0 "" {TEXT -1 465 "Now we may illustrate another remarkable fact ab out the Cantor Set, which is that it has Lebesgue measure zero. We can see this most readibly by investigating the measure of the complement of the Cantor Set on [0,1]. In the first step of the construction, we remove the open interval (1/3,2/3), which has measure 1/3. At the sec ond step, we remove two disjoint intervals of length 1/9, each of whic h is disjoint from the first interval removed. We proceed, at each " } {TEXT 289 1 "k" }{TEXT -1 20 "th step removing 2^(" }{TEXT 302 1 "k" } {TEXT -1 95 "-1) disjoint intervals that are also disjoint from anythi ng else removed, that are of length 3^" }{TEXT 290 1 "k" }{TEXT -1 274 ". Since all of the segments are mutually disjoint, we may get the measure of the complement of the Cantor Set by adding all of the meas ures of each of the removed segments, which in light of my previous st atements, can be evaluated as the infinite sum starting from 1 of 2^( " }{TEXT 303 1 "k" }{TEXT -1 6 "-1)/3^" }{TEXT 304 1 "k" }{TEXT -1 119 ". This is a geometric series which evaluates to 1, the measure of [0,1], so that the Cantor Set must have zero measure." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 231 "Let us test this th rough data. First, we write a program which given a disjoint union of \+ sets represented by a list of two element lists, will give the measur e of that set by merely subtracting endpoints and totalling the result s:" }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 93 "mea sure:= proc(x) \nL:=0 ; \nfor i from 1 to nops(x) do L:=L+(x)[i][2]-(x )[i][1] od ;\nL ; \nend;" }}{PARA 7 "" 1 "" {TEXT -1 65 "Warning, `L` \+ is implicitly declared local to procedure `measure`\n" }}{PARA 7 "" 1 "" {TEXT -1 65 "Warning, `i` is implicitly declared local to procedure `measure`\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(measureGf*6#%\"xG6$ %\"LG%\"iG6\"F+C%>8$\"\"!?(8%\"\"\"F2-%%nopsG6#9$%%trueG>F.,(F.F2&&F66 #F16#\"\"#F2&F;6#F2!\"\"F.F+F+F+" }}}{PARA 0 "" 0 "" {TEXT -1 132 "The n by calculating some examples, we can see the behavior of the measure of each step of the construction, which should go to zero:" } {MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "measure( cantorset(1));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"\"#\"\"$" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "measure(cantorset(2));" }} {PARA 11 "" 1 "" {XPPMATH 20 "6##\"\"%\"\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "measure(cantorset(3));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"\")\"#F" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "evalf(measure(cantorset(4)));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$ \"+U'3`(>!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "evalf(measu re(cantorset(8)));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+JU%=!R!#6" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "evalf(measure(cantorset(15 )));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+h#eOG#!#7" }}}{PARA 0 "" 0 "" {TEXT -1 141 "Now we would like a way to visualize the steps take n in constructing the Cantor Set. We would like to construct a functio n such that given a " }{TEXT 305 1 "k" }{TEXT -1 55 ", this function i s 1 on the segments removed up to the " }{TEXT 306 1 "k" }{TEXT -1 75 "th step of the construction of the Cantor Set, and is zero everywhere else." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 146 "Conceptually this is no problem at all, given that we have alread y devised a program which gives the cantor points. The idea is that at each step " }{TEXT 307 1 "k" }{TEXT -1 31 ", what is removed lies bet ween " }{TEXT 308 16 "cantorpoint(i,k)" }{TEXT -1 5 " and " }{TEXT 309 18 "cantorpoint(i+1,k)" }{TEXT -1 10 " for each " }{TEXT 311 1 "i " }{TEXT -1 18 " between 1 and 2^(" }{TEXT 310 1 "k" }{TEXT -1 85 "+1) -1 that is even. Thus, ideally we should define our function, which we shall call " }{TEXT 312 23 "ComplementFunction(x,k)" }{TEXT -1 4 " as \n" }}{PARA 0 "" 0 "" {TEXT 313 23 "ComplementFunction(x,k)" }{TEXT -1 31 "= 1 if for some even " }{TEXT 314 1 "i" }{TEXT -1 18 " between 1 and 2^(" }{TEXT 315 1 "k" }{TEXT -1 8 "+1)-1 , " }{TEXT 316 17 "cantorpoint(i,k) " }{TEXT -1 6 "< x < " }{TEXT 317 18 "cantorp oint(i+1,k)" }}{PARA 0 "" 0 "" {TEXT -1 73 " \+ 0 everywhere else." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 177 "Now is where we run into some difficulties. Basically, we are attempting to define a sequence \+ of functions that are defined piecewise. However, the number of pieces varies with " }{TEXT 318 1 "k" }{TEXT -1 223 ". Even though maple doe s provide one with immediate tools in order to define piecewise functi ons, it does not allow for the pieces to vary. In other words, we can \+ only define functions where the pieces are set and definite." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 216 "This nothwiths tanding, there are two methods we can use to get around this obstructi on. One is involving sums, which is what we will use now, and the othe r involves do-loops. What we can do is define a function of x," } {TEXT 319 1 "i" }{TEXT -1 6 ", and " }{TEXT 320 1 "k" }{TEXT -1 15 " w hich is 1 if " }{TEXT 321 12 "cantorpoint(" }{TEXT -1 1 "2" }{TEXT 323 5 "*i,k)" }{TEXT -1 7 " < x < " }{TEXT 322 12 "cantorpoint(" } {TEXT -1 1 "2" }{TEXT 325 7 "*i+1,k)" }{TEXT -1 26 ". In essence, for \+ a fixed " }{TEXT 324 1 "k" }{TEXT -1 148 ", this function draws each o f the pieces where our ComplementFunction will be 1, individually. Eve rywhere else this complementfunction will be zero." }}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 112 "complementfunction:= proc(x,i,k) \nif canto rpoint(2*i,k) < x and x < cantorpoint(2*i+1,k)\nthen 1 else 0 \nfi end ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%3complementfunctionGf*6%%\"xG% \"iG%\"kG6\"F*F*@%32-%,cantorpointG6$,$9%\"\"#9&9$2F5-F/6$,&F2F3\"\"\" F:F4F:\"\"!F*F*F*" }}}{PARA 0 "" 0 "" {TEXT -1 21 "So, for example, fo r " }{TEXT 326 1 "k" }{TEXT -1 79 "=1 we only removed one segment, and so there will be only one pice to graph at " }{TEXT 327 1 "i" }{TEXT -1 3 "=1:" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "plot('complemen tfunction(x,1,1)',x=0..1,discont = true );" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6&7S7$$\"\"!F)F(7$$\"+O U(\\E(!#7F(7$$\"+Z*='e8!#6F(7$$\"+7d]p?F1F(7$$\"+'p/^y#F1F(7$$\"+jDI( \\$F1F(7$$\"+`6gdTF1F(7$$\"+(4-8%[F1F(7$$\"+#f'Q[bF1F(7$$\"+eM?`iF1F(7 $$\"+PU>ypF1F(7$$\"+5lw;wF1F(7$$\"+WwkN$)F1F(7$$\"+t0[d!*F1F(7$$\"+_.5 `(*F1F(7$$\"+v*y%Q5!#5F(7$$\"+bHf86FYF(7$$\"+[VAx6FYF(7$$\"+'yU7D\"FYF (7$$\"+X;w;8FYF(7$$\"+=ik)Q\"FYF(7$$\"+Jt4d9FYF(7$$\"+'))=&G:FYF(7$$\" +oh5%f\"FYF(7$$\"+84&[m\"FYF(7$$\"+@[LQFYF(7$$\"+I!*e7?FYF(7$$\"+>'[,3#FYF(7$$\"+C?;b@FYF(7$$ \"+0\\cAAFYF(7$$\"+o=`%H#FYF(7$$\"+KYufBFYF(7$$\"+3%R5V#FYF(7$$\"+OA7) \\#FYF(7$$\"+@JCoDFYF(7$$\"+.\"*zOEFYF(7$$\"+i3d3FFYF(7$$\"+'f&pxFFYF( 7$$\"+@cQ[GFYF(7$$\"+(H!\\=HFYF(7$$\"+9#4H)HFYF(7$$\"+h0ucIFYF(7$$\"+* >wF7$FYF(7$$\"+iR=$>$FYF(7$$\"+vJdgKFYF(7$$\"+(3#*HL$FYF(7S7$$\"+S8cLL FY$\"\"\"F)7$$\"+p&3iS$FYF[u7$$\"+N&=%pMFYF[u7$$\"+_Z]SNFYF[u7$$\"+v@1 7OFYF[u7$$\"+)\\zKo$FYF[u7$$\"+sqI\\PFYF[u7$$\"+-[n&f@s%FYF[u7$$\" +j#31z%FYF[u7$$\"+Zt-i[FYF[u7$$\"+hBhF\\FYF[u7$$\"+fYN)*\\FYF[u7$$\"+C g$=2&FYF[u7$$\"+pD'FYF[u7$$\"+htO;jFYF[u7$$\"+bh>!R'FYF[u7$$\"+3&HiX'FYF[u7$$\"+ N[jElFYF[u7$$\"+<<-%f'FYF[u7$$\"+C\"Qkm'FYF[u7S7$$\"+0u+nmFYF(7$$\"+er lRnFYF(7$$\"+?$pG!oFYF(7$$\"+3!eR(oFYF(7$$\"+BWyFYF(7$$\"+#Q]#=zFYF(7$$\"+ ^#pP)zFYF(7$$\"+NQlb!)FYF(7$$\"+e\\5C\")FYF(7$$\"+Bl_&>)FYF(7$$\"+;Q6h #)FYF(7$$\"+s&e=L)FYF(7$$\"+\"\\U`S)FYF(7$$\"+e/Jp%)FYF(7$$\"+;wRQ&)FY F(7$$\"+49x4')FYF(7$$\"+Unfz')FYF(7$$\"+Tj:Z()FYF(7$$\"+e(p@#))FYF(7$$ \"+\\Ed*)))FYF(7$$\"+A'R:'*)FYF(7$$\"+'R_n-*FYF(7$$\"+$=Z!)4*FYF(7$$\" +A+8l\"*FYF(7$$\"+<4DN#*FYF(7$$\"+4p!QI*FYF(7$$\"+!oybP*FYF(7$$\"+DMqW %*FYF(7$$\"+gMR:&*FYF(7$$\"+Z\")\\&e*FYF(7$$\"+tq\"*\\'*FYF(7$$\"+K%[P s*FYF(7$$\"+!3%y*y*FYF(7$$\"+`=>g)*FYF(7$$\"+w5eF**FYF(7$F[uF(-%'COLOU RG6&%$RGBG$\"*++++\"!\")F(F(-%+AXESLABELSG6$Q\"x6\"Q!Fjgl-%%VIEWG6$;F( F[u%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 1 1.000000 46.000000 45.000000 0 0 "Curve 1" }}}}{PARA 0 "" 0 "" {TEXT -1 11 "Up to step " }{TEXT 328 1 "k" }{TEXT -1 82 "=2, we removed three segments. So complementfuncti on should draw three heights at " }{TEXT 329 1 "i" }{TEXT -1 11 "=1,2 \+ and 3:" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "plot('complementfu nction(x,1,2)',x=0..1,discont = true );" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6&7S7$$\"\"!F)F(7$$\"+&o\\8U#!#7F (7$$\"+*4`\"GXF-F(7$$\"+\")QZ(*oF-F(7$$\"+g+]#G*F-F(7$$\"+j!>c;\"!#6F( 7$$\"+j0p&Q\"F:F(7$$\"+b=c8;F:F(7$$\"+smA\\=F:F(7$$\"+3d8%3#F:F(7$$\"+ D&odK#F:F(7$$\"+V))fQDF:F(7$$\"+r`>yFF:F(7$$\"+1dx=IF:F(7$$\"+P%>1D$F: F(7$$\"+cd:hMF:F(7$$\"+.Q]6PF:F(7$$\"+P9eBRF:F(7$$\"+U\"y-<%F:F(7$$\"+ Flk)Q%F:F(7$$\"+b7BGYF:F(7$$\"+tDPc[F:F(7$$\"+0TT%4&F:F(7$$\"+R0,8`F:F (7$$\"+Djz[bF:F(7$$\"+\"\\6Pz&F:F(7$$\"+i3\"p+'F:F(7$$\"+C?ig2u F:F(7$$\"+WbYZwF:F(7$$\"+UP\"['yF:F(7$$\"+KFV-\")F:F(7$$\"+$o8gK)F:F(7 $$\"+*>?(f&)F:F(7$$\"+O5@)y)F:F(7$$\"+o(>u-*F:F(7$$\"+1i!yD*F:F(7$$\"+ :'4M\\*F:F(7$$\"+4@1F(*F:F(7$$\"+&[k<%**F:F(7$$\"+kPy=5!#5F(7$$\"+SGzS 5FjsF(7$$\"+0\"fU1\"FjsF(7$$\"+;$>n3\"FjsF(7$$\"+ze&36\"FjsF(7S7$$\"+T JY66Fjs$\"\"\"F)7$$\"+5&oc8\"FjsF[u7$$\"+s%Hn:\"FjsF[u7$$\"+FZT!=\"Fjs F[u7$$\"+$)pD/7FjsF[u7$$\"+@f)zA\"FjsF[u7$$\"+%o&)*\\7FjsF[u7$$\"+k^ws 7FjsF[u7$$\"+NPK'H\"FjsF[u7$$\"+an!)>8FjsF[u7$$\"+D>'RM\"FjsF[u7$$\"+7 yBl8FjsF[u7$$\"+B%*=*Q\"FjsF[u7$$\"+\"QRKT\"FjsF[u7$$\"+sfTO9FjsF[u7$$ \"+ODYd9FjsF[u7$$\"+Q*)[#[\"FjsF[u7$$\"+#e*o.:FjsF[u7$$\"+s4NG:FjsF[u7 $$\"+![!=]:FjsF[u7$$\"+648u:FjsF[u7$$\"+&QPpf\"FjsF[u7$$\"+[Nt?;FjsF[u 7$$\"+aeeU;FjsF[u7$$\"+=l:m;FjsF[u7$$\"+8)R1p\"FjsF[u7$$\"+%f_>r\"FjsF [u7$$\"+\")4(\\t\"FjsF[u7$$\"+F7ve&=FjsF[u7$$\"+%*H&f(=FjsF[u7$$\"+ =0o(*=FjsF[u7$$\"+TWV@>FjsF[u7$$\"+J]yV>FjsF[u7$$\"+Qy9n>FjsF[u7$$\"+_ #*)**)>FjsF[u7$$\"+&4-R,#FjsF[u7$$\"+1I$p.#FjsF[u7$$\"+Qa[g?FjsF[u7$$ \"+XG%Q3#FjsF[u7$$\"+veI0@FjsF[u7$$\"+J\\!*H@FjsF[u7$$\"+>m!>:#FjsF[u7 $$\"+2]Ov@FjsF[u7$$\"+zw\"y>#FjsF[u7$$\"+Sh%>A#FjsF[u7S7$$\"+AMbAAFjsF (7$$\"+C'z?R#FjsF(7$$\"+mMeRDFjsF(7$$\"+jpY0FFjsF(7$$\"+W+XsGFjsF(7$$ \"+$[R'QIFjsF(7$$\"+n$=F>$FjsF(7$$\"+F\"eAN$FjsF(7$$\"+vVD4OVFjsF(7$$\"+>HT)\\%FjsF(7$$\"+Ef\"ek%FjsF(7$$\"+fB4@[FjsF(7$$\"+*[ u&p\\FjsF(7$$\"+/XHU^FjsF(7$$\"+%)4=&H&FjsF(7$$\"+$o@HY&FjsF(7$$\"+(\\ ]Ei&FjsF(7$$\"+d2J*y&FjsF(7$$\"+,pNUfFjsF(7$$\"+VyV2hFjsF(7$$\"+Z0\"*y iFjsF(7$$\"+S!y\"GkFjsF(7$$\"+A5R*e'FjsF(7$$\"+2)Rfv'FjsF(7$$\"++`()=p FjsF(7$$\"+oP_wqFjsF(7$$\"+8bc^sFjsF(7$$\"+2$[)3uFjsF(7$$\"+g7ywvFjsF( 7$$\"+vM&*GxFjsF(7$$\"+,zJ&*yFjsF(7$$\"+gQ&=0)FjsF(7$$\"+T!za@)FjsF(7$ $\"+jDXv$)FjsF(7$$\"+;+$Ha)FjsF(7$$\"+32B/()FjsF(7$$\"+iR=p))FjsF(7$$ \"+@8xK!*FjsF(7$$\"+964$=*FjsF(7$$\"+gXPb$*FjsF(7$$\"+GpY4&*FjsF(7$$\" +K:wt'*FjsF(7$$\"+JC,J)*FjsF(7$F[uF(-%'COLOURG6&%$RGBG$\"*++++\"!\")F( F(-%+AXESLABELSG6$Q\"x6\"Q!Fjgl-%%VIEWG6$;F(F[u%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "plot('complementfunction(x,2,2)',x= 0..1,discont = true );" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6&7S7$$\"\"!F)F(7$$\"+G94ls!#7F(7$$\"+j3ke8!# 6F(7$$\"+'4R&p?F1F(7$$\"+B'\\^y#F1F(7$$\"+y*et\\$F1F(7$$\"+?#ow:%F1F(7 $$\"+$>!QT[F1F(7$$\"+$4w%[bF1F(7$$\"+HVI`iF1F(7$$\"+.oIypF1F(7$$\"+x$* )oh(F1F(7$$\"+2@yN$)F1F(7$$\"+!oEw0*F1F(7$$\"+!odKv*F1F(7$$\"+Fd\\Q5!# 5F(7$$\"+=4h86FYF(7$$\"+QLCx6FYF(7$$\"+qHE^7FYF(7$$\"+')Gy;8FYF(7$$\"+ >'o')Q\"FYF(7$$\"+N37d9FYF(7$$\"+UNaG:FYF(7$$\"+$)=8%f\"FYF(7$$\"+px([ m\"FYF(7$$\"+iGOQFYF(7$$ \"+&\\@E,#FYF(7$$\"+u@=!3#FYF(7$$\"+*y'>b@FYF(7$$\"+e2gAAFYF(7$$\"+\") )oXH#FYF(7$$\"+(p#yfBFYF(7$$\"+B'y5V#FYF(7$$\"+MD;)\\#FYF(7$$\"+\\XGoD FYF(7$$\"+P;%oj#FYF(7$$\"+aXh3FFYF(7$$\"+//uxFFYF(7$$\"+p:V[GFYF(7$$\" +wt`=HFYF(7$$\"+Jt&H)HFYF(7$$\"+q)*ycIFYF(7$$\"+tl#G7$FYF(7$$\"+raB$>$ FYF(7$$\"+rdigKFYF(7$$\"+_e/LLFYF(7S7$$\"+=^hLLFY$\"\"\"F)7$$\"+z'fiS$ FYF[u7$$\"+AtYpMFYF[u7$$\"+G4bSNFYF[u7$$\"+Bd57OFYF[u7$$\"+I/K$o$FYF[u 7$$\"+zbM\\PFYF[u7$$\"+(z5x\"QFYF[u7$$\"+.UT))QFYF[u7$$\"+j3*)eRFYF[u7 $$\"+qZQJSFYF[u7$$\"+UuB&4%FYF[u7$$\"+G/7nTFYF[u7$$\"+t&)HRUFYF[u7$$\" +*eb)3VFYF[u7$$\"+C+-sVFYF[u7$$\"+Y'GrW%FYF[u7$$\"+,bv5XFYF[u7$$\"+f'o Ze%FYF[u7$$\"+XGG]YFYF[u7$$\"+\"Hi@s%FYF[u7$$\"+@&31z%FYF[u7$$\"+#)\\- i[FYF[u7$$\"+'e2w#\\FYF[u7$$\"+'GZ$)*\\FYF[u7$$\"+_f#=2&FYF[u7$$\"+Z$* yN^FYF[u7$$\"+m:([?&FYF[u7$$\"+e-Cw_FYF[u7$$\"++11Y`FYF[u7$$\"+q`h8aFY F[u7$$\"+DMi)[&FYF[u7$$\"+)\\@gb&FYF[u7$$\"+GL)zi&FYF[u7$$\"+T9>$p&FYF [u7$$\"+K6[kdFYF[u7$$\"+v\"f:$eFYF[u7$$\"+f]n,fFYF[u7$$\"+]hAqfFYF[u7$ $\"+\"z#*>/'FYF[u7$$\"+&f766'FYF[u7$$\"+yvz\"='FYF[u7$$\"+`s*=D'FYF[u7 $$\"+v:J;jFYF[u7$$\"+dw8!R'FYF[u7$$\"+%eohX'FYF[u7$$\"+D8dElFYF[u7$$\" +Kd&Rf'FYF[u7$$\"+z%pjm'FYF[u7S7$$\"+D(Qpm'FYF(7$$\"+v**eRnFYF(7$$\"+S M!G!oFYF(7$$\"+#f$*Q(oFYF(7$$\"+w\\XXpFYF(7$$\"+Tin;qFYF(7$$\"+ruq#3(F YF(7$$\"+%)*y5:(FYF(7$$\"+-*)y@sFYF(7$$\"+^?F#H(FYF(7$$\"+MExktFYF(7$$ \"+(=J'GuFYF(7$$\"+$z?0](FYF(7$$\"+%e0Fd(FYF(7$$\"+1!pAk(FYF(7$$\"+e#R aq(FYF(7$$\"+'za0y(FYF(7$$\"+6v=WyFYF(7$$\"+&[2#=zFYF(7$$\"+/xs$)zFYF( 7$$\"+pPhb!)FYF(7$$\"+.j1C\")FYF(7$$\"+S$*[&>)FYF(7$$\"+&)z2h#)FYF(7$$ \"+)>C=L)FYF(7$$\"+J'4`S)FYF(7$$\"+<*y#p%)FYF(7$$\"+)\\n$Q&)FYF(7$$\"+ iFu4')FYF(7$$\"+L&p&z')FYF(7$$\"+D08Z()FYF(7$$\"+([X@#))FYF(7$$\"+n(\\ &*)))FYF(7$$\"+B#=:'*)FYF(7$$\"+TBtE!*FYF(7$$\"+)fG!)4*FYF(7$$\"+=G6l \"*FYF(7$$\"+f^BN#*FYF(7$$\"+jDz.$*FYF(7$$\"+8ecv$*FYF(7$$\"+#)>pW%*FY F(7$$\"+uMQ:&*FYF(7$$\"+0'*[&e*FYF(7$$\"+f)4*\\'*FYF(7$$\"+RFuB(*FYF(7 $$\"+[(z(*y*FYF(7$$\"+s*)=g)*FYF(7$$\"+%ezv#**FYF(7$F[uF(-%'COLOURG6&% $RGBG$\"*++++\"!\")F(F(-%+AXESLABELSG6$Q\"x6\"Q!Fjgl-%%VIEWG6$;F(F[u%( DEFAULTG" 1 2 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Cur ve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "plot('complementfu nction(x,3,2)',x=0..1,discont = true );" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6&7S7$$\"\"!F)F(7$$\"+4lF&p\"!#6F (7$$\"+NvKqJF-F(7$$\"+%ow\"H[F-F(7$$\"+j<-*\\'F-F(7$$\"+f.$4;)F-F(7$$ \"+nBt,(*F-F(7$$\"+gVrH6!#5F(7$$\"+=?r%H\"F@F(7$$\"+E0=f9F@F(7$$\"+.mN G;F@F(7$$\"+$)pOxF@F(7$$\"+tlb8@F@F(7$$\"+Z*yeF#F@F(7$ $\"+:KGBCF@F(7$$\"+X6c)f#F@F(7$$\"+WX/ZFF@F(7$$\"+Ogw>HF@F(7$$\"+AQlsI F@F(7$$\"+bfRSKF@F(7$$\"+Mh7+MF@F(7$$\"+=yymNF@F(7$$\"+q_$)>PF@F(7$$\" +Cw\"\\)QF@F(7$$\"+$z\"RcSF@F(7$$\"+i0m0UF@F(7$$\"+A\\(oO%F@F(7$$\"+I^ ULXF@F(7$$\"+;?O'p%F@F(7$$\"+J=,a[F@F(7$$\"+s]0H]F@F(7$$\"+5#Rj=&F@F(7 $$\"+)ftUN&F@F(7$$\"+9rW1bF@F(7$$\"+hH\"Gn&F@F(7$$\"+e-NHeF@F(7$$\"+Qo (H*fF@F(7$$\"+G<&H:'F@F(7$$\"+61V?jF@F(7$$\"+#oK<['F@F(7$$\"+YtoYmF@F( 7$$\"+.hF5oF@F(7$$\"+!=(fgpF@F(7$$\"+*4#)G8(F@F(7$$\"+%yvpG(F@F(7$$\"+ #zr7X(F@F(7$$\"+NS_3wF@F(7$$\"+ZI^xxF@F(7S7$$\"+I.7yxF@$\"\"\"F)7$$\"+ c_K-yF@Fjt7$$\"+LeQByF@Fjt7$$\"+a12ZyF@Fjt7$$\"+tC\"4(yF@Fjt7$$\"+x4k% *yF@Fjt7$$\"+P.k;zF@Fjt7$$\"++%>%RzF@Fjt7$$\"+Sv(H'zF@Fjt7$$\"+G,Y')zF @Fjt7$$\"+d[h5!)F@Fjt7$$\"+b.*=.)F@Fjt7$$\"+F:%e0)F@Fjt7$$\"+X5*)z!)F@ Fjt7$$\"+6s1.\")F@Fjt7$$\"+\"R8T7)F@Fjt7$$\"+M$R\"\\\")F@Fjt7$$\"+!fR. <)F@Fjt7$$\"+G0+&>)F@Fjt7$$\"+P'Ho@)F@Fjt7$$\"+I'z2C)F@Fjt7$$\"+'o&ej# )F@Fjt7$$\"+89Q(G)F@Fjt7$$\"+>LB4$)F@Fjt7$$\"+^N!GL)F@Fjt7$$\"+)R'Gd$) F@Fjt7$$\"+*y)fy$)F@Fjt7$$\"+bnh,%)F@Fjt7$$\"+llRD%)F@Fjt7$$\"+r/m[%)F @Fjt7$$\"+'\\p6Z)F@Fjt7$$\"+I>;'\\)F@Fjt7$$\"+W(='=&)F@Fjt7$$\"+'='fU& )F@Fjt7$$\"+8LKk&)F@Fjt7$$\"+,o2)e)F@Fjt7$$\"+#)pU5')F@Fjt7$$\"+h$*yL' )F@Fjt7$$\"+c.jc')F@Fjt7$$\"+iFa!o)F@Fjt7$$\"+^Kd.()F@Fjt7$$\"+__7F()F @Fjt7$$\"+JA[]()F@Fjt7$$\"+p[%>x)F@Fjt7$$\"+uMa'z)F@Fjt7$$\"+fZa=))F@F jt7$$\"+=F+U))F@Fjt7$$\"+y\\Xk))F@Fjt7$$\"+)*He))))F@Fjt7S7$$\"+3.>*)) )F@F(7$$\"+)z-M\"*)F@F(7$$\"+c*pW$*)F@F(7$$\"+z@;e*)F@F(7$$\"+\\9,#)*) F@F(7$$\"+otu0!*F@F(7$$\"+.OvF!*F@F(7$$\"+&yR00*F@F(7$$\"+'G0T2*F@F(7$ $\"+8_f(4*F@F(7$$\"+!\\d<7*F@F(7$$\"+P'RI9*F@F(7$$\"+%H)*p;*F@F(7$$\"+ F`0\">*F@F(7$$\"+O(QU@*F@F(7$$\"+$\\\"HN#*F@F(7$$\"+d_Kg#*F@F(7$$\"+Q@ `\"G*F@F(7$$\"+$y+iI*F@F(7$$\"+9n.G$*F@F(7$$\"+!>%*>N*F@F(7$$\"+ut![P* F@F(7$$\"+P0h)R*F@F(7$$\"+s#p/U*F@F(7$$\"+qo/W%*F@F(7$$\"+ot`o%*F@F(7$ $\"+>k&)*[*F@F(7$$\"+y:)G^*F@F(7$$\"+?)om`*F@F(7$$\"+&**R*f&*F@F(7$$\" +agX#e*F@F(7$$\"+*Hcug*F@F(7$$\"+J,#*H'*F@F(7$$\"+m]!Rl*F@F(7$$\"+#)*Q cn*F@F(7$$\"+$*)*R*p*F@F(7$$\"+eqv@(*F@F(7$$\"+Qn7X(*F@F(7$$\"+s[(zw*F @F(7$$\"+^Z*=z*F@F(7$$\"+PC$\\\")*F@F(7$$\"+)z\"\\Q)*F@F(7$$\"+wg&=')* F@F(7$$\"+@aK$))*F@F(7$$\"+8<$z!**F@F(7$$\"+u)R*H**F@F(7$$\"+k^S`**F@F (7$$\"+SW'e(**F@F(7$FjtF(-%'COLOURG6&%$RGBG$\"*++++\"!\")F(F(-%+AXESLA BELSG6$Q\"x6\"Q!Figl-%%VIEWG6$;F(Fjt%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{PARA 0 "" 0 "" {TEXT -1 24 "Notice that the graph at" }{TEXT 330 2 " i" }{TEXT -1 3 " =2," }{TEXT 331 1 "k" }{TEXT -1 18 "=2 is the same for" }{TEXT 332 2 " i" }{TEXT -1 3 "=1," }{TEXT 333 1 "k" }{TEXT -1 4 "=1. " }}{PARA 0 " " 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 12 "Now, to get " } {TEXT 334 18 "ComplementFunction" }{TEXT -1 33 ", we do the clever thi ng and sum " }{TEXT 335 18 "complementfunction" }{TEXT -1 23 " for all the values of " }{TEXT 336 1 "i" }{TEXT -1 55 " that give us all of t he even numbers between 1 and 2^(" }{TEXT 337 1 "k" }{TEXT -1 18 "+1)- 1. This gives:" }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 83 "ComplementFunction:= (x, k) -> sum('complementfunctio n(x,i,k)', 'i'=1..((2^k)-1)); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%3C omplementFunctionGf*6$%\"xG%\"kG6\"6$%)operatorG%&arrowGF)-%$sumG6$.-% 3complementfunctionG6%9$%\"iG9%/.F5;\"\"\",&)\"\"#F6F:F:!\"\"F)F)F)" } }}{PARA 0 "" 0 "" {TEXT -1 137 "To make an analogy, what we have done \+ is build the four walls of a house seperately, and then join them toge ther in the end. Let us plot " }{TEXT 338 18 "ComplementFunction" } {TEXT -1 13 " for several " }{TEXT 339 1 "k" }{TEXT -1 2 ": " } {MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "plot('Co mplementFunction(x,1)',x=0..1,discont = true );" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6&7S7$$\"\"!F)F(7$$\"+O U(\\E(!#7F(7$$\"+Z*='e8!#6F(7$$\"+7d]p?F1F(7$$\"+'p/^y#F1F(7$$\"+jDI( \\$F1F(7$$\"+`6gdTF1F(7$$\"+(4-8%[F1F(7$$\"+#f'Q[bF1F(7$$\"+eM?`iF1F(7 $$\"+PU>ypF1F(7$$\"+5lw;wF1F(7$$\"+WwkN$)F1F(7$$\"+t0[d!*F1F(7$$\"+_.5 `(*F1F(7$$\"+v*y%Q5!#5F(7$$\"+bHf86FYF(7$$\"+[VAx6FYF(7$$\"+'yU7D\"FYF (7$$\"+X;w;8FYF(7$$\"+=ik)Q\"FYF(7$$\"+Jt4d9FYF(7$$\"+'))=&G:FYF(7$$\" +oh5%f\"FYF(7$$\"+84&[m\"FYF(7$$\"+@[LQFYF(7$$\"+I!*e7?FYF(7$$\"+>'[,3#FYF(7$$\"+C?;b@FYF(7$$ \"+0\\cAAFYF(7$$\"+o=`%H#FYF(7$$\"+KYufBFYF(7$$\"+3%R5V#FYF(7$$\"+OA7) \\#FYF(7$$\"+@JCoDFYF(7$$\"+.\"*zOEFYF(7$$\"+i3d3FFYF(7$$\"+'f&pxFFYF( 7$$\"+@cQ[GFYF(7$$\"+(H!\\=HFYF(7$$\"+9#4H)HFYF(7$$\"+h0ucIFYF(7$$\"+* >wF7$FYF(7$$\"+iR=$>$FYF(7$$\"+vJdgKFYF(7$$\"+(3#*HL$FYF(7S7$$\"+S8cLL FY$\"\"\"F)7$$\"+p&3iS$FYF[u7$$\"+N&=%pMFYF[u7$$\"+_Z]SNFYF[u7$$\"+v@1 7OFYF[u7$$\"+)\\zKo$FYF[u7$$\"+sqI\\PFYF[u7$$\"+-[n&f@s%FYF[u7$$\" +j#31z%FYF[u7$$\"+Zt-i[FYF[u7$$\"+hBhF\\FYF[u7$$\"+fYN)*\\FYF[u7$$\"+C g$=2&FYF[u7$$\"+pD'FYF[u7$$\"+htO;jFYF[u7$$\"+bh>!R'FYF[u7$$\"+3&HiX'FYF[u7$$\"+ N[jElFYF[u7$$\"+<<-%f'FYF[u7$$\"+C\"Qkm'FYF[u7S7$$\"+0u+nmFYF(7$$\"+er lRnFYF(7$$\"+?$pG!oFYF(7$$\"+3!eR(oFYF(7$$\"+BWyFYF(7$$\"+#Q]#=zFYF(7$$\"+ ^#pP)zFYF(7$$\"+NQlb!)FYF(7$$\"+e\\5C\")FYF(7$$\"+Bl_&>)FYF(7$$\"+;Q6h #)FYF(7$$\"+s&e=L)FYF(7$$\"+\"\\U`S)FYF(7$$\"+e/Jp%)FYF(7$$\"+;wRQ&)FY F(7$$\"+49x4')FYF(7$$\"+Unfz')FYF(7$$\"+Tj:Z()FYF(7$$\"+e(p@#))FYF(7$$ \"+\\Ed*)))FYF(7$$\"+A'R:'*)FYF(7$$\"+'R_n-*FYF(7$$\"+$=Z!)4*FYF(7$$\" +A+8l\"*FYF(7$$\"+<4DN#*FYF(7$$\"+4p!QI*FYF(7$$\"+!oybP*FYF(7$$\"+DMqW %*FYF(7$$\"+gMR:&*FYF(7$$\"+Z\")\\&e*FYF(7$$\"+tq\"*\\'*FYF(7$$\"+K%[P s*FYF(7$$\"+!3%y*y*FYF(7$$\"+`=>g)*FYF(7$$\"+w5eF**FYF(7$F[uF(-%'COLOU RG6&%$RGBG$\"*++++\"!\")F(F(-%+AXESLABELSG6$Q\"x6\"Q!Fjgl-%%VIEWG6$;F( F[u%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "plot('Comple mentFunction(x,2)',x=0..1,discont = true );" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6*7S7$$\"\"!F)F(7$$\"+% =%*4U#!#7F(7$$\"+z#)[FXF-F(7$$\"++7Y'*oF-F(7$$\"+7s8\"G*F-F(7$$\"+FzWl 6!#6F(7$$\"+=r[&Q\"F:F(7$$\"+a\\K8;F:F(7$$\"+q^&*[=F:F(7$$\"+<(HQ3#F:F (7$$\"+eqUDBF:F(7$$\"+GhAQDF:F(7$$\"+zuyxFF:F(7$$\"+#\\K$=IF:F(7$$\"+% =U,D$F:F(7$$\"+$fZ1Y$F:F(7$$\"+$))e4r$F:F(7$$\"+!Q0I#RF:F(7$$\"+lempTF :F(7$$\"+!>-!)Q%F:F(7$$\"+U$pF:F(7$$\"+mR!>=(F:F(7 $$\"+T'=lS(F:F(7$$\"+\\FMYwF:F(7$$\"+P!fO'yF:F(7$$\"+SJC,\")F:F(7$$\"+ l7zC$)F:F(7$$\"+pMYe&)F:F(7$$\"+f2#py)F:F(7$$\"+qV4E!*F:F(7$$\"+$)pWc# *F:F(7$$\"+,e,#\\*F:F(7$$\"+!*RjD(*F:F(7$$\"+W[IS**F:F(7$$\"+(=M'=5!#5 F(7$$\"+J+kS5FjsF(7$$\"+_G5k5FjsF(7$$\"+k(fl3\"FjsF(7$$\"+%y#p56FjsF(7 S7$$\"+fMZ66Fjs$\"\"\"F)7$$\"+gWnN6FjsF[u7$$\"+@;tc6FjsF[u7$$\"+-ET!= \"FjsF[u7$$\"+b0D/7FjsF[u7$$\"+6_(zA\"FjsF[u7$$\"+.5(*\\7FjsF[u7$$\"+t jus7FjsF[u7$$\"+#p+jH\"FjsF[u7$$\"+t%z(>8FjsF[u7$$\"+%GIRM\"FjsF[u7$$ \"+LB?l8FjsF[u7$$\"+?'\\\"*Q\"FjsF[u7$$\"+Q_>89FjsF[u7$$\"+YwOO9FjsF[u 7$$\"+8/Td9FjsF[u7$$\"+)HKC[\"FjsF[u7$$\"+<\"HO]\"FjsF[u7$$\"+cgGG:Fjs F[u7$$\"+D;6]:FjsF[u7$$\"+Lx0u:FjsF[u7$$\"+\"4gof\"FjsF[u7$$\"+g>l?;Fj sF[u7$$\"+A.]U;FjsF[u7$$\"+Kn1m;FjsF[u7$$\"+4ca!p\"FjsF[u7$$\"+WX&=r\" FjsF[u7$$\"+x(o[t\"FjsF[u7$$\"+JZkey\"FjsF[u7$$\"+R-T /=FjsF[u7$$\"+@')RH=FjsF[u7$$\"+$z^=&=FjsF[u7$$\"+Z`#e(=FjsF[u7$$\"+]* [v*=FjsF[u7$$\"+'e)H@>FjsF[u7$$\"+V^kV>FjsF[u7$$\"+LP+n>FjsF[u7$$\"+D5 %)*)>FjsF[u7$$\"+`&\\P,#FjsF[u7$$\"+3jxO?FjsF[u7$$\"+!\\C.1#FjsF[u7$$ \"+\"oxO3#FjsF[u7$$\"+Qo80@FjsF[u7$$\"+a9tH@FjsF[u7$$\"+s\"H<:#FjsF[u7 $$\"+FL=v@FjsF[u7$$\"+Y>j(>#FjsF[u7$$\"+`gv@AFjsF[u7S7$$\"+No`AAFjsF(7 $$\"+R\"RnC#FjsF(7$$\"+MuznAFjsF(7$$\"+!pz9H#FjsF(7$$\"+E*=`J#FjsF(7$$ \"+f[/RBFjsF(7$$\"+O=/hBFjsF(7$$\"+K%=QQ#FjsF(7$$\"+?SP2CFjsF(7$$\"+kS &3V#FjsF(7$$\"+wh+bCFjsF(7$$\"+q$ziZ#FjsF(7$$\"+ZzA+DFjsF(7$$\"+g[FCDF jsF(7$$\"+:&[ua#FjsF(7$$\"+:C\\oDFjsF(7$$\"+Zc^$f#FjsF(7$$\"+2Or9EFjsF (7$$\"+u=PREFjsF(7$$\"+=')>hEFjsF(7$$\"+;g9&o#FjsF(7$$\"+,'\\zq#FjsF(7 $$\"+^FuJFFjsF(7$$\"+*G#f`FFjsF(7$$\"+o*frx#FjsF(7$$\"+k,k,GFjsF(7$$\" +X-&H#GFjsF(7$$\"+=d'f%GFjsF(7$$\"+_HupGFjsF(7$$\"+QV+$*GFjsF(7$$\"+C4 ^:HFjsF(7$$\"+^1]SHFjsF(7$$\"+K]&H'HFjsF(7$$\"+x)Hp)HFjsF(7$$\"+]Yl3IF jsF(7$$\"+lbSKIFjsF(7$$\"+CLvaIFjsF(7$$\"+tJ6yIFjsF(7$$\"+%p^45$FjsF(7 $$\"+5:'[7$FjsF(7$$\"+/&*)y9$FjsF(7$$\"+a*Q9<$FjsF(7$$\"+-Mz%>$FjsF(7$ $\"+:PD;KFjsF(7$$\"+b'\\3C$FjsF(7$$\"+d&[GE$FjsF(7$$\"+vRI'G$FjsF(7$$ \"+.Qv3LFjsF(7$$\"+4#zGL$FjsF(7S7$$\"+l)fOL$FjsF[u7$$\"+YBI1MFjsF[u7$$ \"+\"=3&pMFjsF[u7$$\"+_(*eSNFjsF[u7$$\"+)\\U@h$FjsF[u7$$\"+n^N$o$FjsF[ u7$$\"+E%y$\\PFjsF[u7$$\"+)oTx\"QFjsF[u7$$\"+qIW))QFjsF[u7$$\"+7x\"*eR FjsF[u7$$\"+W&49.%FjsF[u7$$\"+*Qg_4%FjsF[u7$$\"+<89nTFjsF[u7$$\"+'R<$R UFjsF[u7$$\"+@C()3VFjsF[u7$$\"+[].sVFjsF[u7$$\"+?:9ZWFjsF[u7$$\"+alw5X FjsF[u7$$\"+%fxZe%FjsF[u7$$\"+/**G]YFjsF[u7$$\"+$Hn@s%FjsF[u7$$\"+k:h! z%FjsF[u7$$\"+!)f-i[FjsF[u7$$\"+3ngF\\FjsF[u7$$\"+#QW$)*\\FjsF[u7$$\"+ X4#=2&FjsF[u7$$\"+5DyN^FjsF[u7$$\"+^F'[?&FjsF[u7$$\"++%HiF&FjsF[u7$$\" +Vx/Y`FjsF[u7$$\"+!e+OT&FjsF[u7$$\"+)[1')[&FjsF[u7$$\"+KE+cbFjsF[u7$$ \"+-C'zi&FjsF[u7$$\"+['oJp&FjsF[u7$$\"+*HcWw&FjsF[u7$$\"+AC`JeFjsF[u7$ $\"+*HY;!fFjsF[u7$$\"+Ga>qfFjsF[u7$$\"+9+'>/'FjsF[u7$$\"+Sy26hFjsF[u7$ $\"++3w\"='FjsF[u7$$\"+p%e=D'FjsF[u7$$\"+Z4F;jFjsF[u7$$\"+:\\4!R'FjsF[ u7$$\"+`R7ckFjsF[u7$$\"+zY_ElFjsF[u7$$\"+cr!Rf'FjsF[u7$$\"+J)=jm'FjsF[ u7S7$$\"+d%*4nmFjsF(7$$\"+-%*H\"p'FjsF(7$$\"+YcN7nFjsF(7$$\"+$fNgt'Fjs F(7$$\"+2D()fnFjsF(7$$\"+Ghf$y'FjsF(7$$\"+h4f0oFjsF(7$$\"+P`OGoFjsF(7$ $\"+I'=>&oFjsF(7$$\"+'Q'RvoFjsF(7$$\"+Xha**oFjsF(7$$\"+ls\"3#pFjsF(7$$ \"+3NwWpFjsF(7$$\"+y!3)opFjsF(7$$\"+v%z>*pFjsF(7$$\"+C8-8qFjsF(7$$\"+= @/QqFjsF(7$$\"+7!Q#fqFjsF(7$$\"+wQ*Q3(FjsF(7$$\"+$\\=d5(FjsF(7$$\"+dNm HrFjsF(7$$\"+@\\Y_rFjsF(7$$\"+^dDwrFjsF(7$$\"+hJ5)>(FjsF(7$$\"+V&o;A(F jsF(7$$\"+`j9YsFjsF(7$$\"+eVXnsFjsF(7$$\"+(en/H(FjsF(7$$\"+0DC9tFjsF(7 $$\"+C;]PtFjsF(7$$\"+O#f(FjsF(7$$\"+1\"4 fh(FjsF(7$$\"+z7ERwFjsF(7$$\"+,&>2m(FjsF(7$$\"+WIJ&o(FjsF(7$$\"+-)4tq( FjsF(7$$\"+NHwIxFjsF(7$$\"+v0@`xFjsF(7$$\"+IOLxxFjsF(7S7$$\"+aV6yxFjsF [u7$$\"+P\">B!yFjsF[u7$$\"+*ezL#yFjsF[u7$$\"+qU1ZyFjsF[u7$$\"+\\f!4(yF jsF[u7$$\"+7Vj%*yFjsF[u7$$\"+UNj;zFjsF[u7$$\"+rCTRzFjsF[u7$$\"+s/(H'zF jsF[u7$$\"+@HX')zFjsF[u7$$\"+2vg5!)FjsF[u7$$\"+!)G)=.)FjsF[u7$$\"+5R$e 0)FjsF[u7$$\"+'G$))z!)FjsF[u7$$\"+:$fI5)FjsF[u7$$\"+q`5C\")FjsF[u7$$\" +l68\\\")FjsF[u7$$\"+'HJ.<)FjsF[u7$$\"+*3#*\\>)FjsF[u7$$\"+p5#o@)FjsF[ u7$$\"+?4xS#)FjsF[u7$$\"+Todj#)FjsF[u7$$\"+GCP(G)FjsF[u7$$\"+/UA4$)Fjs F[u7$$\"+)H%zK$)FjsF[u7$$\"++qFd$)FjsF[u7$$\"+l#*ey$)FjsF[u7$$\"+%42;S )FjsF[u7$$\"+knQD%)FjsF[u7$$\"+L0l[%)FjsF[u7$$\"+C%f6Z)FjsF[u7$$\"+6<: '\\)FjsF[u7$$\"+#R3'=&)FjsF[u7$$\"+$p&eU&)FjsF[u7$$\"+\"p7Vc)FjsF[u7$$ \"+Qg1)e)FjsF[u7$$\"+(3;/h)FjsF[u7$$\"+G$yPj)FjsF[u7$$\"+*=>ml)FjsF[u7 $$\"+a9`!o)FjsF[u7$$\"+1=c.()FjsF[u7$$\"+oO6F()FjsF[u7$$\"+40Z]()FjsF[ u7$$\"+?I$>x)FjsF[u7$$\"+![Jlz)FjsF[u7$$\"+NE`=))FjsF[u7$$\"+c/*>%))Fj sF[u7$$\"+$eUW'))FjsF[u7$$\"+g/d))))FjsF[u7S7$$\"+@6N*)))FjsF(7$$\"+1, c8*)FjsF(7$$\"+9UiM*)FjsF(7$$\"+2IJe*)FjsF(7$$\"+C)e@)*)FjsF(7$$\"+28* e+*FjsF(7$$\"+cV*y-*FjsF(7$$\"+Rsn]!*FjsF(7$$\"+H$RU2*FjsF(7$$\"+bes(4 *FjsF(7$$\"+MY)=7*FjsF(7$$\"++P;V\"*FjsF(7$$\"+)))=r;*FjsF(7$$\"+RC<\" >*FjsF(7$$\"+#\\_V@*FjsF(7$$\"++ASN#*FjsF(7$$\"+SBVg#*FjsF(7$$\"+_hj\" G*FjsF(7$$\"+D7I1$*FjsF(7$$\"+%*R8G$*FjsF(7$$\"+.!)3_$*FjsF(7$$\"+$)y* [P*FjsF(7$$\"+,wp)R*FjsF(7$$\"+rJb?%*FjsF(7$$\"+ct7W%*FjsF(7$$\"+3Vho% *FjsF(7$$\"+t-$**[*FjsF(7$$\"+)4_H^*FjsF(7$$\"+(*etO&*FjsF(7$$\"+.P+g& *FjsF(7$$\"+-l^#e*FjsF(7$$\"+GJ^2'*FjsF(7$$\"+3P(*H'*FjsF(7$$\"+q^&Rl* FjsF(7$$\"+Sfov'*FjsF(7$$\"+6MW*p*FjsF(7$$\"+Stz@(*FjsF(7$$\"+PO;X(*Fj sF(7$$\"+j%3!o(*FjsF(7$$\"+y[#>z*FjsF(7$$\"+H#f\\\")*FjsF(7$$\"+!=:&Q) *FjsF(7$$\"+vg(=')*FjsF(7$$\"+7BM$))*FjsF(7$$\"+U]%z!**FjsF(7$$\"+;+&* H**FjsF(7$$\"+4>T`**FjsF(7$$\"+Mz'e(**FjsF(7$F[uF(-%'COLOURG6&%$RGBG$ \"*++++\"!\")F(F(-%+AXESLABELSG6$Q\"x6\"Q!Fj\\o-%%VIEWG6$;F(F[u%(DEFAU LTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1 " }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "plot('ComplementFuncti on(x,3)',x=0..1,discont = true );" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG627S7$$\"\"!F)F(7$$\"+Q!)[m!)!#8F(7$$ \"+:'4&3:!#7F(7$$\"+-b#yH#F1F(7$$\"+)[tB4$F1F(7$$\"+D^9$)QF1F(7$$\"+f; H;YF1F(7$$\"+HCUv`F1F(7$$\"+el^ghF1F(7$$\"+zG4VpF1F(7$$\"+<)o![xF1F(7$ $\"+h?4d%)F1F(7$$\"+-VGb#*F1F(7$$\"++an05!#6F(7$$\"+c=\"H3\"FSF(7$$\"+ d*\\I:\"FSF(7$$\"+W4XO7FSF(7$$\"+>D528FSF(7$$\"+(4(G*Q\"FSF(7$$\"+uV.i 9FSF(7$$\"+n'\\=a\"FSF(7$$\"+,F&yh\"FSF(7$$\"+$*Q:(p\"FSF(7$$\"+Ur(*p< FSF(7$$\"+bo_[=FSF(7$$\"+Jz6I>FSF(7$$\"+-K9,?FSF(7$$\"+TC&y2#FSF(7$$\" +!f+r:#FSF(7$$\"+W%HYB#FSF(7$$\"+'fU'4BFSF(7$$\"+7>$HR#FSF(7$$\"+n5xnC FSF(7$$\"+RynZDFSF(7$$\"+^_3?EFSF(7$$\"+xcC*p#FSF(7$$\"+q%HPx#FSF(7$$ \"+%\\'e^GFSF(7$$\"+nfqFHFSF(7$$\"++gR2IFSF(7$$\"+tp9%3$FSF(7$$\"+Hfji JFSF(7$$\"+c\\ZSKFSF(7$$\"+R4+7LFSF(7$$\"+'yxRR$FSF(7$$\"+b))HnMFSF(7$ $\"+3WZXNFSF(7$$\"+(Q)H?OFSF(7$$\"+rpq+PFSF(7S7$$\"+F\\Q1PFS$\"\"\"F)7 $$\"+tM+(y$FSF[u7$$\"+R#\\r&QFSF[u7$$\"+*[Ng$RFSF[u7$$\"+[YW:SFSF[u7$$ \"+!RwW4%FSF[u7$$\"+J*[x;%FSF[u7$$\"+.%=OC%FSF[u7$$\"+?F3AVFSF[u7$$\"+ ,aH+WFSF[u7$$\"+cnu![%FSF[u7$$\"+a$3;b%FSF[u7$$\"+I%RNcFSF[u 7$$\"+k'yjq&FSF[u7$$\"+SQ/$y&FSF[u7$$\"+pkCieFSF[u7$$\"+!zI(RfFSF[u7$$ \"+a3q9gFSF[u7$$\"+GB%z4'FSF[u7$$\"+'\\QF<'FSF[u7$$\"+p$*f_iFSF[u7$$\" +!>l\\K'FSF[u7$$\"+Y,3/kFSF[u7$$\"+b6_ykFSF[u7$$\"+eMLclFSF[u7$$\"+2#4 Cj'FSF[u7$$\"+mM07nFSF[u7$$\"+`.w)y'FSF[u7$$\"+CU?noFSF[u7$$\"+T&)*\\% pFSF[u7$$\"+QM[;qFSF[u7$$\"+(>8%)4(FSF[u7$$\"+^@prrFSF[u7$$\"+*zA)\\sF SF[u7$$\"+*z.YK(FSF[u7$$\"+'>m\\S(FSF[u7S7$$\"+oNk5uFSF(7$$\"+d`B\"\\( FSF(7$$\"+UyNhvFSF(7$$\"+5z@SwFSF(7$$\"+92g>xFSF(7$$\"+Dig)z(FSF(7$$\" +ZW&=(yFSF(7$$\"+Q()pZzFSF(7$$\"+8q8E!)FSF(7$$\"+NPK/\")FSF(7$$\"+*Q[Z =)FSF(7$$\"+okeb#)FSF(7$$\"+nLLN$)FSF(7$$\"+:xS:%)FSF(7$$\"+'=uD\\)FSF (7$$\"+N([Ec)FSF(7$$\"+^T(fk)FSF(7$$\"+3[Kk*FSF(7$$\"+sL>=(*FSF(7$$\"+>sS,)*FSF(7 $$\"+i&yh()*FSF(7$$\"+HH,c**FSF(7$$\"+ta$G+\"!#5F(7$$\"+VVu55FgdlF(7$$ \"+tf==5FgdlF(7$$\"+@Y'f-\"FgdlF(7$$\"+r'pN.\"FgdlF(7$$\"+a9`T5FgdlF(7 $$\"+'f*>\\5FgdlF(7$$\"+!QTq0\"FgdlF(7$$\"+I#=[1\"FgdlF(7$$\"+ZV'>2\"F gdlF(7$$\"+/Y:!3\"FgdlF(7$$\"+n+[(3\"FgdlF(7$$\"+Q0H&4\"FgdlF(7$$\"+ch w-6FgdlF(7$$\"+H(*z56FgdlF(7S7$$\"+\"fn86\"FgdlF[u7$$\"+[XdN6FgdlF[u7$ $\"+\"*ojc6FgdlF[u7$$\"++PK!=\"FgdlF[u7$$\"+>v;/7FgdlF[u7$$\"+9!)*yA\" FgdlF[u7$$\"+?#**)\\7FgdlF[u7$$\"+%>!os7FgdlF[u7$$\"+5.C'H\"FgdlF[u7$$ \"+p[s>8FgdlF[u7$$\"+C;)QM\"FgdlF[u7$$\"+2*e^O\"FgdlF[u7$$\"+)37\"*Q\" FgdlF[u7$$\"+CO;89FgdlF[u7$$\"+NO]\"FgdlF[u7$$\"+lFGG:FgdlF[u7$$\"+0P6]:FgdlF[u7$ $\"+2d1u:FgdlF[u7$$\"+xO(of\"FgdlF[u7$$\"++9n?;FgdlF[u7$$\"+R^_U;FgdlF [u7$$\"+\\t4m;FgdlF[u7$$\"+^Ae!p\"FgdlF[u7$$\"+Hk*=r\"FgdlF[u7$$\"+Ej \"\\t\"FgdlF[u7$$\"+K\")pey\"FgdlF[u7$$\"+.\\Z/=Fgd lF[u7$$\"+M%p%H=FgdlF[u7$$\"+K\"G>&=FgdlF[u7$$\"+'e2f(=FgdlF[u7$$\"+Nl j(*=FgdlF[u7$$\"+;?R@>FgdlF[u7$$\"+sSuV>FgdlF[u7$$\"+6%3r'>FgdlF[u7$$ \"+B8&**)>FgdlF[u7$$\"+Nd'Q,#FgdlF[u7$$\"+c\")*o.#FgdlF[u7$$\"+L@Xg?Fg dlF[u7$$\"+s5\"Q3#FgdlF[u7$$\"+5bF0@FgdlF[u7$$\"+zh()H@FgdlF[u7$$\"+5$ z=:#FgdlF[u7$$\"+P#R`<#FgdlF[u7$$\"+\"Q$z(>#FgdlF[u7$$\"+DM#>A#FgdlF[u 7S7$$\"+t-YAAFgdlF(7$$\"+*\\?0B#FgdlF(7$$\"+eO`PAFgdlF(7$$\"+*o?aC#Fgd lF(7$$\"+++O`AFgdlF(7$$\"+x:EhAFgdlF(7$$\"+^teoAFgdlF(7$$\"+lFTQ#FgdlF(7$$\"+/R/#R#FgdlF(7$$\"+v0K* R#FgdlF(7$$\"+[%prS#FgdlF(7$$\"+AAK:CFgdlF(7$$\"+N#>CU#FgdlF(7$$\"+.U3 ICFgdlF(7$$\"+mG+QCFgdlF(7$$\"+K(\\dW#FgdlF(7$$\"+C_C`CFgdlF(7$$\"+*on :Y#FgdlF(7$$\"+%zX!pCFgdlF(7$$\"+o-.xCFgdlF(7$$\"+)QlU[#FgdlF(7$$\"+&G v@\\#FgdlF(7$$\"+#)yh*\\#FgdlF(7$$\"+SvR2DFgdlF(7$$\"+xN+:DFgdlF(7$$\" +%RmH_#FgdlF(7$$\"+LbjIDFgdlF(7$$\"+N$y%QDFgdlF(7$$\"+&>cia#FgdlF(7$$ \"+SKS`DFgdlF(7$$\"+gXfhDFgdlF(7$$\"+v4#*oDFgdlF(7$$\"+hCtwDFgdlF(7$$ \"+]!4Ue#FgdlF(7$$\"+mOC#f#FgdlF(7S7$$\"+5a#Gf#FgdlF[u7$$\"+Cs)3g#Fgdl F[u7$$\"+kh-n#FgdlF[u7$$\"+AtMxEFgdlF[u7$$\"+>YK&o#FgdlF[u7$$ \"+rYL$p#FgdlF[u7$$\"+TQ0,FFgdlF[u7$$\"+'ej!3FFgdlF[u7$$\"+_))R;FFgdlF [u7$$\"+:*fMs#FgdlF[u7$$\"+5OnJFFgdlF[u7$$\"+AT%*QFFgdlF[u7$$\"+E5#pu# FgdlF[u7$$\"+Dp^aFFgdlF[u7$$\"+\\CWiFFgdlF[u7$$\"+a0spFFgdlF[u7$$\"+t4 dxFFgdlF[u7$$\"+``s&y#FgdlF[u7$$\"+kP#Gz#FgdlF[u7$$\"+U-\\+GFgdlF[u7$$ \"+l/T3GFgdlF[u7$$\"+e)eh\"GFgdlF[u7$$\"+EelBGFgdlF[u7$$\"+J*z>$GFgdlF [u7$$\"+4&f%RGFgdlF[u7$$\"+cbWZGFgdlF[u7$$\"+,@oaGFgdlF[u7$$\"+cNfiGFg dlF[u7$$\"+>w.qGFgdlF[u7$$\"+5)=y(GFgdlF[u7$$\"+YjU&)GFgdlF[u7$$\"+J2R $*GFgdlF[u7$$\"+\"Qh5!HFgdlF[u7$$\"+Gd!*3HFgdlF[u7$$\"+?^o;HFgdlF[u7$$ \"+tN$Q#HFgdlF[u7$$\"+2l-KHFgdlF[u7$$\"+lVNRHFgdlF[u7$$\"+!Rnr%HFgdlF[ u7$$\"+_akaHFgdlF[u7$$\"+^;oiHFgdlF[u7S7$$\"+lJEjHFgdlF(7$$\"+K@KrHFgd lF(7$$\"+'>M$yHFgdlF(7$$\"+'**>i)HFgdlF(7$$\"+n!eT*HFgdlF(7$$\"+6%e?+$ FgdlF(7$$\"+TIQ4IFgdlF(7$$\"+qs'p,$FgdlF(7$$\"+#*3\"[-$FgdlF(7$$\"+e$H E.$FgdlF(7$$\"+7;nSIFgdlF(7$$\"+M_vZIFgdlF(7$$\"+9(Hd0$FgdlF(7$$\"+Rpt jIFgdlF(7$$\"+$Q`92$FgdlF(7$$\"+a1YyIFgdlF(7$$\"+wHz'3$FgdlF(7$$\"+Y:& Q4$FgdlF(7$$\"+UB1-JFgdlF(7$$\"+(GI$4JFgdlF(7$$\"+uVIjJFgdlF(7$$\"+wY&3<$FgdlF(7$$\"+-@xyJFgdlF(7$$\"+ fx^'=$FgdlF(7$$\"+!37S>$FgdlF(7$$\"+YKL-KFgdlF(7$$\"+%=5)4KFgdlF(7$$\" +6Mz)))HL$Fgd lF(7S7$$\"+M/dLLFgdlF[u7$$\"+*Rp^kdFgdlF[u7$$\"+$=(fJeFgd lF[u7$$\"+(Q:D'FgdlF[u7$$\"+IcO;jFgdlF[u7$$ \"+bT>!R'FgdlF[u7$$\"+psAckFgdlF[u7$$\"+TBjElFgdlF[u7$$\"+y*=Sf'FgdlF[ u7$$\"+A^VmmFgdlF[u7S7$$\"+C;+nmFgdlF(7$$\"+Q-1vmFgdlF(7$$\"+&*>2#o'Fg dlF(7$$\"+[u&**o'FgdlF(7$$\"+s^*yp'FgdlF(7$$\"+p^z0nFgdlF(7$$\"+y%>Jr' FgdlF(7$$\"+vLq?nFgdlF(7$$\"+_maGnFgdlF(7$$\"+wZOOnFgdlF(7$$\"+ymSWnFg dlF(7$$\"+*)**[^nFgdlF(7$$\"+?TYfnFgdlF(7$$\"+$*4ZnnFgdlF(7$$\"+*4(=vn FgdlF(7$$\"+iS>#y'FgdlF(7$$\"+?g_!z'FgdlF(7$$\"+!G%e(z'FgdlF(7$$\"+;Zz 0oFgdlF(7$$\"+UB18oFgdlF(7$$\"+!3O5#oFgdlF(7$$\"+k*G'GoFgdlF(7$$\"+U8b OoFgdlF(7$$\"+el#Q%oFgdlF(7$$\"+iQn^oFgdlF(7$$\"+0]#)foFgdlF(7$$\"+)f? p'oFgdlF(7$$\"+MSeuoFgdlF(7$$\"+86]#)oFgdlF(7$$\"+IkC!*oFgdlF(7$$\"+B/ u(*oFgdlF(7$$\"+C711pFgdlF(7$$\"+My`8pFgdlF(7$$\"+62_@pFgdlF(7$$\"+%Qa (GpFgdlF(7$$\"+*pim$pFgdlF(7$$\"+3Q5WpFgdlF(7$$\"+5>)=&pFgdlF(7$$\"+Fk [fpFgdlF(7$$\"+^wWnpFgdlF(7$$\"+c_6vpFgdlF(7$$\"+!\\cH)pFgdlF(7$$\"+%z K2*pFgdlF(7$$\"+5%yy*pFgdlF(7$$\"+#4og+(FgdlF(7$$\"+UIR8qFgdlF(7$$\"+m H?@qFgdlF(7$$\"+g!y'GqFgdlF(7$$\"+p5rOqFgdlF(7S7$$\"+vwFPqFgdlF[u7$$\" +P$R`/(FgdlF[u7$$\"+YPN_qFgdlF[u7$$\"+$=U-1(FgdlF[u7$$\"+4H=oqFgdlF[u7 $$\"+%*e3wqFgdlF[u7$$\"+tHT$3(FgdlF[u7$$\"+R(**44(FgdlF[u7$$\"+%)f%))4 (FgdlF[u7$$\"+lqm1rFgdlF[u7$$\"+3?r9rFgdlF[u7$$\"+**zz@rFgdlF[u7$$\"+Y ^xHrFgdlF[u7$$\"+[]yPrFgdlF[u7$$\"+tS]XrFgdlF[u7$$\"+(o8D:(FgdlF[u7$$ \"+'z[3;(FgdlF[u7$$\"+E(4z;(FgdlF[u7$$\"+nK7wrFgdlF[u7$$\"+UOR$=(FgdlF [u7$$\"+(Rq8>(FgdlF[u7$$\"+`h'*)>(FgdlF[u7$$\"+G:*o?(FgdlF[u7$$\"+'\\p T@(FgdlF[u7$$\"+o(>?A(FgdlF[u7$$\"+%*R3vFgdlF(7$$\"+7f\"f^(FgdlF(7$$\"+m_#H_(FgdlF(7$$ \"+l+EJvFgdlF(7$$\"+M2KQvFgdlF(7$$\"+qR`YvFgdlF(7$$\"+wS!Qb(FgdlF(7$$ \"+M0yhvFgdlF(7$$\"+3gPpvFgdlF(7$$\"+*3,td(FgdlF(7$$\"+(yyXe(FgdlF(7$$ \"+o(GCf(FgdlF(7$$\"+\"p#e+wFgdlF(7$$\"+12o2wFgdlF(7$$\"+cnM:wFgdlF(7$ $\"+OlEBwFgdlF(7$$\"+&\\95j(FgdlF(7$$\"+W5^QwFgdlF(7$$\"+%oMok(FgdlF(7 $$\"+WQJawFgdlF(7$$\"+X%*HiwFgdlF(7$$\"+&eN&pwFgdlF(7$$\"+)fYun(FgdlF( 7$$\"+X-*[o(FgdlF(7$$\"+,5n#p(FgdlF(7$$\"+7\"y-q(FgdlF(7$$\"+_?C3xFgdl F(7$$\"+tA\"fr(FgdlF(7$$\"+#=cPs(FgdlF(7$$\"+R^`JxFgdlF(7$$\"+$>$oQxFg dlF(7$$\"+pc(ou(FgdlF(7$$\"+)FgdlF[u7$$\"+U>%o@)FgdlF[u7$$\"+]RzS# )FgdlF[u7$$\"+F>gj#)FgdlF[u7$$\"+e'*R(G)FgdlF[u7$$\"+/MD4$)FgdlF[u7$$ \"+@c#GL)FgdlF[u7$$\"+H0Jd$)FgdlF[u7$$\"+9Ziy$)FgdlF[u7$$\"+=Yk,%)Fgdl F[u7$$\"+JkUD%)FgdlF[u7$$\"+'H#p[%)FgdlF[u7$$\"+;K?r%)FgdlF[u7$$\"+bx> '\\)FgdlF[u7$$\"+gkl=&)FgdlF[u7$$\"+@fjU&)FgdlF[u7$$\"+w[Ok&)FgdlF[u7$ $\"+k.7)e)FgdlF[u7$$\"+FCZ5')FgdlF[u7$$\"+un$Qj)FgdlF[u7$$\"+$pzml)Fgd lF[u7$$\"+7Tf!o)FgdlF[u7$$\"+Sli.()FgdlF[u7$$\"+C0=F()FgdlF[u7$$\"+q%R 0v)FgdlF[u7$$\"+:R+s()FgdlF[u7$$\"+\"f/mz)FgdlF[u7$$\"+Hxg=))FgdlF[u7$ $\"+jw1U))FgdlF[u7$$\"+9=_k))FgdlF[u7$$\"+l=l))))FgdlF[u7S7$$\"+2R?*)) )FgdlF(7$$\"+9\\E(*))FgdlF(7$$\"+a(yU!*)FgdlF(7$$\"+]l;7*)FgdlF(7$$\"+ Jm5?*)FgdlF(7$$\"+v*3!G*)FgdlF(7$$\"+faLN*)FgdlF(7$$\"+4;#H%*)FgdlF(7$ $\"+;sw]*)FgdlF(7$$\"+iwee*)FgdlF(7$$\"+_>jm*)FgdlF(7$$\"+ntrt*)FgdlF( 7$$\"+mQp\")*)FgdlF(7$$\"+=Jq*)*)FgdlF(7$$\"+::U(**)FgdlF(7$$\"+g0V/!* FgdlF(7$$\"+#*\\w7!*FgdlF(7$$\"+\\`#)>!*FgdlF(7$$\"+B#Q!G!*FgdlF(7$$\" +3!3`.*FgdlF(7$$\"+:TGV!*FgdlF(7$$\"+a#z30*FgdlF(7$$\"+&)R!)e!*FgdlF(7 $$\"+i83m!*FgdlF(7$$\"+(*4$R2*FgdlF(7$$\"+gX3#3*FgdlF(7$$\"+iA=*3*Fgdl F(7$$\"+uz%o4*FgdlF(7$$\"+/uw/\"*FgdlF(7$$\"+A]^7\"*FgdlF(7$$\"+T7,?\" *FgdlF(7$$\"+8XLG\"*FgdlF(7$$\"+WL\"e8*FgdlF(7$$\"+#f)zV\"*FgdlF(7$$\" +9W.^\"*FgdlF(7$$\"+y]%*e\"*FgdlF(7$$\"+'R)Qm\"*FgdlF(7$$\"+4)oT<*Fgdl F(7$$\"+%ev<=*FgdlF(7$$\"+t\"R(*=*FgdlF(7$$\"+c!4u>*FgdlF(7$$\"+=ED0#* FgdlF(7$$\"+K7.8#*FgdlF(7$$\"+r*y,A*FgdlF(7$$\"+'3r$G#*FgdlF(7$$\"+6#) pN#*FgdlF(7$$\"+b/^V#*FgdlF(7$$\"+px)4D*FgdlF(7$$\"+kJ-f#*FgdlF(7S7$$ \"+)>v&f#*FgdlF[u7$$\"+*ROwE*FgdlF[u7$$\"+2/lu#*FgdlF[u7$$\"+#RQDG*Fgd lF[u7$$\"+k'y/H*FgdlF[u7$$\"+)>\"Q)H*FgdlF[u7$$\"+eyq0$*FgdlF[u7$$\"+! >%H8$*FgdlF[u7$$\"+&)*R6K*FgdlF[u7$$\"+>1'*G$*FgdlF[u7$$\"+-^+P$*FgdlF [u7$$\"+(o!4W$*FgdlF[u7$$\"+yt1_$*FgdlF[u7$$\"+Ao2g$*FgdlF[u7$$\"+0azn $*FgdlF[u7$$\"+=Y![P*FgdlF[u7$$\"+]#RJQ*FgdlF[u7$$\"+x(*>!R*FgdlF[u7$$ \"+[GT)R*FgdlF[u7$$\"+3Go0%*FgdlF[u7$$\"+1\"fOT*FgdlF[u7$$\"+GWD@%*Fgd lF[u7$$\"+\\$z\"H%*FgdlF[u7$$\"+,pXO%*FgdlF[u7$$\"+CnIW%*FgdlF[u7$$\"+ $[gCX*FgdlF[u7$$\"+b$e&f%*FgdlF[u7$$\"+^UAn%*FgdlF[u7$$\"+sQ9v%*FgdlF[ u7$$\"+w;*G[*FgdlF[u7$$\"+u!)Q!\\*FgdlF[u7$$\"+Z:r)\\*FgdlF[u7$$\"+d0> 1&*FgdlF[u7$$\"+(*f<9&*FgdlF[u7$$\"+#*>T@&*FgdlF[u7$$\"+YGKH&*FgdlF[u7 $$\"+WjwO&*FgdlF[u7$$\"+VpaW&*FgdlF[u7$$\"+,R:_&*FgdlF[u7$$\"+\"o<,c*F gdlF[u7$$\"+[xyn&*FgdlF[u7$$\"+*\\Jcd*FgdlF[u7$$\"++.T$e*FgdlF[u7$$\"+ 5#e0f*FgdlF[u7$$\"+A0v)f*FgdlF[u7$$\"+By21'*FgdlF[u7$$\"+a-*Qh*FgdlF[u 7$$\"+[xO@'*FgdlF[u7$$\"+OLSH'*FgdlF[u7S7$$\"+qa&*H'*FgdlF(7$$\"+)Q@!Q '*FgdlF(7$$\"++&R]k*FgdlF(7$$\"++@$Hl*FgdlF(7$$\"+=q(3m*FgdlF(7$$\"+wT yo'*FgdlF(7$$\"+A^6w'*FgdlF(7$$\"+$*eq$o*FgdlF(7$$\"+!Gc:p*FgdlF(7$$\" +*[\"Q*p*FgdlF(7$$\"+!oIuq*FgdlF(7$$\"+6/_9(*FgdlF(7$$\"+p<]A(*FgdlF(7 $$\"+**e^I(*FgdlF(7$$\"+)**Q#Q(*FgdlF(7$$\"+8BDX(*FgdlF(7$$\"+A=f`(*Fg dlF(7$$\"+![c1w*FgdlF(7$$\"+cV()o(*FgdlF(7$$\"+q&[hx*FgdlF(7$$\"+M&HTy *FgdlF(7$$\"++$H*)*FgdlF(7$$\"+_4')**)* FgdlF(7$$\"+/)3t!**FgdlF(7$$\"+cR4:**FgdlF(7$$\"+l`qA**FgdlF(7$$\"+0Qn I**FgdlF(7$$\"+g$[$Q**FgdlF(7$$\"++n>Y**FgdlF(7$$\"+`+)R&**FgdlF(7$$\" +X@8h**FgdlF(7$$\"+]#H$p**FgdlF(7$$\"+R3mw**FgdlF(7$$\"+TyZ%)**FgdlF(7 $$\"+5(f>***FgdlF(7$F[uF(-%'COLOURG6&%$RGBG$\"*++++\"!\")F(F(-%+AXESLA BELSG6$Q\"x6\"Q!F[gs-%%VIEWG6$;F(F[u%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "plot('ComplementFunction(x,4)',x=0..1,discont = \+ true);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CUR VESG6:7S7$$\"\"!F)F(7$$\"+6]c%o#!#8F(7$$\"+t1R?]F-F(7$$\"+E4FZwF-F(7$$ \"+&Qc\"H5!#7F(7$$\"+!*)GBH\"F7F(7$$\"+#\\Bj`\"F7F(7$$\"+pd'*)y\"F7F(7 $$\"+t([-0#F7F(7$$\"+RQp5BF7F(7$$\"+.OfyDF7F(7$$\"+g)fX\"GF7F(7$$\"+x> ?!3$F7F(7$$\"+Z[$pM$F7F(7$$\"+\"R\")Rg$F7F(7$$\"+zUSPQF7F(7$$\"+pm'\\6 %F7F(7$$\"+A%)4]VF7F(7$$\"+[DhBYF7F(7$$\"+&*)=d'[F7F(7$$\"+HzMJ^F7F(7$ $\"+&e*G%Q&F7F(7$$\"+ow?[cF7F(7$$\"+boc!*eF7F(7$$\"+zR)>:'F7F(7$$\"+,H _BkF7F(7$$\"+J$)*)fmF7F(7$$\"+r->:pF7F(7$$\"+D=$*yrF7F(7$$\"+#[^pV(F7F (7$$\"+n()f'o(F7F(7$$\"+8&*yjzF7F(7$$\"+Fx&G@)F7F(7$$\"+47zy%)F7F(7$$ \"+okw>()F7F(7$$\"+wg@$)*)F7F(7$$\"+F;5J#*F7F(7$$\"+_M@!\\*F7F(7$$\"+A EaV(*F7F(7$$\"+za(3+\"!#6F(7$$\"+i&=k-\"F[sF(7$$\"+a+a_5F[sF(7$$\"+Z_W y5F[sF(7$$\"+H%\\A5\"F[sF(7$$\"+3<`H6F[sF(7$$\"+/L$R:\"F[sF(7$$\"+%\\] *z6F[sF(7$$\"+lA&[?\"F[sF(7$$\"+=EhJ7F[sF(7S7$$\"+4#yqB\"F[s$\"\"\"F)7 $$\"+&H#)QE\"F[sF[u7$$\"+)Q/sG\"F[sF[u7$$\"+>DV88F[sF[u7$$\"+3X$)R8F[s F[u7$$\"+856m8F[sF[u7$$\"+(ps/R\"F[sF[u7$$\"+4yp:9F[sF[u7$$\"+ccyT9F[s F[u7$$\"+S)*yn9F[sF[u7$$\"+Q$QX\\\"F[sF[u7$$\"+J%)4=:F[sF[u7$$\"+9:iW: F[sF[u7$$\"+/NDr:F[sF[u7$$\"+i$=pf\"F[sF[u7$$\"+6XA?;F[sF[u7$$\"+wx$zk \"F[sF[u7$$\"+ZXTr;F[sF[u7$$\"+8Os)p\"F[sF[u7$$\"+kn*Gs\"F[sF[u7$$\"+T &=%\\F[sF[u7$$\"+#fEv#>F[sF[u7$$ \"+9*fQ&>F[sF[u7$$\"+J>iz>F[sF[u7$$\"+3![X+#F[sF[u7$$\"+nTAK?F[sF[u7$$ \"+EC4d?F[sF[u7$$\"+,Yk$3#F[sF[u7$$\"+=[q2@F[sF[u7$$\"+!**3S8#F[sF[u7$ $\"+m\"f(e@F[sF[u7$$\"+K-j%=#F[sF[u7$$\"+FR#*4AF[sF[u7$$\"+#3/kB#F[sF[ u7$$\"+>w!>E#F[sF[u7$$\"+o'))zG#F[sF[u7$$\"+aP&QJ#F[sF[u7$$\"+\"3@wL#F [sF[u7$$\"+?6'[O#F[sF[u7$$\"+N\\A*Q#F[sF[u7$$\"+X=?:CF[sF[u7$$\"+h]1SC F[sF[u7$$\"+$)RymCF[sF[u7S7$$\"+='\\AZ#F[sF(7$$\"+>;-*\\#F[sF(7$$\"+&z :B_#F[sF(7$$\"+JD^[DF[sF(7$$\"+;H)[d#F[sF(7$$\"+nz7,EF[sF(7$$\"+!\\gai #F[sF(7$$\"+2al]EF[sF(7$$\"+F?rwEF[sF(7$$\"+#3&o-FF[sF(7$$\"+j:SHFF[sF (7$$\"+`M$Hv#F[sF(7$$\"+)yC%zFF[sF(7$$\"+**[-1GF[sF(7$$\"+N!f;$GF[sF(7 $$\"+'GP\\&GF[sF(7$$\"+yth#)GF[sF(7$$\"+Zg11HF[sF(7$$\"+BCMLHF[sF(7$$ \"+Qm[dHF[sF(7$$\"+om(R)HF[sF(7$$\"+U9?4IF[sF(7$$\"+Y3_NIF[sF(7$$\"+w- pfIF[sF(7$$\"+r-w&3$F[sF(7$$\"+o'RG6$F[sF(7$$\"+kBTOJF[sF(7$$\"+@:(=;$ F[sF(7$$\"+@L<)=$F[sF(7$$\"+,X!R@$F[sF(7$$\"+T2!)QKF[sF(7$$\"+qPWmKF[s F(7$$\"+iAG\"H$F[sF(7$$\"+aE!yJ$F[sF(7$$\"+qS$=M$F[sF(7$$\"+cn5oLF[sF( 7$$\"+0t#GR$F[sF(7$$\"+.um=MF[sF(7$$\"+@3$RW$F[sF(7$$\"+y#z.Z$F[sF(7$$ \"+(G_e\\$F[sF(7$$\"+<@!>_$F[sF(7$$\"+TitZNF[sF(7$$\"+=^ZrNF[sF(7$$\"+ ]Do)f$F[sF(7$$\"+-s,BOF[sF(7$$\"+;I'*[OF[sF(7$$\"+rkztOF[sF(7$$\"+5M[+ PF[sF(7S7$$\"+X$\\fq$F[sF[u7$$\"+xdc'y$F[sF[u7$$\"+.(4n&QF[sF[u7$$\"+% )QfNRF[sF[u7$$\"+h4+:SF[sF[u7$$\"+I1.%4%F[sF[u7$$\"+\\7InTF[sF[u7$$\"+ K(oJC%F[sF[u7$$\"+!*4j@VF[sF[u7$$\"+?;%)*R%F[sF[u7$$\"+m3H![%F[sF[u7$$ \"+01:^XF[sF[u7$$\"+))=#4j%F[sF[u7$$\"+?2-6ZF[sF[u7$$\"+(y5#)y%F[sF[u7 $$\"+inIe[F[sF[u7$$\"+dwlT\\F[sF[u7$$\"+)zmA,&F[sF[u7$$\"+9?S%4&F[sF[u 7$$\"+*f0r;&F[sF[u7$$\"+`H(oC&F[sF[u7$$\"+Q.$GK&F[sF[u7$$\"+,R3-aF[sF[ u7$$\"+6M'[Z&F[sF[u7$$\"+YfO`bF[sF[u7$$\"+#zF[sF(7$$\"+dZ@ZzF[sF(7$$\" +HSbtzF[sF(7$$\"+-I6L)F[sF(7$$\"+)z*)pN)F[sF(7$$\"+' GsAQ)F[sF(7$$\"+32u3%)F[sF(7$$\"+WHBM%)F[sF(7$$\"+PCIg%)F[sF(7$$\"+ig: '[)F[sF(7$$\"+eG\"*4&)F[sF(7$$\"+G39P&)F[sF(7$$\"+[Q\\h&)F[sF(7$$\"+Z# fue)F[sF(7$$\"+Z9J7')F[sF(7$$\"+I&=!R')F[sF(7S7$$\"+&HWZk)F[sF[u7$$\"+ t2ar')F[sF[u7$$\"+Yi&[p)F[sF[u7$$\"+Lp2@()F[sF[u7$$\"+G9ZZ()F[sF[u7$$ \"+u/ut()F[sF[u7$$\"+V_4)z)F[sF[u7$$\"+&>8L#))F[sF[u7$$\"+QOR\\))F[sF[ u7$$\"+S/Rv))F[sF[u7$$\"+Y88-*)F[sF[u7$$\"+^ZoD*)F[sF[u7$$\"+1.?_*)F[s F[u7$$\"+PZ#)y*)F[sF[u7$$\"+4B[/!*F[sF[u7$$\"+V=yF!*F[sF[u7$$\"+Us[b!* F[sF[u7$$\"+]t&*y!*F[sF[u7$$\"+k'ei5*F[sF[u7$$\"+`\\UI\"*F[sF[u7$$\"+- #Rp:*F[sF[u7$$\"+Qq=#=*F[sF[u7$$\"+10`3#*F[sF[u7$$\"+K?sK#*F[sF[u7$$\" +ie\")e#*F[sF[u7$$\"+=+#fG*F[sF[u7$$\"+lU^4$*F[sF[u7$$\"+)p'*\\L*F[sF[ u7$$\"+YDKh$*F[sF[u7$$\"+^s2(Q*F[sF[u7$$\"+`i*>T*F[sF[u7$$\"+cXmR%*F[s F[u7$$\"+cd_k%*F[sF[u7$$\"+&Rq5\\*F[sF[u7$$\"+#yB^^*F[sF[u7$$\"+)[?9a* F[sF[u7$$\"+RO;m&*F[sF[u7$$\"+ht-#f*F[sF[u7$$\"+xQJ<'*F[sF[u7$$\"+;lyV '*F[sF[u7$$\"+8GGp'*F[sF[u7$$\"+gkN&p*F[sF[u7$$\"+/U@@(*F[sF[u7$$\"+&y u\\u*F[sF[u7$$\"+#42Ax*F[sF[u7$$\"+#*Rc'z*F[sF[u7$$\"+GN`A)*F[sF[u7$$ \"+(o*QZ)*F[sF[u7$$\"+D55u)*F[sF[u7S7$$\"+$oE)z)*F[sF(7$$\"+!p*f1**F[s F(7$$\"+SZ*)H**F[sF(7$$\"+hC4c**F[sF(7$$\"+PQY#)**F[sF(7$$\"+()4(3+\"! #5F(7$$\"+JVI.5F`dnF(7$$\"+3l.\"F`dnF(7$$\"+'Hd\"R5F`dnF(7$$ \"+o)z;/\"F`dnF(7$$\"+2>JW5F`dnF(7$$\"+T*Gn/\"F`dnF(7$$\"+RgL\\5F`dnF( 7$$\"+!3W?0\"F`dnF(7$$\"+Q9Sa5F`dnF(7$$\"+\\u%p0\"F`dnF(7$$\"+Gxdf5F`d nF(7$$\"+V4:i5F`dnF(7$$\"+h1kk5F`dnF(7$$\"+n]Sn5F`dnF(7$$\"+5!*))p5F`d nF(7$$\"+\\6as5F`dnF(7$$\"+\"QW\\2\"F`dnF(7$$\"+[I15\"F`dnF(7$$\"+]P1.6F`dnF(7$$\"+H%ec5\"F`dnF(7$$\"+o=936 F`dnF(7$$\"+i1\"36\"F`dnF(7S7$$\"+LKQ66F`dnF[u7$$\"+N\"*eN6F`dnF[u7$$ \"+h0lc6F`dnF[u7$$\"+PjL!=\"F`dnF[u7$$\"+=\"zT?\"F`dnF[u7$$\"+y&3zA\"F `dnF[u7$$\"+D)3*\\7F`dnF[u7$$\"+2))os7F`dnF[u7$$\"+'*yC'H\"F`dnF[u7$$ \"+K9t>8F`dnF[u7$$\"+Mr)QM\"F`dnF[u7$$\"+!\\j^O\"F`dnF[u7$$\"+Gc6*Q\"F `dnF[u7$$\"+:h;89F`dnF[u7$$\"+;KMO9F`dnF[u7$$\"+W-Rd9F`dnF[u7$$\"+'>))3m;F`dnF[u7$$\"+aEd!p\"F`dnF[u7$$\"+.f)=r\"F`dnF[u7$$\"+( z/\\t\"F`dnF[u7$$\"+nboey\"F`dnF[u7$$\"+V.Y/=F`dnF[u 7$$\"+&y`%H=F`dnF[u7$$\"+/:\">&=F`dnF[u7$$\"+8**)e(=F`dnF[u7$$\"+:zh(* =F`dnF[u7$$\"+hBP@>F`dnF[u7$$\"+VMsV>F`dnF[u7$$\"+kn3n>F`dnF[u7$$\"+\" oG**)>F`dnF[u7$$\"+^?%Q,#F`dnF[u7$$\"+oM(o.#F`dnF[u7$$\"+>kUg?F`dnF[u7 $$\"+SVy$3#F`dnF[u7$$\"+VyC0@F`dnF[u7$$\"+Su%)H@F`dnF[u7$$\"+7'\\=:#F` dnF[u7$$\"+<&3`<#F`dnF[u7$$\"+$ohx>#F`dnF[u7$$\"+v1*=A#F`dnF[u7S7$$\"+ _MXAAF`dnF(7$$\"+SH8DAF`dnF(7$$\"+\\VYFAF`dnF(7$$\"+hi3IAF`dnF(7$$\"+a bsKAF`dnF(7$$\"+-BNNAF`dnF(7$$\"+MwyPAF`dnF(7$$\"+z#4.C#F`dnF(7$$\"+or \"HC#F`dnF(7$$\"+$p;bC#F`dnF(7$$\"+D1>[AF`dnF(7$$\"+Dea]AF`dnF(7$$\"+B s>`AF`dnF(7$$\"+2&feD#F`dnF(7$$\"+7^UeAF`dnF(7$$\"+E\\vgAF`dnF(7$$\"+, `_jAF`dnF(7$$\"+s@(eE#F`dnF(7$$\"+T@goAF`dnF(7$$\"+E'=5F#F`dnF(7$$\"+$ *)pOF#F`dnF(7$$\"+FX>wAF`dnF(7$$\"+<(G)yAF`dnF(7$$\"+DxC\"G#F`dnF(7$$ \"+`p&QG#F`dnF(7$$\"+2sc'G#F`dnF(7$$\"+\"\\E*)G#F`dnF(7$$\"+$eu9H#F`dn F(7$$\"+6q5%H#F`dnF(7$$\"+GBo'H#F`dnF(7$$\"+!3u\"*H#F`dnF(7$$\"+Y2%>I# F`dnF(7$$\"+=nU/BF`dnF(7$$\"+B532BF`dnF(7$$\"+>i[4BF`dnF(7$$\"+Ld67BF` dnF(7$$\"+,**e9BF`dnF(7$$\"+>h<BF`dnF(7$$\"+EI>NBF`dnF(7$$\"+k&GwL#F`dnF(7$$\"+j`ASBF`dnF(7$$\"+J3rUBF` dnF(7$$\"+1=QXBF`dnF(7S7$$\"+PX%fM#F`dnF[u7$$\"+qFi[BF`dnF[u7$$\"+'3`4 N#F`dnF[u7$$\"+qPd`BF`dnF[u7$$\"+E=@cBF`dnF[u7$$\"+Vt$)eBF`dnF[u7$$\"+ M:FhBF`dnF[u7$$\"+)*>zjBF`dnF[u7$$\"+l')RmBF`dnF[u7$$\"+sp**oBF`dnF[u7 $$\"+^'p;P#F`dnF[u7$$\"+ZP-uBF`dnF[u7$$\"+.RnwBF`dnF[u7$$\"+S\\LzBF`dn F[u7$$\"+U$**=Q#F`dnF[u7$$\"+l!GUQ#F`dnF[u7$$\"+Ur*pQ#F`dnF[u7$$\"+9HM *Q#F`dnF[u7$$\"+.;2#R#F`dnF[u7$$\"+cp[%R#F`dnF[u7$$\"+\")p8(R#F`dnF[u7 $$\"+J/m*R#F`dnF[u7$$\"+(Q$H-CF`dnF[u7$$\"+i7r/CF`dnF[u7$$\"+n#>tS#F`d nF[u7$$\"+_#G+T#F`dnF[u7$$\"+IkQ7CF`dnF[u7$$\"+GL$\\T#F`dnF[u7$$\"+BXc J_#F `dnF(7$$\"+vTvDDF`dnF(7$$\"+?K@e#F`dnF(7$$\"+=\\b%e#F `dnF(7$$\"+d<:(e#F`dnF(7$$\"+jsj*e#F`dnF(7$$\"+y#3Bf#F`dnF(7S7$$\"+G5( Gf#F`dnF[u7$$\"+KA$4g#F`dnF[u7$$\"+Vi%zg#F`dnF[u7$$\"+JU$eh#F`dnF[u7$$ \"+1XxBEF`dnF[u7$$\"+VqnJEF`dnF[u7$$\"+0P+REF`dnF[u7$$\"+S+fYEF`dnF[u7 $$\"+ReVaEF`dnF[u7$$\"+wkDiEF`dnF[u7$$\"+i4IqEF`dnF[u7$$\"+]lQxEF`dnF[ u7$$\"+WKO&o#F`dnF[u7$$\"+\"psLp#F`dnF[u7$$\"+x74,FF`dnF[u7$$\"+$\\+\" 3FF`dnF[u7$$\"+G^V;FF`dnF[u7$$\"+ec\\BFF`dnF[u7$$\"+K(3ZZGF`dnF[u7$$ \"+CzqaGF`dnF[u7$$\"+\"y=E'GF`dnF[u7$$\"+\"Gi+(GF`dnF[u7$$\"+$)G%y(GF` dnF[u7$$\"+W)\\a)GF`dnF[u7$$\"+FOT$*GF`dnF[u7$$\"+(p$3,HF`dnF[u7$$\"+^ u#*3HF`dnF[u7$$\"+biq;HF`dnF[u7$$\"+oT&Q#HF`dnF[u7$$\"+$[Y?$HF`dnF[u7$ $\"+(yt$RHF`dnF[u7$$\"+@i=ZHF`dnF[u7$$\"+=PmaHF`dnF[u7$$\"+4$*piHF`dnF [u7S7$$\"+Q?EjHF`dnF(7$$\"+u(Rf'HF`dnF(7$$\"+e'p#oHF`dnF(7$$\"+c)*)3(H F`dnF(7$$\"+Au_tHF`dnF(7$$\"+_C:wHF`dnF(7$$\"+\">'eyHF`dnF(7$$\"+(=16) HF`dnF(7$$\"+rBr$)HF`dnF(7$$\"+'>5j)HF`dnF(7$$\"+zB)*))HF`dnF(7$$\"+Rg L\"*HF`dnF(7$$\"+.d)R*HF`dnF(7$$\"+Yik'*HF`dnF(7$$\"+t,@**HF`dnF(7$$\" +k%Q:+$F`dnF(7$$\"+FqI/IF`dnF(7$$\"+jBl1IF`dnF(7$$\"+Y0Q4IF`dnF(7$$\"+ ^az6IF`dnF(7$$\"+%)\\W9IF`dnF(7$$\"+mz'p,$F`dnF(7$$\"+M/g>IF`dnF(7$$\" +gy,AIF`dnF(7$$\"+#QDY-$F`dnF(7$$\"+jQLFIF`dnF(7$$\"+0;pHIF`dnF(7$$\"+ I!QA.$F`dnF(7$$\"+O(o[.$F`dnF(7$$\"+pBWPIF`dnF(7$$\"+\"\\K*RIF`dnF(7$$ \"+[tpUIF`dnF(7$$\"+%p\"=XIF`dnF(7$$\"+kU$y/$F`dnF(7$$\"+')yB]IF`dnF(7 $$\"+\"olG0$F`dnF(7$$\"+I#Q`0$F`dnF(7$$\"+dF#z0$F`dnF(7$$\"+0'\\/1$F`d nF(7$$\"+!)\\4jIF`dnF(7$$\"+!zUc1$F`dnF(7$$\"+&H[#oIF`dnF(7$$\"+CA$32$ F`dnF(7$$\"+(e1K2$F`dnF(7$$\"+vy#f2$F`dnF(7$$\"+F=OyIF`dnF(7$$\"+Gp&43 $F`dnF(7$$\"+q2W$3$F`dnF(7$$\"+)**4h3$F`dnF(7S7$$\"+HFn'3$F`dnF[u7$$\" +#>_$*3$F`dnF[u7$$\"+zNo\"4$F`dnF[u7$$\"+naI%4$F`dnF[u7$$\"+NZ%p4$F`dn F[u7$$\"+f9d*4$F`dnF[u7$$\"+on+-JF`dnF[u7$$\"+!RGX5$F`dnF[u7$$\"+bi82J F`dnF[u7$$\"+cdt4JF`dnF[u7$$\"+i'4C6$F`dnF[u7$$\"+T[w9JF`dnF[u7$$\"+9i TWx7$F`dnF[u7$$\"+Y54IJF`dnF[u7$$\"+*)4#G8$F`dnF[u7$$\"+_uBNJF`dnF [u7$$\"+%p))y8$F`dnF[u7$$\"+/LTSJF`dnF[u7$$\"+pu/VJF`dnF[u7$$\"+ckYXJF `dnF[u7$$\"+fc2[JF`dnF[u7$$\"+))ey]JF`dnF[u7$$\"+]^9`JF`dnF[u7$$\"+=Kp bJF`dnF[u7$$\"+AcKeJF`dnF[u7$$\"+:4!4;$F`dnF[u7$$\"+WERjJF`dnF[u7$$\"+ $Gfh;$F`dnF[u7$$\"+K_koJF`dnF[u7$$\"+8&*HrJF`dnF[u7$$\"+(o/P<$F`dnF[u7 $$\"+wTLwJF`dnF[u7$$\"+@$3)yJF`dnF[u7$$\"+:XR\"=$F`dnF[u7$$\"+$*H#R=$F `dnF[u7$$\"+u+d'=$F`dnF[u7$$\"+H&>\"*=$F`dnF[u7$$\"+9ns\">$F`dnF[u7$$ \"+5BJ%>$F`dnF[u7$$\"+0#)o'>$F`dnF[u7$$\"+[7T*>$F`dnF[u7$$\"+qn%=?$F`d nF[u7$$\"+XNW/KF`dnF[u7$$\"+!**Gp?$F`dnF[u7$$\"+S**f4KF`dnF[u7S7$$\"+* pi,@$F`dnF(7$$\"+')3%G@$F`dnF(7$$\"+h6<:KF`dnF(7$$\"++=z[STF`dnF[u7$$\"+O*H$eUF`dnF[u7$$\"+?+!eP%F`dnF[ u7$$\"+RCj'\\%F`dnF[u7$$\"++<1.YF`dnF[u7$$\"+Te(Gs%F`dnF[u7$$\"+\\>=V[ F`dnF[u7$$\"+x\">\"f\\F`dnF[u7$$\"+(G,W1&F`dnF[u7$$\"+**=f*=&F`dnF[u7$ $\"+oZk&H&F`dnF[u7$$\"+n%4!>aF`dnF[u7$$\"+H\"3#GbF`dnF[u7$$\"+oj,[cF`d nF[u7$$\"+W@5idF`dnF[u7$$\"+$oQ6)eF`dnF[u7$$\"+&Q^/*fF`dnF[u7$$\"+,*f$ 3hF`dnF[u7$$\"+8P$3B'F`dnF[u7$$\"+DvWPjF`dnF[u7$$\"+jLf_kF`dnF[u7$$\"+ B=27lF`dnF[u7$$\"+#G]:d'F`dnF[u7$$\"+;Vk+mF`dnF[u7$$\"+]$Q(HmF`dnF[u7$ $\"+n`GWmF`dnF[u7$$\"+%QK)emF`dnF[u7$$\"+Q\"pCm'F`dnF[u7$$\"+#*e5mmF`d nF[u7$$\"+YEupmF`dnF(7$$\"+,%zLn'F`dnF(7$$\"+4Hl!o'F`dnF(7$$\"+=k#zo'F `dnF(7$$\"+#Rwgr'F`dnF(7$$\"+mjAWnF`dnF(7$$\"+`8IenF`dnF(7$$\"+SjPsnF` dnF(7$$\"+MQTznF`dnF(7$$\"+F8X'y'F`dnF(7$$\"+u+(**y'F`dnF(7$$\"+@))[$z 'F`dnF[u7$$\"+nv+(z'F`dnF[u7$$\"+9j_+oF`dnF[u7$$\"+h?yJoF`dnF[u7$$\"+2 y.joF`dnF[u7$$\"+\"ol'yoF`dnF[u7$$\"+aNH%*oF`dnF[u7$$\"+\"\\2@!pF`dnF[ u7$$\"+F9#*4pF`dnF[u7$$\"+'RGQ\"pF`dnF(7$$\"+k`tZ!)4uF`dnF(7$$\"+M')H8uF`dnF(7$$\"+&HusU (F`dnF(7$$\"+d*\\7W(F`dnF(7$$\"+z7?puF`dnF(7$$\"+-E:(\\(F`dnF(7$$\"+&> h<^(F`dnF(7$$\"+)ypj_(F`dnF(7$$\"+O>-IvF`dnF(7$$\"+%3uO`(F`dnF[u7$$\"+ KiKPvF`dnF[u7$$\"+\"Qy4a(F`dnF[u7$$\"+xEG[vF`dnF[u7$$\"+upebvF`dnF[u7$ $\"+gT![e(F`dnF[u7$$\"+Y8-9wF`dnF[u7$$\"+:RIGwF`dnF[u7$$\"+&['eUwF`dnF [u7$$\"+Er:YwF`dnF[u7$$\"+pxs\\wF`dnF[u7$$\"+6%)H`wF`dnF[u7$$\"+a!pol( F`dnF(7$$\"+R.,kwF`dnF(7$$\"+D;:rwF`dnF(7$$\"+knr*p(F`dnF(7$$\"+0>GGxF `dnF(7$$\"+JWBVxF`dnF(7$$\"+ep=exF`dnF(7$$\"+@KmlxF`dnF(7$$\"+&[RJx(F` dnF(7$$\"+;w(ox(F`dnF(7$$\"+[dh!y(F`dnF[u7$$\"+!)QN%y(F`dnF[u7$$\"+7?4 )y(F`dnF[u7$$\"+mq*z\"yF`dnF[u7$$\"+@@!z%yF`dnF[u7$$\"+jj]0zF`dnF[u7$$ \"+116jzF`dnF[u7$$\"+Az#43)F`dnF[u7$$\"+^'px>)F`dnF[u7$$\"+l]80$)F`dnF [u7$$\"+Yz=G%)F`dnF[u7$$\"+5zCQ&)F`dnF[u7$$\"+'y%fb')F`dnF[u7$$\"+?2\" zw)F`dnF[u7$$\"+I&4'))))F`dnF[u7S7$$\"+?@=*)))F`dnF(7$$\"+4&f=*))F`dnF (7$$\"+\"4*=%*))F`dnF(7$$\"+]*3o*))F`dnF(7$$\"+uhW**))F`dnF(7$$\"+l32- *)F`dnF(7$$\"+*G/X!*)F`dnF(7$$\"+eR-2*)F`dnF(7$$\"+/)H'4*)F`dnF(7$$\"+ $HFA\"*)F`dnF(7$$\"+I\"**[\"*)F`dnF(7$$\"+&[_s\"*)F`dnF(7$$\"+0=!*>*)F `dnF(7$$\"+/?cA*)F`dnF(7$$\"+*fD^#*)F`dnF(7$$\"+)e`u#*)F`dnF(7$$\"+$z@ -$*)F`dnF(7$$\"+DocK*)F`dnF(7$$\"+bYHN*)F`dnF(7$$\"+Z#4x$*)F`dnF(7$$\" +P%e.%*)F`dnF(7$$\"+$4\")G%*)F`dnF(7$$\"+>K^X*)F`dnF(7$$\"+K.$z%*)F`dn F(7$$\"+;v`]*)F`dnF(7$$\"+ZcC`*)F`dnF(7$$\"+$3.c&*)F`dnF(7$$\"+y\"\\\" e*)F`dnF(7$$\"+W&z2'*)F`dnF(7$$\"+VGNj*)F`dnF(7$$\"+VE%e'*)F`dnF(7$$\" +Trgo*)F`dnF(7$$\"+m64r*)F`dnF(7$$\"+#RVP(*)F`dnF(7$$\"+.n9w*)F`dnF(7$ $\"+dTxy*)F`dnF(7$$\"+(QY7)*)F`dnF(7$$\"+z0$Q)*)F`dnF(7$$\"+*4dj)*)F`d nF(7$$\"+K@+*)*)F`dnF(7$$\"+7'\\:**)F`dnF(7$$\"+zZ:%**)F`dnF(7$$\"+u$Q n**)F`dnF(7$$\"+HC6***)F`dnF(7$$\"+kL$=+*F`dnF(7$$\"+,qE/!*F`dnF(7$$\" +m<'o+*F`dnF(7$$\"+(GX$4!*F`dnF(7$$\"+pT,7!*F`dnF(7S7$$\"+Rne7!*F`dnF[ u7$$\"+0kE:!*F`dnF[u7$$\"+ozf#z-*F`dnF[u7$$\"+^PWI!*F`dnF[u7$$\"+ 8=0L!*F`dnF[u7$$\"+6:lN!*F`dnF[u7$$\"+>cKQ!*F`dnF[u7$$\"+w4oS!*F`dnF[u 7$$\"+\\DLV!*F`dnF[u7$$\"+6]*f/*F`dnF[u7$$\"+&yg&[!*F`dnF[u7$$\"+b2*30 *F`dnF[u7$$\"+88m`!*F`dnF[u7$$\"+S$3g0*F`dnF[u7$$\"+!\\Q(e!*F`dnF[u7$$ \"+N^:h!*F`dnF[u7$$\"+yl!Q1*F`dnF[u7$$\"+z8Lm!*F`dnF[u7$$\"+Wd'*o!*F`d nF[u7$$\"+8\\Qr!*F`dnF[u7$$\"+9V*R2*F`dnF[u7$$\"+[Zqw!*F`dnF[u7$$\"+*= k!z!*F`dnF[u7$$\"+\\Ch\"3*F`dnF[u7$$\"+_]C%3*F`dnF[u7$$\"+S0#o3*F`dnF[ u7$$\"+dCJ*3*F`dnF[u7$$\"+1$z?4*F`dnF[u7$$\"+Vac%4*F`dnF[u7$$\"+D*>s4* F`dnF[u7$$\"+!GD'*4*F`dnF[u7$$\"+p\\D-\"*F`dnF[u7$$\"+,$HZ5*F`dnF[u7$$ \"+\"p:t5*F`dnF[u7$$\"+fV%)4\"*F`dnF[u7$$\"+T;\\7\"*F`dnF[u7$$\"+)GT]6 *F`dnF[u7$$\"+r'[w6*F`dnF[u7$$\"+jWB?\"*F`dnF[u7$$\"+P0hA\"*F`dnF[u7$$ \"+'yL`7*F`dnF[u7$$\"+$\\px7*F`dnF[u7$$\"+kkOI\"*F`dnF[u7$$\"+(4_G8*F` dnF[u7$$\"+\\K_N\"*F`dnF[u7S7$$\"+le4O\"*F`dnF(7$$\"+O^xQ\"*F`dnF(7$$ \"+cj5T\"*F`dnF(7$$\"+c!GP9*F`dnF(7$$\"+MrOY\"*F`dnF(7$$\"+qO**[\"*F`d nF(7$$\"+/)G9:*F`dnF(7$$\"+X-&R:*F`dnF(7$$\"+Azbc\"*F`dnF(7$$\"+Ps:f\" *F`dnF(7$$\"+_4$=;*F`dnF(7$$\"+hf=k\"*F`dnF(7$$\"+Wr$o;*F`dnF(7$$\"+8# *\\p\"*F`dnF(7$$\"+4Y1s\"*F`dnF(7$$\"+NURu\"*F`dnF(7$$\"+'Qkr<*F`dnF(7 $$\"+m5^z\"*F`dnF(7$$\"+93C#=*F`dnF(7$$\"+.rl%=*F`dnF(7$$\"+b\"3t=*F`d nF(7$$\"+%eK)*=*F`dnF(7$$\"+glY#>*F`dnF(7$$\"+t`)[>*F`dnF(7$$\"+*Q%\\( >*F`dnF(7$$\"+CW?+#*F`dnF(7$$\"+7_#G*F`dnF[u7$$\"+a>Y!H*F`dnF[u7$$\"+[\\O)H*F`d nF[u7$$\"+N?p0$*F`dnF[u7$$\"+4)yKJ*F`dnF[u7$$\"+i]7@$*F`dnF[u7$$\"+_h% *G$*F`dnF[u7$$\"+/6*pL*F`dnF[u7$$\"+-r2W$*F`dnF[u7$$\"+eU0_$*F`dnF[u7$ $\"+oT1g$*F`dnF[u7$$\"+,Kyn$*F`dnF[u7$$\"+BGzu$*F`dnF[u7$$\"+Tz7$Q*F`d nF[u7$$\"+z))=!R*F`dnF[u7$$\"+HCS)R*F`dnF[u7$$\"+7Gn0%*F`dnF[u7$$\"+v& \\OT*F`dnF[u7$$\"+R`C@%*F`dnF[u7$$\"+B2Rw(*F`dnF[u7$$\"+*ym!z(*F`dnF[u7$$\"+fFU\" y*F`dnF[u7$$\"+C]2%y*F`dnF[u7$$\"+z\"Qny*F`dnF[u7$$\"+AYI*y*F`dnF[u7$$ \"+*>N;z*F`dnF[u7$$\"+![1Wz*F`dnF[u7$$\"+=Tv'z*F`dnF[u7$$\"+!)\\[*z*F` dnF[u7$$\"+bA!>!)*F`dnF[u7$$\"+*QaX!)*F`dnF[u7$$\"+[)zq!)*F`dnF[u7$$\" +**[r4)*F`dnF[u7$$\"+*pM@\")*F`dnF[u7$$\"+zZu9)*F`dnF[u7$$\"+?fX<)*F`d nF[u7$$\"+wf\")>)*F`dnF[u7$$\"++\\OA)*F`dnF[u7$$\"+*=)*\\#)*F`dnF[u7$$ \"+\\VdF)*F`dnF[u7$$\"+:p1I)*F`dnF[u7$$\"+&[MG$)*F`dnF[u7$$\"+q7KN)*F` dnF[u7$$\"+Wk(z$)*F`dnF[u7$$\"+ECQS)*F`dnF[u7$$\"++G,V)*F`dnF[u7$$\"+x x[X)*F`dnF[u7$$\"+T[2[)*F`dnF[u7$$\"+pTg])*F`dnF[u7$$\"+T@D`)*F`dnF[u7 $$\"+_C!e&)*F`dnF[u7$$\"+90Te)*F`dnF[u7$$\"+!)p*4')*F`dnF[u7$$\"+uOPj) *F`dnF[u7$$\"+Lw4m)*F`dnF[u7$$\"+uR`o)*F`dnF[u7$$\"+A;8r)*F`dnF[u7$$\" +.zht)*F`dnF[u7$$\"+^(*Gw)*F`dnF[u7S7$$\"+Cj$o()*F`dnF(7$$\"+U4_z)*F`d nF(7$$\"+8o&=))*F`dnF(7$$\"+XP[%))*F`dnF(7$$\"+!4Gr))*F`dnF(7$$\"+m)f( *))*F`dnF(7$$\"+g)*>#*)*F`dnF(7$$\"+Kjs%*)*F`dnF(7$$\"+9#Rt*)*F`dnF(7$ $\"+:P%***)*F`dnF(7$$\"+lFi-**F`dnF(7$$\"+uC)\\!**F`dnF(7$$\"+[*Qw!**F `dnF(7$$\"+HjI5**F`dnF(7$$\"+Wo(G\"**F`dnF(7$$\"+>6@:**F`dnF(7$$\"+(z' )z\"**F`dnF(7$$\"+h\"Q.#**F`dnF(7$$\"+cL2B**F`dnF(7$$\"+nW\\D**F`dnF(7 $$\"+43:G**F`dnF(7$$\"+v-oI**F`dnF(7$$\"+3&>L$**F`dnF(7$$\"+ZJuN**F`dn F(7$$\"+qtNQ**F`dnF(7$$\"+7G2T**F`dnF(7$$\"+8mVV**F`dnF(7$$\"+#e*)f%** F`dnF(7$$\"+\\qi[**F`dnF(7$$\"+(H27&**F`dnF(7$$\"+=Qq`**F`dnF(7$$\"+!y vk&**F`dnF(7$$\"+6l'*e**F`dnF(7$$\"+)*eih**F`dnF(7$$\"+)pNS'**F`dnF(7$ $\"+Y-nm**F`dnF(7$$\"+]\"\\\"p**F`dnF(7$$\"+>.ur**F`dnF(7$$\"+gOFu**F` dnF(7$$\"+Me#p(**F`dnF(7$$\"+#>![z**F`dnF(7$$\"+$R#4#)**F`dnF(7$$\"+jH o%)**F`dnF(7$$\"+GM1()**F`dnF(7$$\"+4B#***F`dnF(7$ $\"+'oL[***F`dnF(7$$\"+7RK(***F`dnF(7$F[uF(-%'COLOURG6&%$RGBG$\"*++++ \"!\")F(F(-%+AXESLABELSG6$Q\"x6\"Q!F__y-%%VIEWG6$;F(F[u%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 46.000000 45.000000 0 0 "Curve 1" }}}} {PARA 0 "" 0 "" {TEXT -1 96 "As we can see, the cantor set occupies le ss and less space on the interval [0,1], as advertised." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 447 "Our next topic of i nterest is the Cantor Function. This function is obtained from a limit of a sequence of functions directly obtained from the construction of the Cantor Set. The construction is as follows, we start with the fir st step of the construction of the Cantor Set where we have removed th e middle third of the interval [0,1]. We define our first function to \+ be 1/2 on that segment removed, (1/3,2/3). We define this function to \+ be 0 at " }{TEXT 340 1 "x" }{TEXT -1 13 "=0, and 1 at " }{TEXT 341 1 " x" }{TEXT -1 110 "=1. For the rest of the values, we simple make the s traight line connections, so that our function looks like:" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7W7$$\"\"!F)F)7$$\"+;arz@!#6$\"+CJdpKF-7$$ \"+XTFwSF-$\"+=7T9hF-7$$\"+\"z_\"4iF-$\"+'=HPJ*F-7$$\"+S&phN)F-$\"+JaU `7!#57$$\"+*=)H\\5F?$\"+%GZRd\"F?7$$\"+[!3uC\"F?$\"+s?6r=F?7$$\"+J$RDX \"F?$\"+'**3)y@F?7$$\"+)R'ok;F?$\"+(fHq\\#F?7$$\"+1J:w=F?$\"+f'HU\"GF? 7$$\"+3En$4#F?$\"+7*309$F?7$$\"+/RE&G#F?$\"+ce*yU$F?7$$\"+D.&4]#F?$\"+ )[D9v$F?7$$\"+vB_Y2aF?Fip7$$\"+yXu9cF?Fip7$$\"+\\y))GeF ?Fip7$$\"+i_QQgF?Fip7$$\"+!y%3TiF?Fip7$$\"+O![hY'F?Fip7$$\"+4FEnlF?Fip 7$$\"+#Qx$omF?$\"+tgc-]F?7$$\"+y)Qjx'F?$\"+<$3X;&F?7$$\"+u.I%)oF?$\"+h 0XE`F?7$$\"+(pe*zqF?$\"+Y!Q*>cF?7$$\"+C\\'QH(F?$\"+'Q(zSfF?7$$\"+8S8& \\(F?$\"+?5qUiF?7$$\"+0#=bq(F?$\"+3tFelF?7$$\"+2s?6zF?$\"+53\"o'oF?7$$ \"+IXaE\")F?$\"+&z;)*=(F?7$$\"+l*RRL)F?$\"+[*44](F?7$$\"+`<.Y&)F?$\"+I w/>yF?7$$\"+8tOc()F?$\"+q4bM\")F?7$$\"+\\Qk\\*)F?$\"+udYC%)F?7$$\"+p0; r\"*F?$\"+a3uc()F?7$$\"+lxGp$*F?$\"+[;$R0*F?7$$\"+!oK0e*F?$\"+?!*zq$*F ?7$$\"+<5s#y*F?$\"+E:3u'*F?7$$\"\"\"F)Fdy-%'COLOURG6&%$RGBG$\"#5!\"\"F (F(-%+AXESLABELSG6$Q\"x6\"Q!Faz-%%VIEWG6$;F(Fdy%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" }}{TEXT -1 0 " " }}{PARA 0 "" 0 "" {TEXT -1 423 "This is the first function in our se quence. For the next function, we consider all of the segments removed up to the second step of the Cantor Set construction, which are (1/9, 2/9),(1/3,2/3), and (7/9,8/9). We define our function to be 1/4 on the first segment, 1/2 on the second, and 3/4 on the third. We let it be \+ 0 at 0 and 1 at 1, and make the straight line connections everywhere e lse, so that our function looks like:" }}{PARA 0 "" 0 "" {TEXT -1 0 " " }}{PARA 0 "" 0 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7 _p7$$\"\"!F)F)7$$\"+;arz@!#6$\"+'ofV!\\F-7$$\"+XTFwSF-$\"+Eohr\"*F-7$$ \"+\"z_\"4iF-$\"+y$fqR\"!#57$$\"+S&phN)F-$\"+Y\"Q,)=F:7$$\"+:ddC%*F-$ \"+O&H07#F:7$$\"+*=)H\\5F:$\"+D4#4O#F:7$$\"+A>1u5F:$\"+C$RmT#F:7$$\"+a c#))4\"F:$\"+AxNsCF:7$$\"+'Q*eB6F:$\"+++++DF:7$$\"+=JN[6F:FW7$$\"+$e!) y>\"F:FW7$$\"+[!3uC\"F:FW7$$\"+!pt*\\8F:FW7$$\"+J$RDX\"F:FW7$$\"+)R'ok ;F:FW7$$\"+1J:w=F:FW7$$\"+dG\"\\)>F:FW7$$\"+3En$4#F:FW7$$\"+K/dT@F:FW7 $$\"+c#o%*=#F:FW7$$\"+orT8AF:FW7$$\"+!3mtB#F:$\"+!otS`#F:7$$\"+#*\\JhA F:$\"+K(eze#F:7$$\"+/RE&G#F:$\"+%yV=k#F:7$$\"+9r5$R#F:$\"+15\\%)GF:7$$ \"+D.&4]#F:$\"+J#Qr7$F:7$$\"+vB_Y2aF:Fgs7$$\"+yXu9cF:F gs7$$\"+\\y))GeF:Fgs7$$\"+i_QQgF:Fgs7$$\"+!y%3TiF:Fgs7$$\"+O![hY'F:Fgs 7$$\"+4FEnlF:Fgs7$$\"+#Qx$omF:$\"+5\"\\Q+&F:7$$\"+y)Qjx'F:$\"+wCwY_F:7 $$\"+u.I%)oF:$\"+Uen*[&F:7$$\"+(pe*zqF:$\"+oq!*HfF:7$$\"+C\\'QH(F:$\"+ zg>6kF:7$$\"+8S8&\\(F:$\"+H:0koF:7$$\"+3hK+wF:$\"+VPt+rF:7$$\"+0#=bq(F :$\"+hfTPtF:7$$\"+I$H7t(F:$\"+#*fE&R(F:7$$\"+b/%pv(F:$\"+Cg6`uF:7$$\"+ =gzpxF:$\"+S5/#[(F:7$$\"+\"e^Ey(F:$\"+++++vF:7$$\"+Vr]&z(F:Ffz7$$\"+1F O3yF:Ffz7$$\"+d\\yfyF:Ffz7$$\"+2s?6zF:Ffz7$$\"+pe()=!)F:Ffz7$$\"+IXaE \")F:Ffz7$$\"+l*RRL)F:Ffz7$$\"+`<.Y&)F:Ffz7$$\"+K&*>^')F:Ffz7$$\"+8tOc ()F:Ffz7$$\"+Yko/))F:Ffz7$$\"+!e0I&))F:Ffz7$$\"+Z^;x))F:Ffz7$$\"+9ZK,* )F:$\"+11)z_(F:7$$\"+\"G%[D*)F:$\"+K'RBe(F:7$$\"+\\Qk\\*)F:$\"+g')pOwF :7$$\"+3ASg!*F:$\"+o\\!f)yF:7$$\"+p0;r\"*F:$\"+!G6^8)F:7$$\"+lxGp$*F:$ \"+ru*3e)F:7$$\"+!oK0e*F:$\"+I&)>c!*F:7$$\"+<5s#y*F:$\"+)GA6^*F:7$$\" \"\"F)Fh_l-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!Fe` l-%%VIEWG6$;F(Fh_l%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 1 1.000000 45.000000 44.000000 0 0 "Curve 1" }}{TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 298 "We then proceed as such. What we will get is a sequence \+ of uniformly convergent continuous functions that must converge to a c ontinuous function. We call this limiting function the Cantor Function , which has very interesting properties. We have constructed our seque nce of functions so that at the " }{TEXT 342 1 "k" }{TEXT -1 142 "th s tep of the construction of the Cantor Set, all of our functions after \+ this step are all fixed constants on each segment removed up to the " }{TEXT 343 1 "k" }{TEXT -1 874 "th step of the construction. Thus, our limiting function will be constant on all of the segments removed in \+ the construction of the Cantor Set, which has measure 1. On each of th ese segments, the Cantor Function is differentiable and has derivative zero. Thus, the Cantor Function is differentiable almost everywhere o n [0,1] with derivative zero. However, the Cantor Function is a limit \+ of increasing functions, and so must be non-decreasing. In fact, each \+ function in our sequence leading up to the Cantor Function has value 0 at 0 and 1 at 1, thus the value of the Cantor Function is 0 at 0 and \+ 1 at 1. Thus, we have managed to produce a function that is differenti able almost everywhere on [0,1] with derivative 0, and yet it manages \+ to climb up from 0 all the way up to one! As Jason Lee remarked, if yo u blink on a set of measure zero, the Cantor Function is up there." }} {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 170 "Let us n ow write a program which gives us our sequence of functions which lead up to the Cantor Function. The main obstacle is the same as the one i n the program for the " }{TEXT 344 18 "ComplementFunction" }{TEXT -1 204 ", which is that our sequence of functions are defined piecewise b ut how many pieces and where they start and end changes at each step. \+ However, we use the same technique of using sums here as was used in \+ " }{TEXT 345 19 "ComplementFunction." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 108 "Thus, firstly we make a function which accounts for the places where our sequence of functions are constant: " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 106 "cfsteps:=proc(x,i,k)\ni f cantorpoint(2*i,k) < x and x <= cantorpoint(2*i+1,k)\nthen i/(2^k) e lse 0 \nfi end ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(cfstepsGf*6%%\" xG%\"iG%\"kG6\"F*F*@%32-%,cantorpointG6$,$9%\"\"#9&9$1F5-F/6$,&F2F3\" \"\"F:F4*&F2F:)F3F4!\"\"\"\"!F*F*F*" }}}{PARA 0 "" 0 "" {TEXT -1 9 "fo r each " }{TEXT 346 1 "k" }{TEXT -1 2 ", " }{TEXT 347 7 "cfsteps" } {TEXT -1 36 " draws each individual piece of our " }{TEXT 348 1 "k" } {TEXT -1 146 "th function where it is constant. To get a function that is constant on all of the appropriate segements, we simply do as befo re and take a sum: " }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 62 "cfallsteps:= (x,k) -> sum('cfsteps(x,i,k)', 'i'=1..(( 2^k)-1));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%+cfallstepsGf*6$%\"xG% \"kG6\"6$%)operatorG%&arrowGF)-%$sumG6$.-%(cfstepsG6%9$%\"iG9%/.F5;\" \"\",&)\"\"#F6F:F:!\"\"F)F)F)" }}}{PARA 0 "" 0 "" {TEXT -1 17 "Now, fo r a fixed " }{TEXT 349 1 "k" }{TEXT -1 231 ", we must make all of the \+ straight line connections. Again, we make each piece seperately. Since each piece is a line, we can readibly come up with a formula based on the cantor points. First we make some preliminary definitions: " } {MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 85 "cflinepa rt1:= (x,i,k) -> ((3^k)/((2^k)(cantorpoint(2*i,k)-cantorpoint(2*i-1,k) )))*x\n;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%,cflinepart1Gf*6%%\"xG% \"iG%\"kG6\"6$%)operatorG%&arrowGF**()\"\"$9&\"\"\"-)\"\"#F16#,&-%,can torpointG6$,$9%F5F1F2-F96$,&F " 0 "" {MPLTEXT 1 0 130 "cflinepart2:= (i,k) ->\n(3^k)*(((i -1)*cantorpoint(2*i,k)-i*cantorpoint(2*i-1,k))/((2^k)(cantorpoint(2*i, k)-cantorpoint(2*i-1,k))));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%,cfli nepart2Gf*6$%\"iG%\"kG6\"6$%)operatorG%&arrowGF)*()\"\"$9%\"\"\",&*&,& 9$F1F1!\"\"F1-%,cantorpointG6$,$F5\"\"#F0F1F1*&F5F1-F86$,&F5F;F1F6F0F1 F6F1-)F;F06#,&F7F1F=F6F6F)F)F)" }}}{PARA 0 "" 0 "" {TEXT -1 29 " and n ow we define each line:" }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 135 "cfline:=proc(x,i,k) \nif cantorpoint(2*i-1,k) < x \+ and x <= cantorpoint(2*i,k)\nthen cflinepart1(x,i,k)+cflinepart2(i,k) \+ else 0 \nfi end ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'cflineGf*6%% \"xG%\"iG%\"kG6\"F*F*@%32-%,cantorpointG6$,&9%\"\"#\"\"\"!\"\"9&9$1F7- F/6$,$F2F3F6,&-%,cflinepart1G6%F7F2F6F4-%,cflinepart2G6$F2F6F4\"\"!F*F *F*" }}}{PARA 0 "" 0 "" {TEXT -1 51 "We are now ready to define our se quence. We define " }{TEXT 350 19 "CantorFunction(x,k)" }{TEXT -1 74 " to be our sequence of functions, and we use the same trick of using s ums:" }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 78 "C antorFunction:=(x,k)->sum('cfline(x,i,k)','i'=1..(2^(k)))+'cfallsteps( x,k)' ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%/CantorFunctionGf*6$%\"xG %\"kG6\"6$%)operatorG%&arrowGF),&-%$sumG6$.-%'cflineG6%9$%\"iG9%/.F6; \"\"\")\"\"#F7F;.-%+cfallstepsG6$F5F7F;F)F)F)" }}}{PARA 0 "" 0 "" {TEXT -1 29 "Let us plot this for several " }{TEXT 351 1 "k" }{TEXT -1 2 ": " }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "plot('CantorFunction(x,1)',x=0..1);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7W7$$\"\"!F)F)7$$\"+;arz@!#6$\" +CJdpKF-7$$\"+XTFwSF-$\"+=7T9hF-7$$\"+\"z_\"4iF-$\"+'=HPJ*F-7$$\"+S&ph N)F-$\"+JaU`7!#57$$\"+*=)H\\5F?$\"+%GZRd\"F?7$$\"+[!3uC\"F?$\"+s?6r=F? 7$$\"+J$RDX\"F?$\"+'**3)y@F?7$$\"+)R'ok;F?$\"+(fHq\\#F?7$$\"+1J:w=F?$ \"+f'HU\"GF?7$$\"+3En$4#F?$\"+7*309$F?7$$\"+/RE&G#F?$\"+ce*yU$F?7$$\"+ D.&4]#F?$\"+)[D9v$F?7$$\"+vB_Y2aF?Fip7$$\"+yXu9cF?Fip7$ $\"+\\y))GeF?Fip7$$\"+i_QQgF?Fip7$$\"+!y%3TiF?Fip7$$\"+O![hY'F?Fip7$$ \"+4FEnlF?Fip7$$\"+#Qx$omF?$\"+tgc-]F?7$$\"+y)Qjx'F?$\"+<$3X;&F?7$$\"+ u.I%)oF?$\"+h0XE`F?7$$\"+(pe*zqF?$\"+Y!Q*>cF?7$$\"+C\\'QH(F?$\"+'Q(zSf F?7$$\"+8S8&\\(F?$\"+?5qUiF?7$$\"+0#=bq(F?$\"+3tFelF?7$$\"+2s?6zF?$\"+ 53\"o'oF?7$$\"+IXaE\")F?$\"+&z;)*=(F?7$$\"+l*RRL)F?$\"+[*44](F?7$$\"+` <.Y&)F?$\"+Iw/>yF?7$$\"+8tOc()F?$\"+q4bM\")F?7$$\"+\\Qk\\*)F?$\"+udYC% )F?7$$\"+p0;r\"*F?$\"+a3uc()F?7$$\"+lxGp$*F?$\"+[;$R0*F?7$$\"+!oK0e*F? $\"+?!*zq$*F?7$$\"+<5s#y*F?$\"+E:3u'*F?7$$\"\"\"F)Fdy-%'COLOURG6&%$RGB G$\"#5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!Faz-%%VIEWG6$;F(Fdy%(DEFAULTG " 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }} }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "plot('CantorFunction(x,2)' ,x=0..1);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%' CURVESG6$7_p7$$\"\"!F)F)7$$\"+;arz@!#6$\"+'ofV!\\F-7$$\"+XTFwSF-$\"+Eo hr\"*F-7$$\"+\"z_\"4iF-$\"+y$fqR\"!#57$$\"+S&phN)F-$\"+Y\"Q,)=F:7$$\"+ :ddC%*F-$\"+O&H07#F:7$$\"+*=)H\\5F:$\"+D4#4O#F:7$$\"+A>1u5F:$\"+C$RmT# F:7$$\"+ac#))4\"F:$\"+AxNsCF:7$$\"+'Q*eB6F:$\"+++++DF:7$$\"+=JN[6F:FW7 $$\"+$e!)y>\"F:FW7$$\"+[!3uC\"F:FW7$$\"+!pt*\\8F:FW7$$\"+J$RDX\"F:FW7$ $\"+)R'ok;F:FW7$$\"+1J:w=F:FW7$$\"+dG\"\\)>F:FW7$$\"+3En$4#F:FW7$$\"+K /dT@F:FW7$$\"+c#o%*=#F:FW7$$\"+orT8AF:FW7$$\"+!3mtB#F:$\"+!otS`#F:7$$ \"+#*\\JhAF:$\"+K(eze#F:7$$\"+/RE&G#F:$\"+%yV=k#F:7$$\"+9r5$R#F:$\"+15 \\%)GF:7$$\"+D.&4]#F:$\"+J#Qr7$F:7$$\"+vB_Y2aF:Fgs7$$ \"+yXu9cF:Fgs7$$\"+\\y))GeF:Fgs7$$\"+i_QQgF:Fgs7$$\"+!y%3TiF:Fgs7$$\"+ O![hY'F:Fgs7$$\"+4FEnlF:Fgs7$$\"+#Qx$omF:$\"+5\"\\Q+&F:7$$\"+y)Qjx'F:$ \"+wCwY_F:7$$\"+u.I%)oF:$\"+Uen*[&F:7$$\"+(pe*zqF:$\"+oq!*HfF:7$$\"+C \\'QH(F:$\"+zg>6kF:7$$\"+8S8&\\(F:$\"+H:0koF:7$$\"+3hK+wF:$\"+VPt+rF:7 $$\"+0#=bq(F:$\"+hfTPtF:7$$\"+I$H7t(F:$\"+#*fE&R(F:7$$\"+b/%pv(F:$\"+C g6`uF:7$$\"+=gzpxF:$\"+S5/#[(F:7$$\"+\"e^Ey(F:$\"+++++vF:7$$\"+Vr]&z(F :Ffz7$$\"+1FO3yF:Ffz7$$\"+d\\yfyF:Ffz7$$\"+2s?6zF:Ffz7$$\"+pe()=!)F:Ff z7$$\"+IXaE\")F:Ffz7$$\"+l*RRL)F:Ffz7$$\"+`<.Y&)F:Ffz7$$\"+K&*>^')F:Ff z7$$\"+8tOc()F:Ffz7$$\"+Yko/))F:Ffz7$$\"+!e0I&))F:Ffz7$$\"+Z^;x))F:Ffz 7$$\"+9ZK,*)F:$\"+11)z_(F:7$$\"+\"G%[D*)F:$\"+K'RBe(F:7$$\"+\\Qk\\*)F: $\"+g')pOwF:7$$\"+3ASg!*F:$\"+o\\!f)yF:7$$\"+p0;r\"*F:$\"+!G6^8)F:7$$ \"+lxGp$*F:$\"+ru*3e)F:7$$\"+!oK0e*F:$\"+I&)>c!*F:7$$\"+<5s#y*F:$\"+)G A6^*F:7$$\"\"\"F)Fh_l-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELSG6$Q \"x6\"Q!Fe`l-%%VIEWG6$;F(Fh_l%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 35 "plot('CantorFunction(x,3)',x=0..1);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7eq7$$\"\"!F)F)7 $$\"+;arz@!#6$\"+H&RlN(F-7$$\"+!y%*z7$F-$\"+Q#)pb5!#57$$\"+XTFwSF-$\"+ +++]7F57$$\"+oMrU^F-F97$$\"+\"z_\"4iF-F97$$\"+zp!fu'F-F97$$\"+m6m#G(F- F97$$\"+``T>yF-$\"+#o_!*Q\"F57$$\"+S&phN)F-$\"+?s?q:F57$$\"+:ddC%*F-$ \"+/VzI>F57$$\"+*=)H\\5F5$\"+)Q\"Q\"H#F57$$\"+A>1u5F5$\"+()*e\\P#F57$$ \"+ac#))4\"F5$\"+#eO&eCF57$$\"+'Q*eB6F5$\"+++++DF57$$\"+=JN[6F5Fbo7$$ \"+$e!)y>\"F5Fbo7$$\"+[!3uC\"F5Fbo7$$\"+!pt*\\8F5Fbo7$$\"+J$RDX\"F5Fbo 7$$\"+)R'ok;F5Fbo7$$\"+1J:w=F5Fbo7$$\"+dG\"\\)>F5Fbo7$$\"+3En$4#F5Fbo7 $$\"+K/dT@F5Fbo7$$\"+c#o%*=#F5Fbo7$$\"+7FW,AF5Fbo7$$\"+orT8AF5Fbo7$$\" +C;RDAF5$\"+Jnp5DF57$$\"+!3mtB#F5$\"+?06^DF57$$\"+#*\\JhAF5$\"+)4Q>j#F 57$$\"+/RE&G#F5$\"+wcw7FF57$$\"+9r5$R#F5$\"+5ltwIF57$$\"+D.&4]#F5$\"+Z tqSMF57$$\"+PL4bDF5$\"+7+WBOF57$$\"+]jB4EF5$\"++++]PF57$$\"+j$zLm#F5Fa t7$$\"+vB_Y2aF5Fav7$$\"+yX u9cF5Fav7$$\"+\\y))GeF5Fav7$$\"+i_QQgF5Fav7$$\"+!y%3TiF5Fav7$$\"+O![hY 'F5Fav7$$\"+4FEnlF5Fav7$$\"+#Qx$omF5$\"+kOx0]F57$$\"+y)Qjx'F5$\"+8P9q` F57$$\"+u.I%)oF5$\"+iP^MdF57$$\"+N&H@)pF5$\"+\"=(okgF57$$\"+(pe*zqF5$ \"++++]iF57$$\"+5=\"p=(F5F][l7$$\"+C\\'QH(F5F][l7$$\"+'>#=WtF5F][l7$$ \"+o%*\\%R(F5F][l7$$\"+Sn\"[W(F5$\"+)\\ciP'F57$$\"+8S8&\\(F5$\"+%Hxga' F57$$\"+3hK+wF5$\"+915,pF57$$\"+0#=bq(F5$\"+UR7csF57$$\"+I$H7t(F5$\"+* )*)*GM(F57$$\"+b/%pv(F5$\"+OSnHuF57$$\"+=gzpxF5$\"+h:1tuF57$$\"+\"e^Ey (F5$\"+++++vF57$$\"+Vr]&z(F5Fa^l7$$\"+1FO3yF5Fa^l7$$\"+d\\yfyF5Fa^l7$$ \"+2s?6zF5Fa^l7$$\"+pe()=!)F5Fa^l7$$\"+IXaE\")F5Fa^l7$$\"+l*RRL)F5Fa^l 7$$\"+`<.Y&)F5Fa^l7$$\"+K&*>^')F5Fa^l7$$\"+8tOc()F5Fa^l7$$\"+Yko/))F5F a^l7$$\"+!e0I&))F5Fa^l7$$\"+Z^;x))F5Fa^l7$$\"+9ZK,*)F5$\"+54(>a(F57$$ \"+\"G%[D*)F5$\"+[%4Ni(F57$$\"+\\Qk\\*)F5$\"+!*z/0xF57$$\"+3ASg!*F5$\" +_u&)y!)F57$$\"+p0;r\"*F5$\"+?pm_%)F57$$\"+nBp?#*F5$\"+Rn$)>')F57$$\"+ mTAq#*F5$\"++++]()F57$$\"+lfv>$*F5F[cl7$$\"+lxGp$*F5F[cl7$$\"+A-\"\\Z* F5F[cl7$$\"+!oK0e*F5F[cl7$$\"+[oi\"o*F5$\"+71\\D*)F57$$\"+<5s#y*F5$\"+ KMom#*F57$$\"\"\"F)Fddl-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELSG6 $Q\"x6\"Q!Fael-%%VIEWG6$;F(Fddl%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 35 "plot('CantorFunction(x,4)',x=0..1);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7gr7$$\"\"!F)F)7 $$\"+;arz@!#6$\"++++]iF-7$$\"+!y%*z7$F-$\"+uNZ&e*F-7$$\"+XTFwSF-$\"+++ +]7!#57$$\"+oMrU^F-F87$$\"+\"z_\"4iF-F87$$\"+zp!fu'F-F87$$\"+m6m#G(F-F 87$$\"+``T>yF-$\"+A!z&e9F:7$$\"+S&phN)F-$\"+I3JI1u5F:$\"+![QCJ#F:7$$\"+ac#))4\"F:$\"+t[!yV#F:7$$\"+(e; ]5\"F:$\"+sk9pCF:7$$\"+?v?66F:$\"+++++DF:7$$\"+`%)R<6F:Fbo7$$\"+'Q*eB6 F:Fbo7$$\"+_7(f8\"F:Fbo7$$\"+=JN[6F:Fbo7$$\"+$e!)y>\"F:Fbo7$$\"+[!3uC \"F:Fbo7$$\"+!pt*\\8F:Fbo7$$\"+J$RDX\"F:Fbo7$$\"+)R'ok;F:Fbo7$$\"+1J:w =F:Fbo7$$\"+dG\"\\)>F:Fbo7$$\"+3En$4#F:Fbo7$$\"+K/dT@F:Fbo7$$\"+c#o%*= #F:Fbo7$$\"+7FW,AF:Fbo7$$\"+orT8AF:Fbo7$$\"+'R/%>AF:Fbo7$$\"+C;RDAF:$ \"+'4Xg^#F:7$$\"+_)y8B#F:$\"+QaNYDF:7$$\"+!3mtB#F:$\"+!ylmd#F:7$$\"+#* \\JhAF:$\"+Zr!zp#F:7$$\"+/RE&G#F:$\"+9&[\">GF:7$$\"+D.&4]#F:$\"+?51'G$ F:7$$\"+PL4bDF:$\"+>+;gNF:7$$\"+]jB4EF:$\"++++]PF:7$$\"+j$zLm#F:F]u7$$ \"+vB_aZ F:7$$\"+347TLF:$\"+++++]F:7$$\"+qxdOMF:F[y7$$\"+LY.KNF:F[y7$$\"+\"o7Tv $F:F[y7$$\"+$Q*o]RF:F[y7$$\"+\"=lj;%F:F[y7$$\"+V&RY2aF :F[y7$$\"+yXu9cF:F[y7$$\"+\\y))GeF:F[y7$$\"+i_QQgF:F[y7$$\"+!y%3TiF:F[ y7$$\"+O![hY'F:F[y7$$\"+4FEnlF:F[y7$$\"+#Qx$omF:$\"+'\\g'3]F:7$$\"+I\" eBs'F:$\"+L!Q>G&F:7$$\"+y)Qjx'F:$\"+qb@bbF:7$$\"+rk3$y'F:$\"+f_P*e&F:7 $$\"+lS$)*y'F:$\"+a\\`BcF:7$$\"+e;e'z'F:$\"++++DcF:7$$\"+_#HL!oF:F\\^l 7$$\"+RW#o\"oF:F\\^l7$$\"+E'>.$oF:F\\^l7$$\"+++JdoF:F\\^l7$$\"+u.I%)oF :F\\^l7$$\"+N&H@)pF:$\"+r2.sfF:7$$\"+(pe*zqF:$F/F:7$$\"+5=\"p=(F:Fe_l7 $$\"+C\\'QH(F:Fe_l7$$\"+'>#=WtF:Fe_l7$$\"+o%*\\%R(F:Fe_l7$$\"+Sn\"[W(F :$\"+YZQRkF:7$$\"+8S8&\\(F:$\"+Tf6%p'F:7$$\"+0#=bq(F:$\"+8f=MrF:7$$\"+ b/%pv(F:$\"+`5^%R(F:7$$\"+1FO3yF:$\"+++++vF:7$$\"+d\\yfyF:Fial7$$\"+2s ?6zF:Fial7$$\"+pe()=!)F:Fial7$$\"+IXaE\")F:Fial7$$\"+l*RRL)F:Fial7$$\" +`<.Y&)F:Fial7$$\"+K&*>^')F:Fial7$$\"+8tOc()F:Fial7$$\"+Yko/))F:Fial7$ $\"+!e0I&))F:Fial7$$\"+k`3l))F:Fial7$$\"+Z^;x))F:Fial7$$\"+S]?$)))F:Fi al7$$\"+J\\C*)))F:$\"+jC!=](F:7$$\"+B[G&*))F:$\"+;%zB`(F:7$$\"+9ZK,*)F :$\"+lj&Hc(F:7$$\"+\"G%[D*)F:$\"+tTE&o(F:7$$\"+\\Qk\\*)F:$\"+')>d2yF:7 $$\"+p0;r\"*F:$\"+\"Q+SI)F:7$$\"+nBp?#*F:$\"+3^va&)F:7$$\"+mTAq#*F:$\" ++++]()F:7$$\"+lfv>$*F:Fhfl7$$\"+lxGp$*F:Fhfl7$$\"+A-\"\\Z*F:Fhfl7$$\" +!oK0e*F:Fhfl7$$\"+[oi\"o*F:$\"+=fB8!*F:7$$\"+<5s#y*F:$\"++++v$*F:7$$ \"\"\"F)Fahl-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!F ^il-%%VIEWG6$;F(Fahl%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "plot('CantorFunction(x,5)',x=0..1);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7_r7$$\"\"!F)F)7$$ \"+;arz@!#6$\"++++]iF-7$$\"+!y%*z7$F-$\"++++v$*F-7$$\"+XTFwSF-$\"++++] 7!#57$$\"+oMrU^F-F87$$\"+\"z_\"4iF-F87$$\"+zp!fu'F-F87$$\"+m6m#G(F-F87 $$\"+f#Q5b(F-$\"+y'p!f8F:7$$\"+``T>yF-$\"+++]i:F:7$$\"+**Qg`zF-FO7$$\" +YCz(3)F-FO7$$\"+>n)[:)F-FO7$$\"+$*4)>A)F-FO7$$\"+m_2*G)F-$\"+Il,2;F:7 $$\"+S&phN)F-$\"+Wi'zl\"F:7$$\"+*=)H\\5F:$\"+++](=#F:7$$\"+ac#))4\"F:$ \"+5tq1CF:7$$\"+=JN[6F:$\"+++++DF:7$$\"+$e!)y>\"F:F^p7$$\"+[!3uC\"F:F^ p7$$\"+!pt*\\8F:F^p7$$\"+J$RDX\"F:F^p7$$\"+)R'ok;F:F^p7$$\"+1J:w=F:F^p 7$$\"+dG\"\\)>F:F^p7$$\"+3En$4#F:F^p7$$\"+K/dT@F:F^p7$$\"+c#o%*=#F:F^p 7$$\"+!3mtB#F:$\"+q')*\\h#F:7$$\"+/RE&G#F:$\"+++]7GF:7$$\"+D.&4]#F:$\" +I:fmLF:7$$\"+PL4bDF:$\"+G+ClMF:7$$\"+]jB4EF:$\"++++]PF:7$$\"+j$zLm#F: Fes7$$\"+vB_Y2aF:F[w7$$\"+yXu9cF:F[w7$$\"+\\y))G eF:F[w7$$\"+i_QQgF:F[w7$$\"+!y%3TiF:F[w7$$\"+O![hY'F:F[w7$$\"+4FEnlF:F [w7$$\"+#Qx$omF:$\"+X2*H,&F:7$$\"+I\"eBs'F:$\"+++]7`F:7$$\"+y)Qjx'F:$ \"+bLK?bF:7$$\"+rk3$y'F:$\"+*)GcrbF:7$$\"+lS$)*y'F:$\"+JC!Gi&F:7$$\"+e ;e'z'F:$\"++++DcF:7$$\"+_#HL!oF:F\\\\l7$$\"+RW#o\"oF:F\\\\l7$$\"+E'>.$ oF:F\\\\l7$$\"+++JdoF:F\\\\l7$$\"+u.I%)oF:F\\\\l7$$\"+N&H@)pF:$\"+++]P fF:7$$\"+(pe*zqF:$F/F:7$$\"+5=\"p=(F:Fe]l7$$\"+C\\'QH(F:Fe]l7$$\"+'>#= WtF:Fe]l7$$\"+o%*\\%R(F:Fe]l7$$\"+/\"e'>uF:$\"+F(GIM'F:7$$\"+Sn\"[W(F: $\"+>r2MlF:7$$\"+w`(*puF:$\"+++]ilF:7$$\"+8S8&\\(F:$\"+6Rn.mF:7$$\"+0# =bq(F:$\"+++](=(F:7$$\"+b/%pv(F:$\"+!em^')F:Fc`l7$$\"+8tOc()F: Fc`l7$$\"+Yko/))F:Fc`l7$$\"+!e0I&))F:Fc`l7$$\"+9ZK,*)F:$\"+ZXV%f(F:7$$ \"+\\Qk\\*)F:$\"+++]7yF:7$$\"+p0;r\"*F:$\"+r0]$R)F:7$$\"+=Na$=*F:$\"++ +]P%)F:7$$\"+ok#f>*F:Fecl7$$\"+=%4$3#*F:Fecl7$$\"+nBp?#*F:$\"+iE8d%)F: 7$$\"+n#eaC*F:$\"+:()>X')F:7$$\"+mTAq#*F:$\"++++]()F:7$$\"+lfv>$*F:Fjd l7$$\"+lxGp$*F:Fjdl7$$\"+A-\"\\Z*F:Fjdl7$$\"+!oK0e*F:Fjdl7$$\"+[oi\"o* F:$\"+++]i!*F:7$$\"+<5s#y*F:$F4F:7$$\"\"\"F)Fbfl-%'COLOURG6&%$RGBG$\"# 5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!F_gl-%%VIEWG6$;F(Fbfl%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "plot('CantorFunction(x,6)',x =0..1);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CU RVESG6$7cq7$$\"\"!F)F)7$$\"+;arz@!#6$\"++++]iF-7$$\"+!y%*z7$F-$\"++++v $*F-7$$\"+XTFwSF-$\"++++]7!#57$$\"+oMrU^F-F87$$\"+\"z_\"4iF-F87$$\"+zp !fu'F-F87$$\"+m6m#G(F-F87$$\"+``T>yF-$\"+++]i:F:7$$\"+S&phN)F-$\"+n$*p 0\"F:Fhn7$$\"+[!3uC\"F:Fhn7$$\"+!pt*\\8F:Fhn7$$ \"+J$RDX\"F:Fhn7$$\"+)R'ok;F:Fhn7$$\"+1J:w=F:Fhn7$$\"+dG\"\\)>F:Fhn7$$ \"+3En$4#F:Fhn7$$\"+K/dT@F:Fhn7$$\"+c#o%*=#F:Fhn7$$\"+!3mtB#F:$\"+++Dc EF:7$$\"+/RE&G#F:$\"+++]7GF:7$$\"+D.&4]#F:$\"+'HP6L$F:7$$\"+PL4bDF:$\" +U+6zMF:7$$\"+]jB4EF:$\"++++]PF:7$$\"+j$zLm#F:F_r7$$\"+vB_Y2aF:Feu7$$\"+yXu9cF:Feu7$$\"+\\y))GeF:Feu7$$\"+i_QQgF:Feu7$$ \"+!y%3TiF:Feu7$$\"+O![hY'F:Feu7$$\"+4FEnlF:Feu7$$\"+#Qx$omF:$\"+] F:7$$\"+I\"eBs'F:$\"+++]7`F:7$$\"+y)Qjx'F:$\"+++voaF:7$$\"+rk3$y'F:$\" +MV%[a&F:7$$\"+lS$)*y'F:$\"+ZOq@cF:7$$\"+e;e'z'F:$\"++++DcF:7$$\"+_#HL !oF:Ffz7$$\"+RW#o\"oF:Ffz7$$\"+E'>.$oF:Ffz7$$\"+++JdoF:Ffz7$$\"+u.I%)o F:Ffz7$$\"+N&H@)pF:$\"+++]PfF:7$$\"+(pe*zqF:$F/F:7$$\"+5=\"p=(F:F_\\l7 $$\"+C\\'QH(F:F_\\l7$$\"+'>#=WtF:F_\\l7$$\"+o%*\\%R(F:F_\\l7$$\"+Sn\"[ W(F:$\"+zc')>lF:7$$\"+8S8&\\(F:$\"+n3ECmF:7$$\"+0#=bq(F:$\"+++](=(F:7$ $\"+b/%pv(F:$\"+++vVtF:7$$\"+1FO3yF:$\"+++++vF:7$$\"+d\\yfyF:Fc^l7$$\" +2s?6zF:Fc^l7$$\"+pe()=!)F:Fc^l7$$\"+IXaE\")F:Fc^l7$$\"+l*RRL)F:Fc^l7$ $\"+`<.Y&)F:Fc^l7$$\"+K&*>^')F:Fc^l7$$\"+8tOc()F:Fc^l7$$\"+Yko/))F:Fc^ l7$$\"+!e0I&))F:Fc^l7$$\"+9ZK,*)F:$\"+?=lTwF:7$$\"+\\Qk\\*)F:$\"+++]7y F:7$$\"+p0;r\"*F:$\"+c3]r$)F:7$$\"+nBp?#*F:$\"+$**[pY)F:7$$\"+mTAq#*F: $\"++++]()F:7$$\"+lfv>$*F:Fjal7$$\"+lxGp$*F:Fjal7$$\"+A-\"\\Z*F:Fjal7$ $\"+!oK0e*F:Fjal7$$\"+[oi\"o*F:$\"+++]i!*F:7$$\"+<5s#y*F:$F4F:7$$\"\" \"F)Fbcl-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!F_dl- %%VIEWG6$;F(Fbcl%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 " plot('CantorFunction(x,7)',x=0..1);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7cq7$$\"\"!F)F)7$$\"+;arz@!#6$\"+++ +]iF-7$$\"+!y%*z7$F-$\"++++v$*F-7$$\"+XTFwSF-$\"++++]7!#57$$\"+oMrU^F- F87$$\"+\"z_\"4iF-F87$$\"+zp!fu'F-F87$$\"+m6m#G(F-F87$$\"+``T>yF-$\"++ +]i:F:7$$\"+S&phN)F-$\"+]S<*p\"F:7$$\"+*=)H\\5F:$\"+++](=#F:7$$\"+ac#) )4\"F:$\"+[k@oBF:7$$\"+=JN[6F:$\"+++++DF:7$$\"+$e!)y>\"F:Fhn7$$\"+[!3u C\"F:Fhn7$$\"+!pt*\\8F:Fhn7$$\"+J$RDX\"F:Fhn7$$\"+)R'ok;F:Fhn7$$\"+1J: w=F:Fhn7$$\"+dG\"\\)>F:Fhn7$$\"+3En$4#F:Fhn7$$\"+K/dT@F:Fhn7$$\"+c#o%* =#F:Fhn7$$\"+!3mtB#F:$\"+++DcEF:7$$\"+/RE&G#F:$\"+++]7GF:7$$\"+D.&4]#F :$\"+W43cLF:7$$\"+PL4bDF:$\"+j]\"**\\$F:7$$\"+]jB4EF:$\"++++]PF:7$$\"+ j$zLm#F:F_r7$$\"+vB_Y2aF:Feu7$$\"+yXu9cF:Feu7$$\"+ \\y))GeF:Feu7$$\"+i_QQgF:Feu7$$\"+!y%3TiF:Feu7$$\"+O![hY'F:Feu7$$\"+4F EnlF:Feu7$$\"+#Qx$omF:$\"+v\"H#H]F:7$$\"+I\"eBs'F:$\"+++]7`F:7$$\"+y)Q jx'F:$\"+++voaF:7$$\"+rk3$y'F:$\"++](oa&F:7$$\"+lS$)*y'F:$\"+qa0?cF:7$ $\"+e;e'z'F:$\"++++DcF:7$$\"+_#HL!oF:Ffz7$$\"+RW#o\"oF:Ffz7$$\"+E'>.$o F:Ffz7$$\"+++JdoF:Ffz7$$\"+u.I%)oF:Ffz7$$\"+N&H@)pF:$\"+++]PfF:7$$\"+( pe*zqF:$F/F:7$$\"+5=\"p=(F:F_\\l7$$\"+C\\'QH(F:F_\\l7$$\"+'>#=WtF:F_\\ l7$$\"+o%*\\%R(F:F_\\l7$$\"+Sn\"[W(F:$\"+>&[&)\\'F:7$$\"+8S8&\\(F:$\"+ +]iSmF:7$$\"+0#=bq(F:$\"+++](=(F:7$$\"+b/%pv(F:$\"+++vVtF:7$$\"+1FO3yF :$\"+++++vF:7$$\"+d\\yfyF:Fc^l7$$\"+2s?6zF:Fc^l7$$\"+pe()=!)F:Fc^l7$$ \"+IXaE\")F:Fc^l7$$\"+l*RRL)F:Fc^l7$$\"+`<.Y&)F:Fc^l7$$\"+K&*>^')F:Fc^ l7$$\"+8tOc()F:Fc^l7$$\"+Yko/))F:Fc^l7$$\"+!e0I&))F:Fc^l7$$\"+9ZK,*)F: $\"+JFNMwF:7$$\"+\\Qk\\*)F:$\"+++]7yF:7$$\"+p0;r\"*F:$\"++]Pf$)F:7$$\" +nBp?#*F:$\"+*[t;[)F:7$$\"+mTAq#*F:$\"++++]()F:7$$\"+lfv>$*F:Fjal7$$\" +lxGp$*F:Fjal7$$\"+A-\"\\Z*F:Fjal7$$\"+!oK0e*F:Fjal7$$\"+[oi\"o*F:$\"+ ++]i!*F:7$$\"+<5s#y*F:$F4F:7$$\"\"\"F)Fbcl-%'COLOURG6&%$RGBG$\"#5!\"\" F(F(-%+AXESLABELSG6$Q\"x6\"Q!F_dl-%%VIEWG6$;F(Fbcl%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "plot('CantorFunction(x,8)',x=0..1); " }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$ 7gq7$$\"\"!F)F)7$$\"+;arz@!#6$\"++++]iF-7$$\"+!y%*z7$F-$\"++++v$*F-7$$ \"+XTFwSF-$\"++++]7!#57$$\"+oMrU^F-F87$$\"+\"z_\"4iF-F87$$\"+zp!fu'F-F 87$$\"+m6m#G(F-F87$$\"+``T>yF-$\"+++]i:F:7$$\"+S&phN)F-$\"+vgQ*o\"F:7$ $\"+*=)H\\5F:$\"+++](=#F:7$$\"+ac#))4\"F:$\"+r'\\/Q#F:7$$\"+=JN[6F:$\" +++++DF:7$$\"+$e!)y>\"F:Fhn7$$\"+[!3uC\"F:Fhn7$$\"+!pt*\\8F:Fhn7$$\"+J $RDX\"F:Fhn7$$\"+)R'ok;F:Fhn7$$\"+1J:w=F:Fhn7$$\"+dG\"\\)>F:Fhn7$$\"+3 En$4#F:Fhn7$$\"+K/dT@F:Fhn7$$\"+c#o%*=#F:Fhn7$$\"+!3mtB#F:$\"+++DcEF:7 $$\"+/RE&G#F:$\"+++]7GF:7$$\"+D.&4]#F:$\"+:RVaLF:7$$\"+PL4bDF:$\"+%4g? \\$F:7$$\"+]jB4EF:$\"++++]PF:7$$\"+j$zLm#F:F_r7$$\"+vB_Y2aF:Feu7$$\"+yXu9cF:Feu7$$\"+\\y))GeF:Feu7$$\"+i_QQgF:Feu7$$\"+! y%3TiF:Feu7$$\"+O![hY'F:Feu7$$\"+s`q;lF:Feu7$$\"+4FEnlF:Feu7$$\"+w8a#f 'F:Feu7$$\"+X+#yh'F:Feu7$$\"+8()4VmF:Feu7$$\"+#Qx$omF:$\"++D1R]F:7$$\" +I\"eBs'F:$\"+++]7`F:7$$\"+y)Qjx'F:$\"+++voaF:7$$\"+rk3$y'F:$\"++](oa& F:7$$\"+lS$)*y'F:$\"+0Ke.$oF:Fb[l7$$\"+++JdoF:Fb[l7$$\"+u.I%)oF:F b[l7$$\"+N&H@)pF:$\"+++]PfF:7$$\"+(pe*zqF:$F/F:7$$\"+5=\"p=(F:F[]l7$$ \"+C\\'QH(F:F[]l7$$\"+'>#=WtF:F[]l7$$\"+o%*\\%R(F:F[]l7$$\"+Sn\"[W(F:$ \"+y_j0lF:7$$\"+8S8&\\(F:$\"++]iSmF:7$$\"+0#=bq(F:$\"+++](=(F:7$$\"+b/ %pv(F:$\"+++vVtF:7$$\"+1FO3yF:$\"+++++vF:7$$\"+d\\yfyF:F__l7$$\"+2s?6z F:F__l7$$\"+pe()=!)F:F__l7$$\"+IXaE\")F:F__l7$$\"+l*RRL)F:F__l7$$\"+`< .Y&)F:F__l7$$\"+K&*>^')F:F__l7$$\"+8tOc()F:F__l7$$\"+Yko/))F:F__l7$$\" +!e0I&))F:F__l7$$\"+9ZK,*)F:$\"+'4/Mi(F:7$$\"+\\Qk\\*)F:$\"+++]7yF:7$$ \"+p0;r\"*F:$\"++]Pf$)F:7$$\"+nBp?#*F:$\"++Dcw%)F:7$$\"+mTAq#*F:$\"+++ +]()F:7$$\"+lfv>$*F:Ffbl7$$\"+lxGp$*F:Ffbl7$$\"+A-\"\\Z*F:Ffbl7$$\"+!o K0e*F:Ffbl7$$\"+[oi\"o*F:$\"+++]i!*F:7$$\"+<5s#y*F:$F4F:7$$\"\"\"F)F^d l-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!F[el-%%VIEWG 6$;F(F^dl%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{PARA 0 " " 0 "" {TEXT -1 591 "the Cantor Function is also referred to as the de vil's staircase, and we can see why. Graphically we can also be convin ced that these curves are converging uniformly. Indeed, each successiv e curve will be constant where the previous one was, so that the maxim um difference between one function in our sequence and another after i t must occur somewhere in between the places where the first curve is \+ constant. As such, then it is only a matter of getting our straight li ne connections to be sufficiently close to each other, which pictorial ly we can see is not such a far-fetched thing to do." }}}{PARA 0 "" 0 "" {TEXT -1 665 " One can now contemplate what would happen if inst ead of removing the middle thirds in the construction of the Cantor Se t, we remove some other length strictly between 0 and 1. If we do this , we get what is called the General Cantor Set. These sets have intere sing properties as well. They are all uncountable, perfect, compact, a nd are totally disconnected. However, it is possible to construct a Ge neral Cantor Set that has positive measure if we allow how much we rem ove at each step change. Moreover, given any number strictly between 0 and 1, we can produce a general cantor set that has that value as its measure. Let us investigate the General Cantor Set." }}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 18 "General Cantor Set" }}{PARA 0 "" 0 "" {TEXT -1 142 "Our task will be to produce an algorithm which gives us the point s in the construction of the General Cantor Set. More specifically, gi ven an " }{TEXT 352 3 "i,k" }{TEXT -1 7 " and a " }{TEXT 256 1 "b" } {TEXT -1 34 ", this algorithm will give us the " }{TEXT 353 1 "i" } {TEXT -1 21 "th point used in the " }{TEXT 354 1 "k" }{TEXT -1 94 "th \+ step of the construction of the cantor set according to the rule that \+ we remove the middle " }{TEXT 257 1 "b" }{TEXT -1 41 " of each segment . For now, we regard the " }{TEXT 258 1 "b" }{TEXT -1 29 " as fixed at every step, and " }{TEXT 259 1 "b" }{TEXT -1 36 " is always strictly \+ between 0 and 1." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 185 "This algorithm will be a doubly recursive one. We will f irst manually produce the four points that are used in the first step \+ of the general construction, which will directly depend on " }{TEXT 260 1 "b" }{TEXT -1 148 ". Then we will build on these points to get a ll the other points for every step beyond the first step. As such, the first set of points is given by:" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 60 "firstgencantset:= proc(b) [0,(1/2)*(1-b),(1/2)*(1+b), 1] end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%0firstgencantsetGf*6#%\"b G6\"F(F(7&\"\"!,&9$#!\"\"\"\"##\"\"\"F/F1,&F0F1*&F0F1F,F1F1F1F(F(F(" } }}{PARA 0 "" 0 "" {TEXT -1 41 "one can check that the segment ((1/2)*( 1-" }{TEXT 264 1 "b" }{TEXT -1 11 "),(1/2)*(1+" }{TEXT 265 1 "b" } {TEXT -1 14 ")) has length " }{TEXT 263 1 "b" }{TEXT -1 144 ". Now we \+ define a preliminary function, which we also used in the original Cant or Set, but that we describe explicitly here for simplicity. " }} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "factorsoftwo:= (i)-> ifactor s(i)[2][1][2];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%-factorsoftwoGf*6# %\"iG6\"6$%)operatorG%&arrowGF(&&&-%)ifactorsG6#9$6#\"\"#6#\"\"\"F3F(F (F(" }}}{PARA 0 "" 0 "" {TEXT -1 26 "Now we define our points: " } {MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 465 "gencant point:=proc(i,k,b) \nif k=0 then 1 ; else \nif k=1 then (firstgencants et(b))[i] ; else\nif i=1 then 0 else\nif i mod 2 = 0 then\nif factorso ftwo(i)=1 then gencantpoint(i-1,k,b)+(((1/2)*(1-b))^k) ;\nelse gencant point(i*(2^(1-factorsoftwo(i))),k+1-factorsoftwo(i),b) ; fi ;\nelse if factorsoftwo(i-1)=1 then gencantpoint(i-1,k,b)+b*(((1/2)*(1-b))^(k-1) ) ;\nelse gencantpoint((i-1)*(2^(1-factorsoftwo(i-1)))+1,k+1-factorsof two(i-1),b) ;\nfi ; fi ; fi ; fi ; fi ; end ;\n\n" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%-gencantpointGf*6%%\"iG%\"kG%\"bG6\"F*F*@%/9%\"\"!\" \"\"@%/F-F/&-%0firstgencantsetG6#9&6#9$@%/F8F/F.@%/-%$modG6$F8\"\"#F.@ %/-%-factorsoftwoGF7F/,&-F$6%,&F8F/F/!\"\"F-F6F/),&#F/F@F/*&#F/F@F/F6F /FIF-F/-F$6%*&F8F/)F@,&F/F/FCFIF/,(F-F/F/F/FCFIF6@%/-FD6#FHF/,&FFF/*&F 6F/)FK,&F-F/F/FIF/F/-F$6%,&*&FHF/)F@,&F/F/FWFIF/F/F/F/,(F-F/F/F/FWFIF6 F*F*F*" }}}{PARA 0 "" 0 "" {TEXT -1 85 "This is a formidable algorithm , one that uses a heavy recursion. In order to get the " }{TEXT 355 1 "i" }{TEXT -1 21 "th point used in the " }{TEXT 356 1 "k" }{TEXT -1 68 "th step, this algorithm not only investigates the the nature of th e " }{TEXT 357 1 "i" }{TEXT -1 45 ", but it also looks at the divisibi lity of " }{TEXT 358 1 "i" }{TEXT -1 84 "-1 by 2, and then draws on \+ the points used in the previous step of the construction." }}{PARA 0 " " 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 116 "Now we define as \+ before, a procedure which lists out the sets that are left over at eac h step in our construction: " }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 92 "gencantset:=proc(k,b) [seq([gencantpoint(2*i-1 ,k,b),gencantpoint(2*i,k,b)],i=1..(2^k))] end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%+gencantsetGf*6$%\"kG%\"bG6\"F)F)7#-%$seqG6$7$-%-genc antpointG6%,&%\"iG\"\"#\"\"\"!\"\"9$9%-F06%,$F3F4F7F8/F3;F5)F4F7F)F)F) " }}}{PARA 0 "" 0 "" {TEXT -1 71 "Now we can check that algorithm is c orrect, by putting in the value of " }{TEXT 261 1 "b" }{TEXT -1 62 "=1 /3. This should give us the regular Cantor Set, and we list " }{TEXT 360 11 "gencantset " }{TEXT -1 4 "and " }{TEXT 361 10 "cantorset " } {TEXT -1 22 "for several values of " }{TEXT 359 1 "k" }{TEXT -1 17 " t o verify this: " }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "gencantset(1,1/3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #7$7$\"\"!#\"\"\"\"\"$7$#\"\"#F(F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "cantorset(1,1/3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6# 7$7$\"\"!#\"\"\"\"\"$7$#\"\"#F(F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "gencantset(2,1/3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #7&7$\"\"!#\"\"\"\"\"*7$#\"\"#F(#F'\"\"$7$#F+F-#\"\"(F(7$#\"\")F(F'" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "cantorset(2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7&7$\"\"!#\"\"\"\"\"*7$#\"\"#F(#F'\"\"$7$#F+F-# \"\"(F(7$#\"\")F(F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "genc antset(3,1/3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7*7$\"\"!#\"\"\"\"#F 7$#\"\"#F(#F'\"\"*7$#F+F-#\"\"(F(7$#\"\")F(#F'\"\"$7$#F+F6#\"#>F(7$#\" #?F(#F1F-7$#F4F-#\"#DF(7$#\"#EF(F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "cantorset(3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7*7$ \"\"!#\"\"\"\"#F7$#\"\"#F(#F'\"\"*7$#F+F-#\"\"(F(7$#\"\")F(#F'\"\"$7$# F+F6#\"#>F(7$#\"#?F(#F1F-7$#F4F-#\"#DF(7$#\"#EF(F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "gencantset(4,1/3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#727$\"\"!#\"\"\"\"#\")7$#\"\"#F(#F'\"#F7$#F+F-#\"\"(F(7 $#\"\")F(#F'\"\"*7$#F+F6#\"#>F(7$#\"#?F(#F1F-7$#F4F-#\"#DF(7$#\"#EF(#F '\"\"$7$#F+FG#\"#bF(7$#\"#cF(#F:F-7$#F=F-#\"#hF(7$#\"#iF(#F1F67$#F4F6# \"#tF(7$#\"#uF(#FBF-7$#FEF-#\"#zF(7$#\"#!)F(F'" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 13 "cantorset(4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#727$\"\"!#\"\"\"\"#\")7$#\"\"#F(#F'\"#F7$#F+F-#\"\"(F(7$#\"\")F(#F' \"\"*7$#F+F6#\"#>F(7$#\"#?F(#F1F-7$#F4F-#\"#DF(7$#\"#EF(#F'\"\"$7$#F+F G#\"#bF(7$#\"#cF(#F:F-7$#F=F-#\"#hF(7$#\"#iF(#F1F67$#F4F6#\"#tF(7$#\"# uF(#FBF-7$#FEF-#\"#zF(7$#\"#!)F(F'" }}}{PARA 0 "" 0 "" {TEXT -1 59 "It seems to check out. Now out of curiosity, let us put in " }{TEXT 262 1 "b" }{TEXT -1 32 "=1/2 and list some of the steps:" }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "gencantset(1,1/2);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#7$7$\"\"!#\"\"\"\"\"%7$#\"\"$F(F'" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "gencantset(2,1/2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7&7$\"\"!#\"\"\"\"#;7$#\"\"$F(#F'\"\"%7$#F+F -#\"#8F(7$#\"#:F(F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "genc antset(3,1/2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7*7$\"\"!#\"\"\"\"#k 7$#\"\"$F(#F'\"#;7$#F+F-#\"#8F(7$#\"#:F(#F'\"\"%7$#F+F6#\"#\\F(7$#\"#^ F(#F1F-7$#F4F-#\"#hF(7$#\"#jF(F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "gencantset(4,1/2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #727$\"\"!#\"\"\"\"$c#7$#\"\"$F(#F'\"#k7$#F+F-#\"#8F(7$#\"#:F(#F'\"#;7 $#F+F6#\"#\\F(7$#\"#^F(#F1F-7$#F4F-#\"#hF(7$#\"#jF(#F'\"\"%7$#F+FG#\"$ $>F(7$#\"$&>F(#F:F-7$#F=F-#\"$0#F(7$#\"$2#F(#F1F67$#F4F6#\"$T#F(7$#\"$ V#F(#FBF-7$#FEF-#\"$`#F(7$#\"$b#F(F'" }}}{PARA 0 "" 0 "" {TEXT -1 91 " Now, let us measure take the measure the intervals left in each step o f this construction: " }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "measure(gencantset(1,1/2));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"\"\"\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "measure(gencantset(2,1/2));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\" \"\"\"\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "measure(gencan tset(3,1/2));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"\"\"\"\")" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "measure(gencantset(4,1/2)); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"\"\"\"#;" }}}{PARA 0 "" 0 "" {TEXT -1 116 "We see that the measure of this cantor set will be zero. Indeed, any general cantor set will have measure zero when " }{TEXT 266 1 "b" }{TEXT -1 173 " is fixed. This is again more apparent when w e investigate the measure of the compleement of such a general cantor \+ set on [0,1]. The length of the first interval removed is " }{TEXT 267 1 "b" }{TEXT -1 52 ". We are left with two intervals of length (1/ 2)*(1-" }{TEXT 268 1 "b" }{TEXT -1 62 "). At the second step, we remov e two intervals each of length " }{TEXT 270 2 "b*" }{TEXT -1 9 "(1/2)* (1-" }{TEXT 269 1 "b" }{TEXT -1 83 "). All of the segments removed are disjoint. As such, at the kth step, we remove 2^" }{TEXT 362 1 "k" } {TEXT -1 20 " segments of length " }{TEXT 271 1 "b" }{TEXT -1 11 "*((1 /2)*(1-" }{TEXT 272 1 "b" }{TEXT -1 3 "))^" }{TEXT 363 1 "k" }{TEXT -1 216 ". All of these segements will be disjoint, so to get the measu re of the complement of this Cantor Set, we sum the lengths of each of the pieces. Including the first step, we get the sum from 0 to infini ty of (2^k)*" }{TEXT 273 1 "b" }{TEXT -1 11 "*((1/2)*(1-" }{TEXT 274 1 "b" }{TEXT -1 3 "))^" }{TEXT 364 1 "k" }{TEXT -1 28 ". The summa nd simplifies to " }{TEXT 275 1 "b" }{TEXT -1 4 "*(1-" }{TEXT 276 1 "b " }{TEXT -1 2 ")^" }{TEXT 365 1 "k" }{TEXT -1 58 ". This is again a ge ometric series, which will sum to 1. " }}{PARA 0 "" 0 "" {TEXT -1 0 " " }}{PARA 0 "" 0 "" {TEXT -1 124 "At this point one can continue as in the Cantor Set and define a general Devil's Staircase based on the Ge neral Cantor Set. " }}}{PARA 0 "" 0 "" {TEXT -1 448 "Our next example \+ deals with a classic question which comes to the mind of most undergra duate mathematics students. Is every continuous function differentiabl e? The answer is no, since the absolute value function is continuous a t zero but not differentiable there. However, we can ask, is there a f unction which is continuous everywhere but differentiable nowhere? The answer is in the affirmative, and we now explore an example of such a function. " }}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 47 "Van der Waerden No where Differentiable Function" }}{PARA 0 "" 0 "" {TEXT -1 276 "Our exa mple of a continuous nowhere differentiable function is due to Bartel \+ Leendert van der Waerden, and it will be obtained from taking the sum \+ of a sequence of functions. This sequence of functions is best describ ed through graphs. The first function is a simple sawtooth:" }}{PARA 0 "" 0 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7U7$$\"\"!F )F(7$$\"3emmm;arz@!#>F+7$$\"3[LL$e9ui2%F-F/7$$\"3nmmm\"z_\"4iF-F27$$\" 3[mmmT&phN)F-F57$$\"3CLLe*=)H\\5!#=F87$$\"3gmm\"z/3uC\"F:F<7$$\"3%)*** \\7LRDX\"F:F?7$$\"3]mm\"zR'ok;F:FB7$$\"3w***\\i5`h(=F:FE7$$\"3WLLL3En$ 4#F:FH7$$\"3qmm;/RE&G#F:FK7$$\"3\")*****\\K]4]#F:FN7$$\"3$******\\PAvr #F:FQ7$$\"3)******\\nHi#HF:FT7$$\"3jmm\"z*ev:JF:FW7$$\"3?LLL347TLF:FZ7 $$\"3,LLLLY.KNF:Fgn7$$\"3w***\\7o7Tv$F:Fjn7$$\"3'GLLLQ*o]RF:F]o7$$\"3A ++D\"=lj;%F:F`o7$$\"31++vV&RY2aF:$\"3]++D\"3QDf%F:7$$\"39mm;zXu9cF:$\"3'QLL3Ub_Q%F:7$$\"3l****** \\y))GeF:$\"3O+++]@6rTF:7$$\"3'*)***\\i_QQgF:$\"3/,+]PZhhRF:7$$\"3@*** \\7y%3TiF:$\"3y++v=_\"*ePF:7$$\"35****\\P![hY'F:$\"3*3++D'>&Q`$F:7$$\" 3kKLL$Qx$omF:$\"3Pnmm;EiJLF:7$$\"3!)*****\\P+V)oF:$\"3?+++D'*p:JF:7$$ \"3?mm\"zpe*zqF:$\"3zLL3-8/?HF:7$$\"3%)*****\\#\\'QH(F:$\"3<+++v]81FF: 7$$\"3GKLe9S8&\\(F:$\"3snmT&)f'[]#F:7$$\"3R***\\i?=bq(F:$\"3g++v$z\"[% H#F:7$$\"3\"HLL$3s?6zF:$\"33nmm\"z#z)3#F:7$$\"3a***\\7`Wl7)F:$\"3Y++vo aXt=F:7$$\"3#pmmm'*RRL)F:$\"33LLLL+1m;F:7$$\"3Qmm;a<.Y&)F:$\"3iLL$eCoR X\"F:7$$\"3=LLe9tOc()F:$\"3$om;aoKOC\"F:7$$\"3u******\\Qk\\*)F:$\"3E++ +]hN]5F:7$$\"3CLL$3dg6<*F:$\"3anmm\"H%R)G)F-7$$\"3ImmmmxGp$*F:$\"30PLL LB72jF-7$$\"3A++D\"oK0e*F:$\"3i(***\\(=tY>%F-7$$\"3A++v=5s#y*F:$\"3#y* **\\7)*ys@F-7$$\"\"\"F)F(-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELS G6$Q\"x6\"Q!Fgx-%%VIEWG6$;F(Fjw%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}{TEXT -1 0 "" }}{PARA 0 " " 0 "" {TEXT -1 58 "the second function is another saw tooth, with fou r teeth:" }}{PARA 0 "" 0 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CU RVESG6$7]q7$$\"\"!F)F(7$$\"+3x&)*3\"!#6$\"+;arz@F-7$F.$\"+K3VfVF-7$$\" +!y%*z7$F-$\"+g&*)fD'F-7$$\"+XTFwSF-$\"+!H[D:)F-7$$\"+oMrU^F-$\"+%pU&G 5!#57$$\"+\"z_\"4iF-$\"+e0$=C\"FB7$$\"+m6m#G(F-$\"+LA`c9FB7$$\"+S&phN) F-$\"+3RBr;FB7$$\"+:ddC%*F-$\"+V^\"\\)=FB7$$\"+*=)H\\5FB$\"+yjf)4#FB7$ $\"+=JN[6FB$\"+Oiq'H#FB7$$\"+[!3uC\"FB$\"+'4;[\\#FB7$$\"+!pt*\\8FB$\"+ ?E0+BFB7$$\"+J$RDX\"FB$\"+Q8#\\4#FB7$$\"+kGhe:FB$\"+sUx#)=FB7$$\"+)R'o k;FB$\"+/siq;FB7$$\"+_(>/x\"FB$\"+'\\g\"f9FB7$$\"+1J:w=FB$\"+)y$pZ7FB7 $$\"+dG\"\\)>FB$\"+'Gu,.\"FB7$$\"+3En$4#FB$\"+SyaE\")F-7$$\"+c#o%*=#FB $\"+!)[j5iF-7$$\"+/RE&G#FB$\"+?>s%H%F-7$$\"+9r5$R#FB$\"+?x&y8#F-7$$\"+ D.&4]#FB$\"+++l+>!#87$$\"+]jB4EFB$\"++qs%=#F-7$$\"+vB_/\"FB7$$\"+(*ev:JFB$\"+%z6:B\"FB7$$\"+-%Q%GKFB$\"+/o(oX\"FB7$$\"+34 7TLFB$\"+;=C#o\"FB7$$\"+qxdOMFB$\"+Sb:t=FB7$$\"+LY.KNFB$\"+m#pS1#FB7$$ \"+cO2VOFB$\"+7t9'G#FB7$$\"+\"o7Tv$FB$\"+QYx\"\\#FB7$$\"+K5S_QFB$\"+Oz >&H#FB7$$\"+$Q*o]RFB$\"+M7i)4#FB7$$\"+#GF&eSFB$\"+Oa%H)=FB7$$\"+\"=lj; %FB$\"+Q'psm\"FB7$$\"+iB0pUFB$\"+w_*=Y\"FB7$$\"+V&RY2aFB$\"+g$Q#\\\")F-7$$\"+[K56bFB$\"+'\\1A- \"FB7$$\"+yXu9cFB$\"+c\"*[H7FB7$$\"+8i\"=s&FB$\"+ECjV9FB7$$\"+\\y))GeF B$\"+)pvxl\"FB7$$\"+bljLfFB$\"+5JFn=FB7$$\"+i_QQgFB$\"+C0xw?FB7$$\"+@] tRhFB$\"+U+ZzAFB7$$\"+!y%3TiFB$\"+g&p@[#FB7$$\"+3kh`jFB$\"+%=nFH#FB7$$ \"+O![hY'FB$\"+GRqn?FB7$$\"+4FEnlFB$\"+#eua'=FB7$$\"+#Qx$omFB$\"+O_Cj; FB7$$\"+y)Qjx'FB$\"+WAKZ9FB7$$\"+u.I%)oFB$\"+_#*RJ7FB7$$\"+N&H@)pFB$\" +I4uN5FB7$$\"+(pe*zqFB$\"+gg#3S)F-7$$\"+5=\"p=(FB$\"++QwhiF-7$$\"+C\\' QH(FB$\"+?:qATF-7$$\"+o%*\\%R(FB$\"+S1,5@F-7$$\"+8S8&\\(FB$\"++S(>t*F \\s7$$\"+3hK+wFB$\"+g@_1?F-7$$\"+0#=bq(FB$\"++TO5TF-7$$\"+1FO3yFB$\"+? TDnhF-7$$\"+2s?6zFB$\"+ST9C#)F-7$$\"+pe()=!)FB$\"+Q^')FB$\"+ k!*R-BFB7$$\"+8tOc()FB$\"+u`E([#FB7$$\"+!e0I&))FB$\"+S)))RH#FB7$$\"+\\ Qk\\*)FB$\"+-Br+@FB7$$\"+3ASg!*FB$\"+%e&>z=FB7$$\"+p0;r\"*FB$\"+i)ywl \"FB7$$\"+mTAq#*FB$\"+o;bf9FB7$$\"+lxGp$*FB$\"+qWUh7FB7$$\"+A-\"\\Z*FB $\"+c&z,0\"FB7$$\"+!oK0e*FB$\"++kM*Q)F-7$$\"+[oi\"o*FB$\"+SIYnjF-7$$\" +<5s#y*FB$\"+g'zbM%F-7$$\"+30O\"*)*FB$\"+S)*ys@F-7$$\"\"\"F)F(-%'COLOU RG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!F^jl-%%VIEWG6$;F(Fail %(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "C urve 1" }}{TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 94 "However, the he ight of each sawtooth is reduced by a half to 1/4. We proceed as such, at each " }{TEXT 367 1 "k" }{TEXT -1 38 "th step getting a function t hat has 2^" }{TEXT 366 1 "k" }{TEXT -1 30 " sawteeth, each of height 1 /2^" }{TEXT 368 1 "k" }{TEXT -1 91 ". The sum of these functions is un iformly convergent by the Weierstrauss M-test, since the " }{TEXT 369 1 "k" }{TEXT -1 30 "th function is bounded by 1/2^" }{TEXT 370 1 "k" } {TEXT -1 261 ". Thus, we call the resulting sum the Van der Waerden Fu nction, and it is continuous since it is the uniformly convergent sum \+ of a sequence of continuous functions. However, it fails to be differe ntiable anywhere on [0,1]. I shall give some reasoning why later." }} {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 45 "Now let u s write a program that gives us the " }{TEXT 371 1 "n" }{TEXT -1 236 " th partial sum of our sequence of sawtooth functions. First, we must g et this sequence of functions. This task is easy enough given our stra tegies. We first define each of the pieces of each sawtooth, and then \+ sum them all in the end: " }{MPLTEXT 1 0 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 117 "nowherediffeven:= proc(x,i,k)\nif 2*i/(2^(k+1)) <= x and x < (2*i+1)/(2^(k+1)) \nthen 2*x-(2*i/(2^k)) else 0 \nfi end ; " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%0nowherediffevenGf*6%%\"xG%\" iG%\"kG6\"F*F*@%31,$*&9%\"\"\")\"\"#,&9&F1F1F1!\"\"F39$2F7*&,&F0F3F1F1 F1F2F6,&F7F3*(F3F1F0F1)F3F5F6F6\"\"!F*F*F*" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 124 "nowherediffodd:= proc(x,i,k)\nif (2*i+1)/(2^(k+1)) <= x and x < (2*i+2)/(2^(k+1)) \nthen -2*x+((2*i+2)/(2^k)) else 0 \nf i end ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%/nowherediffoddGf*6%%\"xG %\"iG%\"kG6\"F*F*@%31*&,&9%\"\"#\"\"\"F2F2)F1,&9&F2F2F2!\"\"9$2F7*&,&F 0F1F1F2F2F3F6,&F7!\"#*&F:F2)F1F5F6F2\"\"!F*F*F*"