Work-in-progress repo for ambisonics extensions for OM-SoX
Alexander Nguyen
22.01.25 92c40d00f8ffe4fc6491c0abb70210b31202bd70
1
2
3
4
5
6
; OM File Header - Saved 2013/11/09 15:36:38
; (6.070005 :patc (om-make-point 270 27) (om-make-point 425 38) (om-make-point 1087 906) "" 183 0 "2013/11/03 21:48:46" "2013/11/09 15:36:36")
; End File Header
; External resources 
; (list (list (quote :picture) "#P\"../../../../resources/pict/omsox\"") (list (quote :abstraction) "#P\"../../support/plot-sox-contrast.omp\"") (list (quote :sound) "#P\"../../../../../../../../Research/OM-SoX/OM-SoX 1.0/resources/sounds/drumloop.aif\"" "#P\"../../../../../../../../Research/OM-SoX/OM-SoX 1.0/resources/sounds/sinewave.aif\""))
(in-package :om)(load-lib-for (quote ("OM-SoX")))(setf *om-current-persistent* (om-load-patch1 "3-psychoacoustics" (quote ((om-load-boxcall (quote bastype) "aux 3" (quote t) (quote nil) (om-make-point 206 562) (om-make-point 39 30) -36 "-36" nil) (om-load-editor-box1 "drumloop.aif" (quote sound) (quote ((om-load-inputfun (quote input-funbox) "object" "self" nil) (om-load-inputfun (quote input-funbox) "a track index for multichannel mixing" "tracknum" 0) (om-load-inputfun (quote input-funbox) "a list of markers (s)" "markers" nil))) (om-make-point 95 192) (om-make-point 80 50) (let ((newobj (let ((thesound (load-sound (om-make-pathname :directory (quote (:absolute "Users" "Marlon_MBPro3" "Research" "OM-SoX" "OM-SoX 1.0" "resources" "sounds")) :device nil :host nil :name "drumloop" :type "aif") 0 100 0))) (when thesound (setf (markers thesound) (quote nil))) thesound))) (load-port-info newobj (quote nil)) (init-mus-color newobj (quote nil)) (set-extra-pairs newobj (quote nil)) (set-patch-pairs newobj (quote nil)) (set-name newobj "drumloop.aif") (set-tonalite newobj nil) newobj) "x" nil (pairlis (quote (approx fontsize staff cmnpref deltapict outport inport player zoom notechancolor? grillestep mode winsize winpos score-mode obj-mode show-stems scale palette-mode)) (list 2 24 (quote g) (let ((newobj (make-instance (quote edition-values)))) (setf (paper-size newobj) (om-make-point 600 800)) (setf (top-margin newobj) 2) (setf (left-margin newobj) 1) (setf (right-margin newobj) 1) (setf (bottom-margin newobj) 1) (setf (orientation newobj) nil) (setf (scale newobj) nil) (setf (system-space newobj) (quote (1))) (setf (system-color newobj) (quote nil)) (setf (line-space newobj) 1) (setf (title newobj) nil) (setf (show-title? newobj) nil) (setf (show-page? newobj) nil) (setf (sheet-id newobj) nil) (setf (page-mode newobj) nil) newobj) (om-make-point 0 0) nil 0 (quote :soxplayer) 1 nil 1000 0 (om-make-point 588 290) (om-make-point 400 22) 0 1 (quote t) nil 0)) t nil nil nil) (om-load-boxcomment "comment 3" (om-make-point 315 36) (quote "\"sox-overdrive\" saturates the audio (soft-clipping). $This can be used to give an impression of increased levels.") "" (om-make-point 633 536) nil (om-make-color 0.0 0.19194556 1.0) (om-make-font "Verdana" 10.0 :family "Verdana" :style (quote (:plain)) :mode (quote nil))) (om-load-boxcomment "comment 4" (om-make-point 103 34) (quote "sox-overdrive") "" (om-make-point 633 512) nil (om-make-color 0.0 0.19194556 1.0) (om-make-font "Verdana" 12.0 :family "Verdana" :style (quote (:plain)) :mode (quote nil))) (om-load-boxcomment "comment 8" (om-make-point 598 45) (quote "sox-contrast makes an audio signal appear 'louder' using a variable time-domain transferfunction.$'amount' controls the amount of the enhancement and is a number in the range 0-100%.") "" (om-make-point 82 93) nil (om-make-color 0.0 0.19194556 1.0) (om-make-font "Verdana" 12.0 :family "Verdana" :style (quote (:plain)) :mode (quote nil))) (om-load-boxcomment "comment" (om-make-point 658 34) (quote "These sox-effects make use of psychoacoustics to control the amount of perceived loudness") "" (om-make-point 127 25) nil (om-make-color 0.0 0.0 0.0) (om-make-font "Verdana" 14.0 :family "Verdana" :style (quote (:plain)) :mode (quote nil))) (om-load-boxcall (quote genfun) "SOX-OVERDRIVE" (quote sox-overdrive) (quote ((om-load-inputfun (quote input-funbox) "gain" "GAIN" 5) (om-load-inputfun (quote input-funbox) "colour (amount of even harmonics)" "COLOUR" 90) (om-load-inputkeyword (quote input-keyword) "Append sox-effects/statistics to the processing chain." "sox-append" (quote :sox-append) nil nil))) (om-make-point 760 590) nil nil nil nil 1) (om-load-boxcall (quote genfun) "SOX-NORMALIZE" (quote sox-normalize) (quote ((om-load-inputkeyword (quote input-keyword) "level (dB)" "level" (quote :level) 0.0 nil))) (om-make-point 882 588) nil nil nil nil 1) (om-load-boxcall (quote genfun) "SOX-PROCESS 2" (quote sox-process) (quote ((om-load-inputfun (quote input-funbox) "" "SND" nil) (om-load-inputfun (quote input-funbox) "" "COMMANDS" ""))) (om-make-point 699 679) nil nil nil nil 1) (om-load-editor-box1 "SOUND" (quote sound) (quote ((om-load-inputfun (quote input-funbox) "object" "self" nil) (om-load-inputfun (quote input-funbox) "a track index for multichannel mixing" "tracknum" 0) (om-load-inputfun (quote input-funbox) "a list of markers (s)" "markers" nil))) (om-make-point 715 780) (om-make-point 80 50) (let ((newobj nil)) (load-port-info newobj (quote nil)) (init-mus-color newobj (quote nil)) (set-extra-pairs newobj (quote nil)) (set-patch-pairs newobj (quote nil)) (set-name newobj "") (set-tonalite newobj nil) newobj) nil nil (pairlis (quote (approx fontsize staff cmnpref deltapict outport inport player zoom notechancolor? grillestep mode winsize winpos score-mode obj-mode show-stems scale palette-mode)) (list 2 24 (quote g) (let ((newobj (make-instance (quote edition-values)))) (setf (paper-size newobj) (om-make-point 600 800)) (setf (top-margin newobj) 2) (setf (left-margin newobj) 1) (setf (right-margin newobj) 1) (setf (bottom-margin newobj) 1) (setf (orientation newobj) nil) (setf (scale newobj) nil) (setf (system-space newobj) (quote (1))) (setf (system-color newobj) (quote nil)) (setf (line-space newobj) 1) (setf (title newobj) nil) (setf (show-title? newobj) nil) (setf (show-page? newobj) nil) (setf (sheet-id newobj) nil) (setf (page-mode newobj) nil) newobj) (om-make-point 0 0) nil 0 (quote :soxplayer) 1 nil 1000 0 (om-make-point 568 321) (om-make-point 400 22) 0 1 (quote t) nil 0)) t nil nil nil) (om-load-editor-box1 "drumloop.aif" (quote sound) (quote ((om-load-inputfun (quote input-funbox) "object" "self" nil) (om-load-inputfun (quote input-funbox) "a track index for multichannel mixing" "tracknum" 0) (om-load-inputfun (quote input-funbox) "a list of markers (s)" "markers" nil))) (om-make-point 645 615) (om-make-point 80 50) (let ((newobj (let ((thesound (load-sound (om-make-pathname :directory (quote (:absolute "Users" "Marlon_MBPro3" "Research" "OM-SoX" "OM-SoX 1.0" "resources" "sounds")) :device nil :host nil :name "drumloop" :type "aif") 0 100 0))) (when thesound (setf (markers thesound) (quote nil))) thesound))) (load-port-info newobj (quote nil)) (init-mus-color newobj (quote nil)) (set-extra-pairs newobj (quote nil)) (set-patch-pairs newobj (quote nil)) (set-name newobj "drumloop.aif") (set-tonalite newobj nil) newobj) "x" nil (pairlis (quote (approx fontsize staff cmnpref deltapict outport inport player zoom notechancolor? grillestep mode winsize winpos score-mode obj-mode show-stems scale palette-mode)) (list 2 24 (quote g) (let ((newobj (make-instance (quote edition-values)))) (setf (paper-size newobj) (om-make-point 600 800)) (setf (top-margin newobj) 2) (setf (left-margin newobj) 1) (setf (right-margin newobj) 1) (setf (bottom-margin newobj) 1) (setf (orientation newobj) nil) (setf (scale newobj) nil) (setf (system-space newobj) (quote (1))) (setf (system-color newobj) (quote nil)) (setf (line-space newobj) 1) (setf (title newobj) nil) (setf (show-title? newobj) nil) (setf (show-page? newobj) nil) (setf (sheet-id newobj) nil) (setf (page-mode newobj) nil) newobj) (om-make-point 0 0) nil 0 (quote :soxplayer) 1 nil 1000 0 (om-make-point 562 333) (om-make-point 400 22) 0 1 (quote t) nil 0)) t nil nil nil) (om-load-editor-box1 "BPF" (quote bpf) (quote ((om-load-inputfun (quote input-funbox) "object" "self" nil) (om-load-inputfun (quote input-funbox) "X coordinates (list)" "x-points" (list 0 100)) (om-load-inputfun (quote input-funbox) "Y coordinates (list)" "y-points" (list 0 100)) (om-load-inputfun (quote input-funbox) "precision (integer) [0 - 10]" "decimals" 10))) (om-make-point 607 276) (om-make-point 140 102) (let ((newobj (when (find-class (quote bpf) nil) (let ((newbpf (simple-bpf-from-list (quote (-1.0 -0.998 -0.99600006 -0.9940001 -0.9920001 -0.9900001 -0.98800016 -0.9860002 -0.9840002 -0.98200024 -0.98000026 -0.9780003 -0.9760003 -0.97400034 -0.97200037 -0.9700004 -0.9680004 -0.96600044 -0.96400047 -0.9620005 -0.9600005 -0.95800055 -0.95600057 -0.9540006 -0.9520006 -0.95000065 -0.94800067 -0.9460007 -0.9440007 -0.94200075 -0.9400008 -0.9380008 -0.9360008 -0.93400085 -0.9320009 -0.9300009 -0.9280009 -0.92600096 -0.924001 -0.922001 -0.92000103 -0.91800106 -0.9160011 -0.9140011 -0.91200114 -0.91000116 -0.9080012 -0.9060012 -0.90400124 -0.90200127 -0.9000013 -0.8980013 -0.89600134 -0.89400137 -0.8920014 -0.8900014 -0.88800145 -0.88600147 -0.8840015 -0.8820015 -0.88000155 -0.8780016 -0.8760016 -0.8740016 -0.87200165 -0.8700017 -0.8680017 -0.8660017 -0.86400176 -0.8620018 -0.8600018 -0.8580018 -0.85600186 -0.8540019 -0.8520019 -0.85000194 -0.84800196 -0.846002 -0.844002 -0.84200204 -0.84000206 -0.8380021 -0.8360021 -0.83400214 -0.83200217 -0.8300022 -0.8280022 -0.82600224 -0.82400227 -0.8220023 -0.8200023 -0.81800235 -0.81600237 -0.8140024 -0.8120024 -0.81000245 -0.8080025 -0.8060025 -0.8040025 -0.80200255 -0.8000026 -0.7980026 -0.7960026 -0.79400266 -0.7920027 -0.7900027 -0.7880027 -0.78600276 -0.7840028 -0.7820028 -0.78000284 -0.77800286 -0.7760029 -0.7740029 -0.77200294 -0.77000297 -0.768003 -0.766003 -0.76400304 -0.76200307 -0.7600031 -0.7580031 -0.75600315 -0.75400317 -0.7520032 -0.7500032 -0.74800325 -0.74600327 -0.7440033 -0.7420033 -0.74000335 -0.7380034 -0.7360034 -0.7340034 -0.73200346 -0.7300035 -0.7280035 -0.7260035 -0.72400356 -0.7220036 -0.7200036 -0.71800364 -0.71600366 -0.7140037 -0.7120037 -0.71000374 -0.70800376 -0.7060038 -0.7040038 -0.70200384 -0.70000387 -0.6980039 -0.6960039 -0.69400394 -0.69200397 -0.690004 -0.688004 -0.68600405 -0.68400407 -0.6820041 -0.6800041 -0.67800415 -0.6760042 -0.6740042 -0.6720042 -0.67000425 -0.6680043 -0.6660043 -0.6640043 -0.66200436 -0.6600044 -0.6580044 -0.6560044 -0.65400446 -0.6520045 -0.6500045 -0.64800454 -0.64600456 -0.6440046 -0.6420046 -0.64000464 -0.63800467 -0.6360047 -0.6340047 -0.63200474 -0.63000477 -0.6280048 -0.6260048 -0.62400485 -0.62200487 -0.6200049 -0.6180049 -0.61600495 -0.61400497 -0.612005 -0.610005 -0.60800505 -0.6060051 -0.6040051 -0.6020051 -0.60000515 -0.5980052 -0.5960052 -0.5940052 -0.59200526 -0.5900053 -0.5880053 -0.58600533 -0.58400536 -0.5820054 -0.5800054 -0.57800544 -0.57600546 -0.5740055 -0.5720055 -0.57000554 -0.56800557 -0.5660056 -0.5640056 -0.56200564 -0.56000567 -0.5580057 -0.5560057 -0.55400575 -0.55200577 -0.5500058 -0.5480058 -0.54600585 -0.5440059 -0.5420059 -0.5400059 -0.53800595 -0.536006 -0.534006 -0.532006 -0.53000606 -0.5280061 -0.5260061 -0.5240061 -0.52200616 -0.5200062 -0.5180062 -0.51600624 -0.51400626 -0.5120063 -0.5100063 -0.50800634 -0.50600636 -0.5040064 -0.5020064 -0.50000644 -0.49800643 -0.49600646 -0.49400643 -0.4920064 -0.49000642 -0.4880064 -0.48600644 -0.4840064 -0.48200643 -0.4800064 -0.47800636 -0.4760064 -0.47400638 -0.4720064 -0.47000638 -0.46800634 -0.46600637 -0.46400633 -0.46200636 -0.46000636 -0.45800638 -0.45600635 -0.4540063 -0.45200634 -0.45000634 -0.44800636 -0.44600633 -0.44400635 -0.44200632 -0.4400063 -0.4380063 -0.4360063 -0.43400633 -0.4320063 -0.43000627 -0.4280063 -0.4260063 -0.42400628 -0.42200628 -0.42000628 -0.41800627 -0.41600627 -0.41400626 -0.41200626 -0.41000626 -0.40800625 -0.40600625 -0.40400624 -0.40200624 -0.40000623 -0.39800623 -0.39600623 -0.39400622 -0.39200622 -0.3900062 -0.3880062 -0.3860062 -0.3840062 -0.3820062 -0.3800062 -0.3780062 -0.3760062 -0.37400618 -0.37200618 -0.37000617 -0.36800617 -0.36600617 -0.36400616 -0.36200616 -0.36000615 -0.35800615 -0.35600615 -0.35400614 -0.35200614 -0.35000613 -0.34800613 -0.34600613 -0.34400612 -0.34200612 -0.3400061 -0.3380061 -0.3360061 -0.3340061 -0.3320061 -0.3300061 -0.3280061 -0.32600608 -0.32400608 -0.32200608 -0.32000607 -0.31800607 -0.31600606 -0.31400606 -0.31200606 -0.31000605 -0.30800605 -0.30600604 -0.30400604 -0.30200604 -0.30000603 -0.29800603 -0.29600602 -0.29400602 -0.29200602 -0.290006 -0.288006 -0.286006 -0.284006 -0.282006 -0.280006 -0.278006 -0.27600598 -0.27400598 -0.27200598 -0.27000597 -0.26800597 -0.26600596 -0.26400596 -0.26200596 -0.26000595 -0.25800595 -0.25600594 -0.25400594 -0.25200593 -0.25000593 -0.24800594 -0.24600591 -0.24400592 -0.24200592 -0.24000591 -0.2380059 -0.23600592 -0.23400589 -0.2320059 -0.23000589 -0.22800589 -0.22600588 -0.2240059 -0.22200586 -0.22000586 -0.21800587 -0.21600586 -0.21400586 -0.21200586 -0.21000585 -0.20800585 -0.20600584 -0.20400584 -0.20200584 -0.20000583 -0.19800583 -0.19600582 -0.19400582 -0.19200582 -0.19000581 -0.1880058 -0.1860058 -0.1840058 -0.1820058 -0.18000579 -0.17800579 -0.17600578 -0.17400578 -0.17200578 -0.17000577 -0.16800577 -0.16600576 -0.16400576 -0.16200575 -0.16000575 -0.15800575 -0.15600574 -0.15400574 -0.15200573 -0.15000573 -0.14800573 -0.14600572 -0.14400572 -0.14200571 -0.14000571 -0.1380057 -0.1360057 -0.1340057 -0.13200569 -0.13000569 -0.12800569 -0.12600568 -0.12400568 -0.122005686 -0.12000568 -0.11800569 -0.1160057 -0.11400569 -0.11200571 -0.11000571 -0.10800571 -0.10600571 -0.10400572 -0.10200572 -0.10000572 -0.09800573 -0.09600573 -0.094005734 -0.09200574 -0.09000574 -0.088005744 -0.08600575 -0.08400575 -0.082005754 -0.08000576 -0.07800576 -0.076005765 -0.07400577 -0.07200577 -0.070005775 -0.06800578 -0.06600578 -0.064005785 -0.062005785 -0.060005784 -0.058005788 -0.056005787 -0.054005787 -0.052005783 -0.050005783 -0.048005782 -0.04600578 -0.04400578 -0.04200578 -0.04000578 -0.03800578 -0.03600578 -0.03400578 -0.03200578 -0.03000578 -0.028005779 -0.026005779 -0.024005779 -0.022005778 -0.020005778 -0.018005778 -0.016005777 -0.014005776 -0.012005776 -0.010005776 -0.0080057755 -0.006005775 -0.004005775 -0.0020057748 -5.7747E-6 0.0019942255 0.0039942255 0.005994226 0.007994226 0.0099942265 0.011994227 0.013994227 0.015994227 0.017994227 0.019994228 0.021994228 0.023994228 0.025994229 0.027994227 0.02999423 0.031994228 0.033994228 0.035994228 0.03799423 0.03999423 0.04199423 0.04399423 0.04599423 0.04799423 0.04999423 0.05199423 0.053994235 0.055994235 0.057994236 0.059994232 0.061994233 0.06399423 0.065994226 0.06799422 0.06999422 0.071994215 0.07399421 0.07599421 0.077994205 0.0799942 0.0819942 0.083994195 0.08599419 0.08799419 0.089994185 0.09199418 0.09399418 0.095994175 0.09799417 0.09999417 0.101994165 0.10399416 0.10599416 0.107994154 0.10999415 0.11199415 0.11399414 0.11599414 0.11799414 0.11999414 0.12199412 0.12399413 0.12599413 0.12799414 0.12999414 0.13199415 0.13399415 0.13599415 0.13799416 0.13999416 0.14199417 0.14399417 0.14599417 0.14799418 0.14999418 0.15199419 0.15399419 0.15599419 0.1579942 0.1599942 0.1619942 0.16399421 0.16599421 0.16799422 0.16999422 0.17199423 0.17399423 0.17599423 0.17799424 0.17999424 0.18199425 0.18399425 0.18599426 0.18799426 0.18999426 0.19199427 0.19399427 0.19599428 0.19799428 0.19999428 0.20199429 0.20399429 0.2059943 0.2079943 0.2099943 0.2119943 0.21399431 0.21599432 0.21799432 0.21999432 0.22199431 0.22399432 0.22599435 0.22799434 0.22999434 0.23199435 0.23399435 0.23599434 0.23799438 0.23999436 0.24199437 0.24399437 0.24599438 0.24799437 0.2499944 0.25199437 0.25399438 0.25599438 0.25799438 0.2599944 0.2619944 0.2639944 0.2659944 0.2679944 0.2699944 0.2719944 0.27399442 0.27599442 0.27799442 0.27999443 0.28199443 0.28399444 0.28599444 0.28799444 0.28999445 0.29199445 0.29399446 0.29599446 0.29799446 0.29999447 0.30199447 0.30399448 0.30599448 0.30799449 0.3099945 0.3119945 0.3139945 0.3159945 0.3179945 0.3199945 0.3219945 0.32399452 0.32599452 0.32799453 0.32999453 0.33199453 0.33399454 0.33599454 0.33799455 0.33999455 0.34199455 0.34399456 0.34599456 0.34799457 0.34999457 0.35199457 0.35399458 0.35599458 0.3579946 0.3599946 0.3619946 0.3639946 0.3659946 0.3679946 0.3699946 0.3719946 0.37399462 0.37599462 0.37799463 0.37999463 0.38199463 0.38399464 0.38599464 0.38799465 0.38999465 0.39199466 0.39399466 0.39599466 0.39799467 0.39999467 0.40199468 0.40399468 0.40599468 0.4079947 0.4099947 0.4119947 0.4139947 0.4159947 0.4179947 0.4199947 0.42199472 0.42399472 0.42599472 0.42799473 0.42999476 0.43199474 0.43399474 0.4359947 0.43799475 0.43999478 0.44199476 0.4439948 0.44599476 0.44799477 0.44999474 0.45199478 0.4539948 0.45599478 0.4579948 0.45999476 0.4619948 0.46399477 0.4659948 0.46799484 0.4699948 0.47199482 0.4739948 0.47599483 0.47799486 0.47999483 0.48199487 0.48399484 0.48599485 0.48799482 0.48999485 0.4919949 0.49399486 0.49599487 0.49799484 0.49999487 0.50199485 0.5039948 0.5059948 0.5079948 0.50999475 0.5119947 0.5139947 0.51599467 0.51799465 0.5199946 0.5219946 0.52399457 0.52599454 0.5279945 0.5299945 0.53199447 0.53399444 0.5359944 0.5379944 0.53999436 0.54199434 0.5439943 0.5459943 0.54799426 0.54999424 0.5519942 0.5539942 0.55599416 0.5579941 0.5599941 0.5619941 0.56399405 0.565994 0.567994 0.569994 0.57199395 0.5739939 0.5759939 0.57799387 0.57999385 0.5819938 0.5839938 0.58599377 0.58799375 0.5899937 0.5919937 0.59399367 0.59599364 0.5979936 0.5999936 0.60199357 0.60399354 0.6059935 0.6079935 0.60999346 0.61199344 0.6139934 0.6159934 0.61799336 0.6199933 0.6219933 0.6239933 0.62599326 0.6279932 0.6299932 0.6319932 0.63399315 0.6359931 0.6379931 0.6399931 0.64199305 0.643993 0.645993 0.64799297 0.64999295 0.6519929 0.6539929 0.65599287 0.65799284 0.6599928 0.6619928 0.66399277 0.66599274 0.6679927 0.6699927 0.67199266 0.67399264 0.6759926 0.6779926 0.67999256 0.68199254 0.6839925 0.6859925 0.68799246 0.6899924 0.6919924 0.6939924 0.69599236 0.6979923 0.6999923 0.7019923 0.70399225 0.7059922 0.7079922 0.7099922 0.71199215 0.7139921 0.7159921 0.71799207 0.71999205 0.721992 0.723992 0.72599197 0.72799194 0.7299919 0.7319919 0.73399187 0.73599184 0.7379918 0.7399918 0.74199176 0.74399174 0.7459917 0.7479917 0.74999166 0.7519916 0.7539916 0.7559916 0.75799156 0.7599915 0.7619915 0.7639915 0.76599145 0.7679914 0.7699914 0.7719914 0.77399135 0.7759913 0.7779913 0.77999127 0.78199125 0.7839912 0.7859912 0.78799117 0.78999115 0.7919911 0.7939911 0.79599107 0.79799104 0.799991 0.801991 0.80399096 0.80599094 0.8079909 0.8099909 0.81199086 0.81399084 0.8159908 0.8179908 0.81999076 0.8219907 0.8239907 0.8259907 0.82799066 0.8299906 0.8319906 0.8339906 0.83599055 0.8379905 0.8399905 0.8419905 0.84399045 0.8459904 0.8479904 0.84999037 0.85199035 0.8539903 0.8559903 0.85799027 0.85999024 0.8619902 0.8639902 0.86599017 0.86799014 0.8699901 0.8719901 0.87399006 0.87599004 0.87799 0.87999 0.88198996 0.88398993 0.8859899 0.8879899 0.88998986 0.8919898 0.8939898 0.8959898 0.89798975 0.8999897 0.9019897 0.9039897 0.90598965 0.9079896 0.9099896 0.91198957 0.91398955 0.9159895 0.9179895 0.91998947 0.92198945 0.9239894 0.9259894 0.92798937 0.92998934 0.9319893 0.9339893 0.93598927 0.93798924 0.9399892 0.9419892 0.94398916 0.94598914 0.9479891 0.9499891 0.95198906 0.953989 0.955989 0.957989 0.95998896 0.9619889 0.9639889 0.9659889 0.96798885 0.9699888 0.9719888 0.9739888 0.97598875 0.9779887 0.9799887 0.98198867 0.98398865 0.9859886 0.9879886 0.98998857 0.99198854 0.9939885 0.9959885 0.99798847)) (quote (-1.0 -0.99999476 -0.9999792 -0.9999532 -0.99991674 -0.99986995 -0.99981285 -0.99974514 -0.9996672 -0.9995787 -0.99948 -0.9993709 -0.99925125 -0.9991213 -0.998981 -0.99883026 -0.9986692 -0.9984978 -0.99831605 -0.9981238 -0.9979214 -0.9977085 -0.9974853 -0.9972518 -0.99700785 -0.9967537 -0.9964892 -0.9962144 -0.9959293 -0.99563385 -0.9953282 -0.9950122 -0.99468595 -0.9943495 -0.99400276 -0.99364567 -0.99327845 -0.992901 -0.99251336 -0.9921154 -0.9917073 -0.99128914 -0.9908607 -0.990422 -0.9899733 -0.98951447 -0.9890453 -0.9885662 -0.98807705 -0.9875777 -0.98706824 -0.9865487 -0.98601926 -0.98547966 -0.98493 -0.9843704 -0.9838008 -0.9832212 -0.9826316 -0.98203207 -0.9814226 -0.9808032 -0.9801738 -0.9795346 -0.97888554 -0.9782266 -0.9775577 -0.9768791 -0.97619057 -0.9754923 -0.9747843 -0.9740665 -0.97333885 -0.97260154 -0.97185457 -0.9710978 -0.9703313 -0.96955526 -0.96876956 -0.9679742 -0.9671691 -0.9663546 -0.9655304 -0.96469677 -0.96385354 -0.9630007 -0.96213854 -0.9612667 -0.96038557 -0.9594949 -0.95859474 -0.95768524 -0.9567664 -0.95583815 -0.95490057 -0.9539537 -0.9529975 -0.95203197 -0.9510572 -0.9500731 -0.94908 -0.94807745 -0.94706584 -0.94604505 -0.9450151 -0.9439759 -0.9429278 -0.94187057 -0.9408042 -0.9397289 -0.93864447 -0.9375511 -0.9364487 -0.93533737 -0.9342171 -0.93308795 -0.93194986 -0.9308029 -0.9296471 -0.92848254 -0.927309 -0.9261268 -0.92493576 -0.92373604 -0.92252756 -0.9213104 -0.9200846 -0.91885007 -0.91760684 -0.9163551 -0.91509474 -0.9138257 -0.91254825 -0.9112621 -0.90996755 -0.9086645 -0.907353 -0.90603304 -0.90470464 -0.90336776 -0.90202255 -0.90066904 -0.899307 -0.8979368 -0.8965583 -0.8951714 -0.8937763 -0.89237297 -0.8909614 -0.8895416 -0.8881137 -0.8866775 -0.8852333 -0.8837809 -0.8823204 -0.88085187 -0.8793753 -0.8778906 -0.87639785 -0.8748972 -0.8733885 -0.871872 -0.8703474 -0.86881495 -0.8672745 -0.86572624 -0.8641701 -0.8626061 -0.8610343 -0.8594547 -0.8578673 -0.8562721 -0.8546692 -0.8530585 -0.8514402 -0.84981406 -0.84818036 -0.84653897 -0.8448899 -0.8432332 -0.84156895 -0.8398971 -0.8382176 -0.8365307 -0.8348361 -0.83313406 -0.83142454 -0.8297075 -0.8279831 -0.8262511 -0.82451177 -0.82276494 -0.82101077 -0.81924916 -0.81748027 -0.815704 -0.8139203 -0.8121294 -0.81033117 -0.80852557 -0.8067128 -0.8048927 -0.8030654 -0.80123085 -0.7993891 -0.7975402 -0.79568404 -0.7938208 -0.79195035 -0.7900728 -0.78818805 -0.78629625 -0.78439737 -0.7824914 -0.7805784 -0.7786583 -0.77673114 -0.774797 -0.7728558 -0.77090765 -0.76895255 -0.76699037 -0.7650213 -0.7630453 -0.7610624 -0.7590725 -0.7570758 -0.7550721 -0.7530616 -0.75104416 -0.7490199 -0.7469888 -0.7449509 -0.7429061 -0.74085457 -0.73879624 -0.7367311 -0.73465926 -0.73258055 -0.73049516 -0.728403 -0.7263042 -0.7241986 -0.7220863 -0.7199673 -0.71784175 -0.7157094 -0.7135705 -0.7114248 -0.7092726 -0.70711375 -0.70494825 -0.70277614 -0.70059747 -0.6984121 -0.69622034 -0.6940219 -0.691817 -0.6896055 -0.68738747 -0.68516297 -0.6829319 -0.6806944 -0.6784504 -0.6761999 -0.6739429 -0.6716795 -0.6694097 -0.6671334 -0.6648507 -0.6625616 -0.66026605 -0.6579641 -0.65565587 -0.6533412 -0.65102017 -0.6486928 -0.6463591 -0.64401907 -0.6416727 -0.63932 -0.63696105 -0.6345958 -0.63222427 -0.62984646 -0.6274623 -0.62507207 -0.6226755 -0.62027276 -0.6178638 -0.6154486 -0.61302716 -0.61059964 -0.60816586 -0.605726 -0.60327995 -0.60082776 -0.5983694 -0.595905 -0.59343446 -0.5909579 -0.5884751 -0.5859864 -0.5834915 -0.5809906 -0.5784837 -0.57597077 -0.57345176 -0.57092685 -0.56839586 -0.5658589 -0.56331605 -0.5607672 -0.5582124 -0.55565167 -0.5530851 -0.5505126 -0.5479342 -0.5453499 -0.5427597 -0.54016376 -0.5375619 -0.53495425 -0.53234077 -0.52972156 -0.5270965 -0.52446574 -0.52182925 -0.519187 -0.5165389 -0.51388526 -0.5112259 -0.5085608 -0.5058901 -0.50321365 -0.5005317 -0.49784407 -0.49515083 -0.49245209 -0.4897477 -0.48703784 -0.4843224 -0.48160148 -0.47887504 -0.4761431 -0.47340575 -0.47066292 -0.4679147 -0.46516106 -0.462402 -0.4596376 -0.45686784 -0.45409274 -0.45131233 -0.44852665 -0.4457357 -0.44293943 -0.44013798 -0.4373313 -0.43451944 -0.43170244 -0.42888024 -0.42605293 -0.42322052 -0.420383 -0.41754043 -0.4146928 -0.41184014 -0.40898252 -0.4061199 -0.40325236 -0.40037987 -0.39750248 -0.3946202 -0.39173308 -0.38884115 -0.38594437 -0.3830428 -0.3801365 -0.37722546 -0.37430972 -0.3713893 -0.3684642 -0.36553448 -0.36260018 -0.3596613 -0.35671788 -0.3537699 -0.35081747 -0.34786055 -0.3448992 -0.34193343 -0.3389633 -0.33598885 -0.33301002 -0.3300269 -0.32703954 -0.32404795 -0.32105213 -0.31805217 -0.31504807 -0.31203982 -0.30902752 -0.30601117 -0.3029908 -0.29996642 -0.29693815 -0.29390588 -0.29086977 -0.28782982 -0.28478602 -0.28173843 -0.27868712 -0.27563208 -0.27257335 -0.26951092 -0.26644492 -0.26337534 -0.26030222 -0.25722554 -0.25414544 -0.25106186 -0.24797489 -0.24488455 -0.2417909 -0.23869394 -0.23559372 -0.23249029 -0.22938365 -0.2262739 -0.22316101 -0.22004508 -0.21692612 -0.21380414 -0.21067924 -0.2075514 -0.20442072 -0.20128717 -0.19815085 -0.19501178 -0.19186998 -0.18872552 -0.18557842 -0.18242872 -0.17927647 -0.17612171 -0.17296449 -0.16980481 -0.16664277 -0.16347838 -0.16031169 -0.15714272 -0.15397154 -0.15079819 -0.14762269 -0.1444451 -0.14126547 -0.13808385 -0.13490024 -0.13171473 -0.12852733 -0.1253381 -0.1221471 -0.118954346 -0.11575989 -0.112563774 -0.10936605 -0.10616677 -0.102965966 -0.09976368 -0.09655996 -0.09335485 -0.090148404 -0.08694066 -0.08373166 -0.08052146 -0.0773101 -0.074097626 -0.070884086 -0.06766952 -0.064453975 -0.061237503 -0.05802015 -0.054801952 -0.051582963 -0.048363228 -0.045142793 -0.04192171 -0.038700015 -0.03547776 -0.03225499 -0.029031758 -0.025808102 -0.02258407 -0.019359714 -0.016135076 -0.012910204 -0.009685145 -0.0064599454 -0.0032346524 -9.3127E-6 0.0032160273 0.0064413208 0.009666521 0.01289158 0.016116456 0.019341093 0.022565453 0.025789483 0.029013142 0.03223638 0.03545915 0.038681407 0.041903105 0.045124196 0.04834463 0.05156437 0.05478336 0.058001563 0.061218925 0.0644354 0.067650944 0.07086552 0.07407907 0.07729155 0.08050291 0.08371312 0.086922124 0.090129875 0.09333634 0.09654145 0.09974518 0.102947466 0.10614828 0.109347575 0.112545304 0.115741424 0.11893588 0.12212865 0.12531968 0.1285089 0.13169632 0.13488184 0.13806544 0.14124711 0.14442674 0.14760435 0.15077985 0.15395321 0.1571244 0.16029337 0.16346008 0.1666245 0.16978656 0.17294623 0.17610348 0.17925826 0.18241051 0.18556021 0.18870734 0.19185183 0.19499363 0.19813273 0.20126908 0.20440263 0.20753335 0.21066119 0.21378611 0.21690808 0.22002709 0.22314304 0.22625593 0.2293657 0.23247235 0.23557581 0.23867604 0.24177303 0.24486672 0.24795707 0.25104404 0.25412765 0.25720778 0.26028445 0.26335758 0.26642722 0.26949325 0.27255565 0.2756144 0.27866948 0.28172085 0.28476843 0.28781226 0.29085225 0.2938884 0.29692063 0.299949 0.30297333 0.30599377 0.30901012 0.31202245 0.3150307 0.31803483 0.32103482 0.32403067 0.32702228 0.33000967 0.3329928 0.33597162 0.33894616 0.34191632 0.3448821 0.34784347 0.3508004 0.35375288 0.35670084 0.35964432 0.36258325 0.36551756 0.3684473 0.3713724 0.37429285 0.37720865 0.3801197 0.38302603 0.38592762 0.38882443 0.3917164 0.39460355 0.39748582 0.40036327 0.40323576 0.40610334 0.408966 0.41182366 0.41467634 0.41752398 0.42036656 0.42320412 0.42603657 0.42886388 0.43168613 0.43450317 0.43731508 0.4401218 0.44292328 0.4457195 0.44851053 0.45129627 0.45407668 0.4568518 0.45962158 0.462386 0.46514508 0.4678988 0.47064704 0.47338992 0.47612733 0.47885928 0.4815857 0.4843067 0.48702213 0.4897321 0.49243647 0.49513528 0.4978285 0.5005162 0.5031982 0.5058746 0.50854534 0.51121045 0.5138699 0.5165236 0.51917166 0.5218139 0.5244505 0.5270813 0.5297064 0.5323257 0.5349391 0.5375469 0.5401487 0.54274476 0.5453349 0.5479192 0.5504977 0.55307025 0.5556369 0.5581977 0.56075246 0.5633013 0.5658443 0.56838125 0.5709122 0.57343716 0.5759562 0.57846916 0.5809762 0.5834771 0.58597196 0.5884608 0.5909435 0.5934202 0.59589077 0.5983552 0.60081357 0.60326577 0.6057119 0.6081518 0.6105856 0.6130132 0.6154346 0.6178498 0.6202588 0.62266165 0.6250582 0.62744856 0.6298326 0.6322105 0.63458205 0.63694734 0.63930637 0.6416591 0.6440055 0.64634556 0.6486793 0.6510067 0.65332777 0.65564245 0.6579508 0.66025275 0.6625483 0.6648375 0.66712016 0.6693965 0.67166645 0.6739298 0.6761868 0.67843736 0.6806814 0.68291897 0.68515 0.68737466 0.68959266 0.69180424 0.6940092 0.69620765 0.6983995 0.7005848 0.70276356 0.70493567 0.7071012 0.7092601 0.71141243 0.7135581 0.71569705 0.7178294 0.7199551 0.72207404 0.72418637 0.726292 0.72839094 0.7304831 0.7325685 0.7346472 0.73671914 0.7387843 0.7408427 0.7428943 0.7449391 0.74697704 0.7490082 0.7510325 0.7530499 0.7550605 0.75706417 0.759061 0.7610509 0.7630339 0.76500994 0.76697904 0.7689412 0.7708964 0.7728446 0.7747858 0.77672 0.7786471 0.7805673 0.78248036 0.78438634 0.78628535 0.78817714 0.7900619 0.7919395 0.79380996 0.7956733 0.79752946 0.79937846 0.80122024 0.8030548 0.80488217 0.80670226 0.80851514 0.8103207 0.812119 0.81390995 0.8156937 0.81747 0.81923897 0.8210006 0.8227548 0.82450164 0.8262411 0.82797307 0.8296976 0.83141464 0.8331242 0.83482636 0.8365209 0.8382079 0.83988745 0.8415593 0.84322364 0.84488035 0.8465294 0.8481709 0.84980464 0.8514308 0.8530492 0.8546599 0.85626287 0.8578581 0.8594456 0.86102516 0.862597 0.8641611 0.86571724 0.86726565 0.86880607 0.87033856 0.8718632 0.8733798 0.8748885 0.87638927 0.87788195 0.87936664 0.88084335 0.882312 0.8837725 0.88522494 0.8866692 0.8881054 0.88953335 0.89095325 0.8923648 0.8937682 0.8951634 0.8965503 0.89792884 0.89929915 0.9006612 0.9020148 0.90336 0.90469695 0.90602535 0.9073454 0.90865696 0.9099601 0.9112547 0.9125408 0.9138183 0.91508735 0.9163478 0.9175996 0.91884286 0.92007745 0.92130334 0.9225206 0.9237291 0.9249289 0.9261199 0.92730225 0.92847574 0.9296405 0.93079627 0.93194324 0.9330814 0.93421066 0.9353309 0.93644226 0.9375447 0.93863816 0.93972266 0.94079805 0.94186444 0.94292176 0.94397 0.94500906 0.9460391 0.9470599 0.9480716 0.94907415 0.9500674 0.9510515 0.9520263 0.95299197 0.95394814 0.95489514 0.95583284 0.95676107 0.95768005 0.95858956 0.95948965 0.96038044 0.9612617 0.9621335 0.9629958 0.9638486 0.9646919 0.9655257 0.96634984 0.9671645 0.9679695 0.9687649 0.9695507 0.97032685 0.9710934 0.97185016 0.97259725 0.9733346 0.97406227 0.9747801 0.9754883 0.9761866 0.9768751 0.97755385 0.97822267 0.9788817 0.9795309 0.98017014 0.9807996 0.981419 0.9820286 0.98262817 0.9832178 0.98379744 0.98436714 0.9849268 0.9854765 0.98601616 0.98654575 0.98706526 0.98757476 0.9880742 0.9885635 0.9890427 0.9895118 0.9899706 0.99041945 0.99085814 0.9912867 0.991705 0.9921132 0.9925111 0.99289877 0.9932763 0.99364365 0.9940007 0.9943475 0.9946841 0.9950104 0.99532635 0.9956321 0.99592764 0.9962127 0.9964877 0.9967522 0.9970064 0.9972504 0.9974839 0.99770725 0.99792016 0.9981227 0.9983149 0.9984968 0.9986683 0.99882937 0.9989802 0.9991205 0.99925054 0.99937016 0.9994794 0.99957824 0.9996667 0.9997447 0.9998124 0.99986965 0.99991656 0.999953 0.99997914 0.99999476)) (quote bpf) 10))) (setf (bpfcolor newbpf) (om-make-color 0 0 0)) (set-name newbpf nil) newbpf)))) (when newobj) newobj) nil nil (pairlis (quote (picture winpos winsize)) (list nil (om-make-point 619 145) (om-make-point 1034 630))) t nil nil nil) (om-load-boxcomment "comment 7" (om-make-point 106 30) (quote "transferfunction") "" (om-make-point 623 382) nil (om-make-color 0.0 0.19194556 1.0) (om-make-font "Verdana" 12 :family "Verdana" :style (quote (:italic)) :mode (quote nil))) (om-load-boxcomment "comment 6" (om-make-point 57 30) (quote "amount") "" (om-make-point 660 156) nil (om-make-color 0.0 0.19194556 1.0) (om-make-font "Verdana" 11.0 :family "Verdana" :style (quote (:italic)) :mode (quote nil))) (om-load-boxcall (quote bastype) "aux 2" (quote t) (quote nil) (om-make-point 625 157) (om-make-point 27 30) 5 "5" nil) (om-load-boxcomment "comment 5" (om-make-point 196 39) (quote "this patch plots the $transferfunction of sox-contrast") "" (om-make-point 678 207) nil (om-make-color 0.0 0.19194556 1.0) (om-make-font "Verdana" 11.0 :family "Verdana" :style (quote (:italic)) :mode (quote nil))) (om-load-boxcall (quote patch-box) "plot-sox-contrast" (quote ("elements" "om-sox-tutorials" "support" "plot-sox-contrast")) (quote ((om-load-inputfun (quote input-funbox) "" "input" nil))) (om-make-point 585 200) nil (list (let ((newobj (when (find-class (quote bpf) nil) (let ((newbpf (simple-bpf-from-list (quote (-1.0 -0.998 -0.99600006 -0.9940001 -0.9920001 -0.9900001 -0.98800016 -0.9860002 -0.9840002 -0.98200024 -0.98000026 -0.9780003 -0.9760003 -0.97400034 -0.97200037 -0.9700004 -0.9680004 -0.96600044 -0.96400047 -0.9620005 -0.9600005 -0.95800055 -0.95600057 -0.9540006 -0.9520006 -0.95000065 -0.94800067 -0.9460007 -0.9440007 -0.94200075 -0.9400008 -0.9380008 -0.9360008 -0.93400085 -0.9320009 -0.9300009 -0.9280009 -0.92600096 -0.924001 -0.922001 -0.92000103 -0.91800106 -0.9160011 -0.9140011 -0.91200114 -0.91000116 -0.9080012 -0.9060012 -0.90400124 -0.90200127 -0.9000013 -0.8980013 -0.89600134 -0.89400137 -0.8920014 -0.8900014 -0.88800145 -0.88600147 -0.8840015 -0.8820015 -0.88000155 -0.8780016 -0.8760016 -0.8740016 -0.87200165 -0.8700017 -0.8680017 -0.8660017 -0.86400176 -0.8620018 -0.8600018 -0.8580018 -0.85600186 -0.8540019 -0.8520019 -0.85000194 -0.84800196 -0.846002 -0.844002 -0.84200204 -0.84000206 -0.8380021 -0.8360021 -0.83400214 -0.83200217 -0.8300022 -0.8280022 -0.82600224 -0.82400227 -0.8220023 -0.8200023 -0.81800235 -0.81600237 -0.8140024 -0.8120024 -0.81000245 -0.8080025 -0.8060025 -0.8040025 -0.80200255 -0.8000026 -0.7980026 -0.7960026 -0.79400266 -0.7920027 -0.7900027 -0.7880027 -0.78600276 -0.7840028 -0.7820028 -0.78000284 -0.77800286 -0.7760029 -0.7740029 -0.77200294 -0.77000297 -0.768003 -0.766003 -0.76400304 -0.76200307 -0.7600031 -0.7580031 -0.75600315 -0.75400317 -0.7520032 -0.7500032 -0.74800325 -0.74600327 -0.7440033 -0.7420033 -0.74000335 -0.7380034 -0.7360034 -0.7340034 -0.73200346 -0.7300035 -0.7280035 -0.7260035 -0.72400356 -0.7220036 -0.7200036 -0.71800364 -0.71600366 -0.7140037 -0.7120037 -0.71000374 -0.70800376 -0.7060038 -0.7040038 -0.70200384 -0.70000387 -0.6980039 -0.6960039 -0.69400394 -0.69200397 -0.690004 -0.688004 -0.68600405 -0.68400407 -0.6820041 -0.6800041 -0.67800415 -0.6760042 -0.6740042 -0.6720042 -0.67000425 -0.6680043 -0.6660043 -0.6640043 -0.66200436 -0.6600044 -0.6580044 -0.6560044 -0.65400446 -0.6520045 -0.6500045 -0.64800454 -0.64600456 -0.6440046 -0.6420046 -0.64000464 -0.63800467 -0.6360047 -0.6340047 -0.63200474 -0.63000477 -0.6280048 -0.6260048 -0.62400485 -0.62200487 -0.6200049 -0.6180049 -0.61600495 -0.61400497 -0.612005 -0.610005 -0.60800505 -0.6060051 -0.6040051 -0.6020051 -0.60000515 -0.5980052 -0.5960052 -0.5940052 -0.59200526 -0.5900053 -0.5880053 -0.58600533 -0.58400536 -0.5820054 -0.5800054 -0.57800544 -0.57600546 -0.5740055 -0.5720055 -0.57000554 -0.56800557 -0.5660056 -0.5640056 -0.56200564 -0.56000567 -0.5580057 -0.5560057 -0.55400575 -0.55200577 -0.5500058 -0.5480058 -0.54600585 -0.5440059 -0.5420059 -0.5400059 -0.53800595 -0.536006 -0.534006 -0.532006 -0.53000606 -0.5280061 -0.5260061 -0.5240061 -0.52200616 -0.5200062 -0.5180062 -0.51600624 -0.51400626 -0.5120063 -0.5100063 -0.50800634 -0.50600636 -0.5040064 -0.5020064 -0.50000644 -0.49800643 -0.49600646 -0.49400643 -0.4920064 -0.49000642 -0.4880064 -0.48600644 -0.4840064 -0.48200643 -0.4800064 -0.47800636 -0.4760064 -0.47400638 -0.4720064 -0.47000638 -0.46800634 -0.46600637 -0.46400633 -0.46200636 -0.46000636 -0.45800638 -0.45600635 -0.4540063 -0.45200634 -0.45000634 -0.44800636 -0.44600633 -0.44400635 -0.44200632 -0.4400063 -0.4380063 -0.4360063 -0.43400633 -0.4320063 -0.43000627 -0.4280063 -0.4260063 -0.42400628 -0.42200628 -0.42000628 -0.41800627 -0.41600627 -0.41400626 -0.41200626 -0.41000626 -0.40800625 -0.40600625 -0.40400624 -0.40200624 -0.40000623 -0.39800623 -0.39600623 -0.39400622 -0.39200622 -0.3900062 -0.3880062 -0.3860062 -0.3840062 -0.3820062 -0.3800062 -0.3780062 -0.3760062 -0.37400618 -0.37200618 -0.37000617 -0.36800617 -0.36600617 -0.36400616 -0.36200616 -0.36000615 -0.35800615 -0.35600615 -0.35400614 -0.35200614 -0.35000613 -0.34800613 -0.34600613 -0.34400612 -0.34200612 -0.3400061 -0.3380061 -0.3360061 -0.3340061 -0.3320061 -0.3300061 -0.3280061 -0.32600608 -0.32400608 -0.32200608 -0.32000607 -0.31800607 -0.31600606 -0.31400606 -0.31200606 -0.31000605 -0.30800605 -0.30600604 -0.30400604 -0.30200604 -0.30000603 -0.29800603 -0.29600602 -0.29400602 -0.29200602 -0.290006 -0.288006 -0.286006 -0.284006 -0.282006 -0.280006 -0.278006 -0.27600598 -0.27400598 -0.27200598 -0.27000597 -0.26800597 -0.26600596 -0.26400596 -0.26200596 -0.26000595 -0.25800595 -0.25600594 -0.25400594 -0.25200593 -0.25000593 -0.24800594 -0.24600591 -0.24400592 -0.24200592 -0.24000591 -0.2380059 -0.23600592 -0.23400589 -0.2320059 -0.23000589 -0.22800589 -0.22600588 -0.2240059 -0.22200586 -0.22000586 -0.21800587 -0.21600586 -0.21400586 -0.21200586 -0.21000585 -0.20800585 -0.20600584 -0.20400584 -0.20200584 -0.20000583 -0.19800583 -0.19600582 -0.19400582 -0.19200582 -0.19000581 -0.1880058 -0.1860058 -0.1840058 -0.1820058 -0.18000579 -0.17800579 -0.17600578 -0.17400578 -0.17200578 -0.17000577 -0.16800577 -0.16600576 -0.16400576 -0.16200575 -0.16000575 -0.15800575 -0.15600574 -0.15400574 -0.15200573 -0.15000573 -0.14800573 -0.14600572 -0.14400572 -0.14200571 -0.14000571 -0.1380057 -0.1360057 -0.1340057 -0.13200569 -0.13000569 -0.12800569 -0.12600568 -0.12400568 -0.122005686 -0.12000568 -0.11800569 -0.1160057 -0.11400569 -0.11200571 -0.11000571 -0.10800571 -0.10600571 -0.10400572 -0.10200572 -0.10000572 -0.09800573 -0.09600573 -0.094005734 -0.09200574 -0.09000574 -0.088005744 -0.08600575 -0.08400575 -0.082005754 -0.08000576 -0.07800576 -0.076005765 -0.07400577 -0.07200577 -0.070005775 -0.06800578 -0.06600578 -0.064005785 -0.062005785 -0.060005784 -0.058005788 -0.056005787 -0.054005787 -0.052005783 -0.050005783 -0.048005782 -0.04600578 -0.04400578 -0.04200578 -0.04000578 -0.03800578 -0.03600578 -0.03400578 -0.03200578 -0.03000578 -0.028005779 -0.026005779 -0.024005779 -0.022005778 -0.020005778 -0.018005778 -0.016005777 -0.014005776 -0.012005776 -0.010005776 -0.0080057755 -0.006005775 -0.004005775 -0.0020057748 -5.7747E-6 0.0019942255 0.0039942255 0.005994226 0.007994226 0.0099942265 0.011994227 0.013994227 0.015994227 0.017994227 0.019994228 0.021994228 0.023994228 0.025994229 0.027994227 0.02999423 0.031994228 0.033994228 0.035994228 0.03799423 0.03999423 0.04199423 0.04399423 0.04599423 0.04799423 0.04999423 0.05199423 0.053994235 0.055994235 0.057994236 0.059994232 0.061994233 0.06399423 0.065994226 0.06799422 0.06999422 0.071994215 0.07399421 0.07599421 0.077994205 0.0799942 0.0819942 0.083994195 0.08599419 0.08799419 0.089994185 0.09199418 0.09399418 0.095994175 0.09799417 0.09999417 0.101994165 0.10399416 0.10599416 0.107994154 0.10999415 0.11199415 0.11399414 0.11599414 0.11799414 0.11999414 0.12199412 0.12399413 0.12599413 0.12799414 0.12999414 0.13199415 0.13399415 0.13599415 0.13799416 0.13999416 0.14199417 0.14399417 0.14599417 0.14799418 0.14999418 0.15199419 0.15399419 0.15599419 0.1579942 0.1599942 0.1619942 0.16399421 0.16599421 0.16799422 0.16999422 0.17199423 0.17399423 0.17599423 0.17799424 0.17999424 0.18199425 0.18399425 0.18599426 0.18799426 0.18999426 0.19199427 0.19399427 0.19599428 0.19799428 0.19999428 0.20199429 0.20399429 0.2059943 0.2079943 0.2099943 0.2119943 0.21399431 0.21599432 0.21799432 0.21999432 0.22199431 0.22399432 0.22599435 0.22799434 0.22999434 0.23199435 0.23399435 0.23599434 0.23799438 0.23999436 0.24199437 0.24399437 0.24599438 0.24799437 0.2499944 0.25199437 0.25399438 0.25599438 0.25799438 0.2599944 0.2619944 0.2639944 0.2659944 0.2679944 0.2699944 0.2719944 0.27399442 0.27599442 0.27799442 0.27999443 0.28199443 0.28399444 0.28599444 0.28799444 0.28999445 0.29199445 0.29399446 0.29599446 0.29799446 0.29999447 0.30199447 0.30399448 0.30599448 0.30799449 0.3099945 0.3119945 0.3139945 0.3159945 0.3179945 0.3199945 0.3219945 0.32399452 0.32599452 0.32799453 0.32999453 0.33199453 0.33399454 0.33599454 0.33799455 0.33999455 0.34199455 0.34399456 0.34599456 0.34799457 0.34999457 0.35199457 0.35399458 0.35599458 0.3579946 0.3599946 0.3619946 0.3639946 0.3659946 0.3679946 0.3699946 0.3719946 0.37399462 0.37599462 0.37799463 0.37999463 0.38199463 0.38399464 0.38599464 0.38799465 0.38999465 0.39199466 0.39399466 0.39599466 0.39799467 0.39999467 0.40199468 0.40399468 0.40599468 0.4079947 0.4099947 0.4119947 0.4139947 0.4159947 0.4179947 0.4199947 0.42199472 0.42399472 0.42599472 0.42799473 0.42999476 0.43199474 0.43399474 0.4359947 0.43799475 0.43999478 0.44199476 0.4439948 0.44599476 0.44799477 0.44999474 0.45199478 0.4539948 0.45599478 0.4579948 0.45999476 0.4619948 0.46399477 0.4659948 0.46799484 0.4699948 0.47199482 0.4739948 0.47599483 0.47799486 0.47999483 0.48199487 0.48399484 0.48599485 0.48799482 0.48999485 0.4919949 0.49399486 0.49599487 0.49799484 0.49999487 0.50199485 0.5039948 0.5059948 0.5079948 0.50999475 0.5119947 0.5139947 0.51599467 0.51799465 0.5199946 0.5219946 0.52399457 0.52599454 0.5279945 0.5299945 0.53199447 0.53399444 0.5359944 0.5379944 0.53999436 0.54199434 0.5439943 0.5459943 0.54799426 0.54999424 0.5519942 0.5539942 0.55599416 0.5579941 0.5599941 0.5619941 0.56399405 0.565994 0.567994 0.569994 0.57199395 0.5739939 0.5759939 0.57799387 0.57999385 0.5819938 0.5839938 0.58599377 0.58799375 0.5899937 0.5919937 0.59399367 0.59599364 0.5979936 0.5999936 0.60199357 0.60399354 0.6059935 0.6079935 0.60999346 0.61199344 0.6139934 0.6159934 0.61799336 0.6199933 0.6219933 0.6239933 0.62599326 0.6279932 0.6299932 0.6319932 0.63399315 0.6359931 0.6379931 0.6399931 0.64199305 0.643993 0.645993 0.64799297 0.64999295 0.6519929 0.6539929 0.65599287 0.65799284 0.6599928 0.6619928 0.66399277 0.66599274 0.6679927 0.6699927 0.67199266 0.67399264 0.6759926 0.6779926 0.67999256 0.68199254 0.6839925 0.6859925 0.68799246 0.6899924 0.6919924 0.6939924 0.69599236 0.6979923 0.6999923 0.7019923 0.70399225 0.7059922 0.7079922 0.7099922 0.71199215 0.7139921 0.7159921 0.71799207 0.71999205 0.721992 0.723992 0.72599197 0.72799194 0.7299919 0.7319919 0.73399187 0.73599184 0.7379918 0.7399918 0.74199176 0.74399174 0.7459917 0.7479917 0.74999166 0.7519916 0.7539916 0.7559916 0.75799156 0.7599915 0.7619915 0.7639915 0.76599145 0.7679914 0.7699914 0.7719914 0.77399135 0.7759913 0.7779913 0.77999127 0.78199125 0.7839912 0.7859912 0.78799117 0.78999115 0.7919911 0.7939911 0.79599107 0.79799104 0.799991 0.801991 0.80399096 0.80599094 0.8079909 0.8099909 0.81199086 0.81399084 0.8159908 0.8179908 0.81999076 0.8219907 0.8239907 0.8259907 0.82799066 0.8299906 0.8319906 0.8339906 0.83599055 0.8379905 0.8399905 0.8419905 0.84399045 0.8459904 0.8479904 0.84999037 0.85199035 0.8539903 0.8559903 0.85799027 0.85999024 0.8619902 0.8639902 0.86599017 0.86799014 0.8699901 0.8719901 0.87399006 0.87599004 0.87799 0.87999 0.88198996 0.88398993 0.8859899 0.8879899 0.88998986 0.8919898 0.8939898 0.8959898 0.89798975 0.8999897 0.9019897 0.9039897 0.90598965 0.9079896 0.9099896 0.91198957 0.91398955 0.9159895 0.9179895 0.91998947 0.92198945 0.9239894 0.9259894 0.92798937 0.92998934 0.9319893 0.9339893 0.93598927 0.93798924 0.9399892 0.9419892 0.94398916 0.94598914 0.9479891 0.9499891 0.95198906 0.953989 0.955989 0.957989 0.95998896 0.9619889 0.9639889 0.9659889 0.96798885 0.9699888 0.9719888 0.9739888 0.97598875 0.9779887 0.9799887 0.98198867 0.98398865 0.9859886 0.9879886 0.98998857 0.99198854 0.9939885 0.9959885 0.99798847)) (quote (-1.0 -0.99999476 -0.9999792 -0.9999532 -0.99991674 -0.99986995 -0.99981285 -0.99974514 -0.9996672 -0.9995787 -0.99948 -0.9993709 -0.99925125 -0.9991213 -0.998981 -0.99883026 -0.9986692 -0.9984978 -0.99831605 -0.9981238 -0.9979214 -0.9977085 -0.9974853 -0.9972518 -0.99700785 -0.9967537 -0.9964892 -0.9962144 -0.9959293 -0.99563385 -0.9953282 -0.9950122 -0.99468595 -0.9943495 -0.99400276 -0.99364567 -0.99327845 -0.992901 -0.99251336 -0.9921154 -0.9917073 -0.99128914 -0.9908607 -0.990422 -0.9899733 -0.98951447 -0.9890453 -0.9885662 -0.98807705 -0.9875777 -0.98706824 -0.9865487 -0.98601926 -0.98547966 -0.98493 -0.9843704 -0.9838008 -0.9832212 -0.9826316 -0.98203207 -0.9814226 -0.9808032 -0.9801738 -0.9795346 -0.97888554 -0.9782266 -0.9775577 -0.9768791 -0.97619057 -0.9754923 -0.9747843 -0.9740665 -0.97333885 -0.97260154 -0.97185457 -0.9710978 -0.9703313 -0.96955526 -0.96876956 -0.9679742 -0.9671691 -0.9663546 -0.9655304 -0.96469677 -0.96385354 -0.9630007 -0.96213854 -0.9612667 -0.96038557 -0.9594949 -0.95859474 -0.95768524 -0.9567664 -0.95583815 -0.95490057 -0.9539537 -0.9529975 -0.95203197 -0.9510572 -0.9500731 -0.94908 -0.94807745 -0.94706584 -0.94604505 -0.9450151 -0.9439759 -0.9429278 -0.94187057 -0.9408042 -0.9397289 -0.93864447 -0.9375511 -0.9364487 -0.93533737 -0.9342171 -0.93308795 -0.93194986 -0.9308029 -0.9296471 -0.92848254 -0.927309 -0.9261268 -0.92493576 -0.92373604 -0.92252756 -0.9213104 -0.9200846 -0.91885007 -0.91760684 -0.9163551 -0.91509474 -0.9138257 -0.91254825 -0.9112621 -0.90996755 -0.9086645 -0.907353 -0.90603304 -0.90470464 -0.90336776 -0.90202255 -0.90066904 -0.899307 -0.8979368 -0.8965583 -0.8951714 -0.8937763 -0.89237297 -0.8909614 -0.8895416 -0.8881137 -0.8866775 -0.8852333 -0.8837809 -0.8823204 -0.88085187 -0.8793753 -0.8778906 -0.87639785 -0.8748972 -0.8733885 -0.871872 -0.8703474 -0.86881495 -0.8672745 -0.86572624 -0.8641701 -0.8626061 -0.8610343 -0.8594547 -0.8578673 -0.8562721 -0.8546692 -0.8530585 -0.8514402 -0.84981406 -0.84818036 -0.84653897 -0.8448899 -0.8432332 -0.84156895 -0.8398971 -0.8382176 -0.8365307 -0.8348361 -0.83313406 -0.83142454 -0.8297075 -0.8279831 -0.8262511 -0.82451177 -0.82276494 -0.82101077 -0.81924916 -0.81748027 -0.815704 -0.8139203 -0.8121294 -0.81033117 -0.80852557 -0.8067128 -0.8048927 -0.8030654 -0.80123085 -0.7993891 -0.7975402 -0.79568404 -0.7938208 -0.79195035 -0.7900728 -0.78818805 -0.78629625 -0.78439737 -0.7824914 -0.7805784 -0.7786583 -0.77673114 -0.774797 -0.7728558 -0.77090765 -0.76895255 -0.76699037 -0.7650213 -0.7630453 -0.7610624 -0.7590725 -0.7570758 -0.7550721 -0.7530616 -0.75104416 -0.7490199 -0.7469888 -0.7449509 -0.7429061 -0.74085457 -0.73879624 -0.7367311 -0.73465926 -0.73258055 -0.73049516 -0.728403 -0.7263042 -0.7241986 -0.7220863 -0.7199673 -0.71784175 -0.7157094 -0.7135705 -0.7114248 -0.7092726 -0.70711375 -0.70494825 -0.70277614 -0.70059747 -0.6984121 -0.69622034 -0.6940219 -0.691817 -0.6896055 -0.68738747 -0.68516297 -0.6829319 -0.6806944 -0.6784504 -0.6761999 -0.6739429 -0.6716795 -0.6694097 -0.6671334 -0.6648507 -0.6625616 -0.66026605 -0.6579641 -0.65565587 -0.6533412 -0.65102017 -0.6486928 -0.6463591 -0.64401907 -0.6416727 -0.63932 -0.63696105 -0.6345958 -0.63222427 -0.62984646 -0.6274623 -0.62507207 -0.6226755 -0.62027276 -0.6178638 -0.6154486 -0.61302716 -0.61059964 -0.60816586 -0.605726 -0.60327995 -0.60082776 -0.5983694 -0.595905 -0.59343446 -0.5909579 -0.5884751 -0.5859864 -0.5834915 -0.5809906 -0.5784837 -0.57597077 -0.57345176 -0.57092685 -0.56839586 -0.5658589 -0.56331605 -0.5607672 -0.5582124 -0.55565167 -0.5530851 -0.5505126 -0.5479342 -0.5453499 -0.5427597 -0.54016376 -0.5375619 -0.53495425 -0.53234077 -0.52972156 -0.5270965 -0.52446574 -0.52182925 -0.519187 -0.5165389 -0.51388526 -0.5112259 -0.5085608 -0.5058901 -0.50321365 -0.5005317 -0.49784407 -0.49515083 -0.49245209 -0.4897477 -0.48703784 -0.4843224 -0.48160148 -0.47887504 -0.4761431 -0.47340575 -0.47066292 -0.4679147 -0.46516106 -0.462402 -0.4596376 -0.45686784 -0.45409274 -0.45131233 -0.44852665 -0.4457357 -0.44293943 -0.44013798 -0.4373313 -0.43451944 -0.43170244 -0.42888024 -0.42605293 -0.42322052 -0.420383 -0.41754043 -0.4146928 -0.41184014 -0.40898252 -0.4061199 -0.40325236 -0.40037987 -0.39750248 -0.3946202 -0.39173308 -0.38884115 -0.38594437 -0.3830428 -0.3801365 -0.37722546 -0.37430972 -0.3713893 -0.3684642 -0.36553448 -0.36260018 -0.3596613 -0.35671788 -0.3537699 -0.35081747 -0.34786055 -0.3448992 -0.34193343 -0.3389633 -0.33598885 -0.33301002 -0.3300269 -0.32703954 -0.32404795 -0.32105213 -0.31805217 -0.31504807 -0.31203982 -0.30902752 -0.30601117 -0.3029908 -0.29996642 -0.29693815 -0.29390588 -0.29086977 -0.28782982 -0.28478602 -0.28173843 -0.27868712 -0.27563208 -0.27257335 -0.26951092 -0.26644492 -0.26337534 -0.26030222 -0.25722554 -0.25414544 -0.25106186 -0.24797489 -0.24488455 -0.2417909 -0.23869394 -0.23559372 -0.23249029 -0.22938365 -0.2262739 -0.22316101 -0.22004508 -0.21692612 -0.21380414 -0.21067924 -0.2075514 -0.20442072 -0.20128717 -0.19815085 -0.19501178 -0.19186998 -0.18872552 -0.18557842 -0.18242872 -0.17927647 -0.17612171 -0.17296449 -0.16980481 -0.16664277 -0.16347838 -0.16031169 -0.15714272 -0.15397154 -0.15079819 -0.14762269 -0.1444451 -0.14126547 -0.13808385 -0.13490024 -0.13171473 -0.12852733 -0.1253381 -0.1221471 -0.118954346 -0.11575989 -0.112563774 -0.10936605 -0.10616677 -0.102965966 -0.09976368 -0.09655996 -0.09335485 -0.090148404 -0.08694066 -0.08373166 -0.08052146 -0.0773101 -0.074097626 -0.070884086 -0.06766952 -0.064453975 -0.061237503 -0.05802015 -0.054801952 -0.051582963 -0.048363228 -0.045142793 -0.04192171 -0.038700015 -0.03547776 -0.03225499 -0.029031758 -0.025808102 -0.02258407 -0.019359714 -0.016135076 -0.012910204 -0.009685145 -0.0064599454 -0.0032346524 -9.3127E-6 0.0032160273 0.0064413208 0.009666521 0.01289158 0.016116456 0.019341093 0.022565453 0.025789483 0.029013142 0.03223638 0.03545915 0.038681407 0.041903105 0.045124196 0.04834463 0.05156437 0.05478336 0.058001563 0.061218925 0.0644354 0.067650944 0.07086552 0.07407907 0.07729155 0.08050291 0.08371312 0.086922124 0.090129875 0.09333634 0.09654145 0.09974518 0.102947466 0.10614828 0.109347575 0.112545304 0.115741424 0.11893588 0.12212865 0.12531968 0.1285089 0.13169632 0.13488184 0.13806544 0.14124711 0.14442674 0.14760435 0.15077985 0.15395321 0.1571244 0.16029337 0.16346008 0.1666245 0.16978656 0.17294623 0.17610348 0.17925826 0.18241051 0.18556021 0.18870734 0.19185183 0.19499363 0.19813273 0.20126908 0.20440263 0.20753335 0.21066119 0.21378611 0.21690808 0.22002709 0.22314304 0.22625593 0.2293657 0.23247235 0.23557581 0.23867604 0.24177303 0.24486672 0.24795707 0.25104404 0.25412765 0.25720778 0.26028445 0.26335758 0.26642722 0.26949325 0.27255565 0.2756144 0.27866948 0.28172085 0.28476843 0.28781226 0.29085225 0.2938884 0.29692063 0.299949 0.30297333 0.30599377 0.30901012 0.31202245 0.3150307 0.31803483 0.32103482 0.32403067 0.32702228 0.33000967 0.3329928 0.33597162 0.33894616 0.34191632 0.3448821 0.34784347 0.3508004 0.35375288 0.35670084 0.35964432 0.36258325 0.36551756 0.3684473 0.3713724 0.37429285 0.37720865 0.3801197 0.38302603 0.38592762 0.38882443 0.3917164 0.39460355 0.39748582 0.40036327 0.40323576 0.40610334 0.408966 0.41182366 0.41467634 0.41752398 0.42036656 0.42320412 0.42603657 0.42886388 0.43168613 0.43450317 0.43731508 0.4401218 0.44292328 0.4457195 0.44851053 0.45129627 0.45407668 0.4568518 0.45962158 0.462386 0.46514508 0.4678988 0.47064704 0.47338992 0.47612733 0.47885928 0.4815857 0.4843067 0.48702213 0.4897321 0.49243647 0.49513528 0.4978285 0.5005162 0.5031982 0.5058746 0.50854534 0.51121045 0.5138699 0.5165236 0.51917166 0.5218139 0.5244505 0.5270813 0.5297064 0.5323257 0.5349391 0.5375469 0.5401487 0.54274476 0.5453349 0.5479192 0.5504977 0.55307025 0.5556369 0.5581977 0.56075246 0.5633013 0.5658443 0.56838125 0.5709122 0.57343716 0.5759562 0.57846916 0.5809762 0.5834771 0.58597196 0.5884608 0.5909435 0.5934202 0.59589077 0.5983552 0.60081357 0.60326577 0.6057119 0.6081518 0.6105856 0.6130132 0.6154346 0.6178498 0.6202588 0.62266165 0.6250582 0.62744856 0.6298326 0.6322105 0.63458205 0.63694734 0.63930637 0.6416591 0.6440055 0.64634556 0.6486793 0.6510067 0.65332777 0.65564245 0.6579508 0.66025275 0.6625483 0.6648375 0.66712016 0.6693965 0.67166645 0.6739298 0.6761868 0.67843736 0.6806814 0.68291897 0.68515 0.68737466 0.68959266 0.69180424 0.6940092 0.69620765 0.6983995 0.7005848 0.70276356 0.70493567 0.7071012 0.7092601 0.71141243 0.7135581 0.71569705 0.7178294 0.7199551 0.72207404 0.72418637 0.726292 0.72839094 0.7304831 0.7325685 0.7346472 0.73671914 0.7387843 0.7408427 0.7428943 0.7449391 0.74697704 0.7490082 0.7510325 0.7530499 0.7550605 0.75706417 0.759061 0.7610509 0.7630339 0.76500994 0.76697904 0.7689412 0.7708964 0.7728446 0.7747858 0.77672 0.7786471 0.7805673 0.78248036 0.78438634 0.78628535 0.78817714 0.7900619 0.7919395 0.79380996 0.7956733 0.79752946 0.79937846 0.80122024 0.8030548 0.80488217 0.80670226 0.80851514 0.8103207 0.812119 0.81390995 0.8156937 0.81747 0.81923897 0.8210006 0.8227548 0.82450164 0.8262411 0.82797307 0.8296976 0.83141464 0.8331242 0.83482636 0.8365209 0.8382079 0.83988745 0.8415593 0.84322364 0.84488035 0.8465294 0.8481709 0.84980464 0.8514308 0.8530492 0.8546599 0.85626287 0.8578581 0.8594456 0.86102516 0.862597 0.8641611 0.86571724 0.86726565 0.86880607 0.87033856 0.8718632 0.8733798 0.8748885 0.87638927 0.87788195 0.87936664 0.88084335 0.882312 0.8837725 0.88522494 0.8866692 0.8881054 0.88953335 0.89095325 0.8923648 0.8937682 0.8951634 0.8965503 0.89792884 0.89929915 0.9006612 0.9020148 0.90336 0.90469695 0.90602535 0.9073454 0.90865696 0.9099601 0.9112547 0.9125408 0.9138183 0.91508735 0.9163478 0.9175996 0.91884286 0.92007745 0.92130334 0.9225206 0.9237291 0.9249289 0.9261199 0.92730225 0.92847574 0.9296405 0.93079627 0.93194324 0.9330814 0.93421066 0.9353309 0.93644226 0.9375447 0.93863816 0.93972266 0.94079805 0.94186444 0.94292176 0.94397 0.94500906 0.9460391 0.9470599 0.9480716 0.94907415 0.9500674 0.9510515 0.9520263 0.95299197 0.95394814 0.95489514 0.95583284 0.95676107 0.95768005 0.95858956 0.95948965 0.96038044 0.9612617 0.9621335 0.9629958 0.9638486 0.9646919 0.9655257 0.96634984 0.9671645 0.9679695 0.9687649 0.9695507 0.97032685 0.9710934 0.97185016 0.97259725 0.9733346 0.97406227 0.9747801 0.9754883 0.9761866 0.9768751 0.97755385 0.97822267 0.9788817 0.9795309 0.98017014 0.9807996 0.981419 0.9820286 0.98262817 0.9832178 0.98379744 0.98436714 0.9849268 0.9854765 0.98601616 0.98654575 0.98706526 0.98757476 0.9880742 0.9885635 0.9890427 0.9895118 0.9899706 0.99041945 0.99085814 0.9912867 0.991705 0.9921132 0.9925111 0.99289877 0.9932763 0.99364365 0.9940007 0.9943475 0.9946841 0.9950104 0.99532635 0.9956321 0.99592764 0.9962127 0.9964877 0.9967522 0.9970064 0.9972504 0.9974839 0.99770725 0.99792016 0.9981227 0.9983149 0.9984968 0.9986683 0.99882937 0.9989802 0.9991205 0.99925054 0.99937016 0.9994794 0.99957824 0.9996667 0.9997447 0.9998124 0.99986965 0.99991656 0.999953 0.99997914 0.99999476)) (quote bpf) 10))) (setf (bpfcolor newbpf) (om-make-color 0 0 0)) (set-name newbpf nil) newbpf)))) (when newobj) newobj)) nil "plot-sox-contrast" 1) (om-load-boxcall (quote genfun) "SOX-LOUDNESS" (quote sox-loudness) (quote ((om-load-inputfun (quote input-funbox) "gain (in decibel)" "GAIN" -36) (om-load-inputkeyword (quote input-keyword) "append sox-effects/statistics to the processing chain" "sox-append" (quote :sox-append) nil nil))) (om-make-point 252 570) nil nil nil nil 1) (om-load-boxcall (quote genfun) "SOX-PROCESS 2" (quote sox-process) (quote ((om-load-inputfun (quote input-funbox) "" "SND" nil) (om-load-inputfun (quote input-funbox) "" "COMMANDS" nil))) (om-make-point 180 651) nil nil nil nil 1) (om-load-boxcomment "comment 4" (om-make-point 103 34) (quote "sox-loudness") "" (om-make-point 123 471) nil (om-make-color 0.0 0.19194556 1.0) (om-make-font "Verdana" 12.0 :family "Verdana" :style (quote (:plain)) :mode (quote nil))) (om-load-boxcomment "comment 3" (om-make-point 289 60) (quote "\"sox-loudness\" is similar to \"sox-level\", but provides $equalisation for the human auditory system. $See http://en.wikipedia.org/wiki/Loudness $for a detailed description of loudness") "" (om-make-point 122 492) nil (om-make-color 0.0 0.19194556 1.0) (om-make-font "Verdana" 10.0 :family "Verdana" :style (quote (:plain)) :mode (quote nil))) (om-load-editor-box1 "SOUND" (quote sound) (quote ((om-load-inputfun (quote input-funbox) "object" "self" nil) (om-load-inputfun (quote input-funbox) "a track index for multichannel mixing" "tracknum" 0) (om-load-inputfun (quote input-funbox) "a list of markers (s)" "markers" nil))) (om-make-point 196 752) (om-make-point 80 50) (let ((newobj nil)) (load-port-info newobj (quote nil)) (init-mus-color newobj (quote nil)) (set-extra-pairs newobj (quote nil)) (set-patch-pairs newobj (quote nil)) (set-name newobj "") (set-tonalite newobj nil) newobj) nil nil (pairlis (quote (approx fontsize staff cmnpref deltapict outport inport player zoom notechancolor? grillestep mode winsize winpos score-mode obj-mode show-stems scale palette-mode)) (list 2 24 (quote g) (let ((newobj (make-instance (quote edition-values)))) (setf (paper-size newobj) (om-make-point 600 800)) (setf (top-margin newobj) 2) (setf (left-margin newobj) 1) (setf (right-margin newobj) 1) (setf (bottom-margin newobj) 1) (setf (orientation newobj) nil) (setf (scale newobj) nil) (setf (system-space newobj) (quote (1))) (setf (system-color newobj) (quote nil)) (setf (line-space newobj) 1) (setf (title newobj) nil) (setf (show-title? newobj) nil) (setf (show-page? newobj) nil) (setf (sheet-id newobj) nil) (setf (page-mode newobj) nil) newobj) (om-make-point 0 0) nil 0 (quote :soxplayer) 1 nil 1000 0 (om-make-point 568 321) (om-make-point 400 22) 0 1 (quote t) nil 0)) t nil nil nil) (om-load-boxcall (quote genfun) "SOX-NORMALIZE" (quote sox-normalize) (quote ((om-load-inputkeyword (quote input-keyword) "level (dB)" "level" (quote :level) 0.0 nil))) (om-make-point 366 569) nil nil nil nil 1) (om-load-editor-box1 "drumloop.aif" (quote sound) (quote ((om-load-inputfun (quote input-funbox) "object" "self" nil) (om-load-inputfun (quote input-funbox) "a track index for multichannel mixing" "tracknum" 0) (om-load-inputfun (quote input-funbox) "a list of markers (s)" "markers" nil))) (om-make-point 126 587) (om-make-point 80 50) (let ((newobj (let ((thesound (load-sound (om-make-pathname :directory (quote (:absolute "Users" "Marlon_MBPro3" "Research" "OM-SoX" "OM-SoX 1.0" "resources" "sounds")) :device nil :host nil :name "drumloop" :type "aif") 0 100 0))) (when thesound (setf (markers thesound) (quote nil))) thesound))) (load-port-info newobj (quote nil)) (init-mus-color newobj (quote nil)) (set-extra-pairs newobj (quote nil)) (set-patch-pairs newobj (quote nil)) (set-name newobj "drumloop.aif") (set-tonalite newobj nil) newobj) "x" nil (pairlis (quote (approx fontsize staff cmnpref deltapict outport inport player zoom notechancolor? grillestep mode winsize winpos score-mode obj-mode show-stems scale palette-mode)) (list 2 24 (quote g) (let ((newobj (make-instance (quote edition-values)))) (setf (paper-size newobj) (om-make-point 600 800)) (setf (top-margin newobj) 2) (setf (left-margin newobj) 1) (setf (right-margin newobj) 1) (setf (bottom-margin newobj) 1) (setf (orientation newobj) nil) (setf (scale newobj) nil) (setf (system-space newobj) (quote (1))) (setf (system-color newobj) (quote nil)) (setf (line-space newobj) 1) (setf (title newobj) nil) (setf (show-title? newobj) nil) (setf (show-page? newobj) nil) (setf (sheet-id newobj) nil) (setf (page-mode newobj) nil) newobj) (om-make-point 0 0) nil 0 (quote :soxplayer) 1 nil 1000 0 (om-make-point 543 307) (om-make-point 400 22) 0 1 (quote t) nil 0)) t nil nil nil) (om-load-boxcomment "comment 2" (om-make-point 233 48) (quote "NB: Try changing the <gain> for loudness $while normalizing the audio to hear $the difference in frequency response") "" (om-make-point 284 666) nil (om-make-color 0.0 0.19194556 1.0) (om-make-font "Verdana" 10.0 :family "Verdana" :style (quote (:plain)) :mode (quote nil))) (om-load-boxcall (quote genfun) "SOX-PROCESS" (quote sox-process) (quote ((om-load-inputfun (quote input-funbox) "" "INPUT" nil) (om-load-inputfun (quote input-funbox) "" "COMMANDS" ""))) (om-make-point 215 260) nil nil nil nil 1) (om-load-boxcall (quote genfun) "SOX-CONTRAST" (quote sox-contrast) (quote ((om-load-inputfun (quote input-funbox) "amount (in percent)" "AMOUNT" 10))) (om-make-point 274 176) nil nil nil nil 1) (om-load-boxcall (quote bastype) "aux" (quote t) (quote nil) (om-make-point 311 146) (om-make-point 34 30) 95 "95" nil) (om-load-editor-box1 "" (quote sound) (quote ((om-load-inputfun (quote input-funbox) "object" "self" nil) (om-load-inputfun (quote input-funbox) "a track index for multichannel mixing" "tracknum" 0) (om-load-inputfun (quote input-funbox) "a list of markers (s)" "markers" nil))) (om-make-point 231 360) (om-make-point 80 50) (let ((newobj nil)) (load-port-info newobj (quote nil)) (init-mus-color newobj (quote nil)) (set-extra-pairs newobj (quote nil)) (set-patch-pairs newobj (quote nil)) (set-name newobj "") (set-tonalite newobj nil) newobj) nil nil (pairlis (quote (approx fontsize staff cmnpref deltapict outport inport player zoom notechancolor? grillestep mode winsize winpos score-mode obj-mode show-stems scale palette-mode)) (list 2 24 (quote g) (let ((newobj (make-instance (quote edition-values)))) (setf (paper-size newobj) (om-make-point 600 800)) (setf (top-margin newobj) 2) (setf (left-margin newobj) 1) (setf (right-margin newobj) 1) (setf (bottom-margin newobj) 1) (setf (orientation newobj) nil) (setf (scale newobj) nil) (setf (system-space newobj) (quote (1))) (setf (system-color newobj) (quote nil)) (setf (line-space newobj) 1) (setf (title newobj) nil) (setf (show-title? newobj) nil) (setf (show-page? newobj) nil) (setf (sheet-id newobj) nil) (setf (page-mode newobj) nil) newobj) (om-make-point 0 0) nil 0 (quote :soxplayer) 1 nil 1000 0 (om-make-point 537 328) (om-make-point 400 22) 0 1 (quote t) nil 0)) t nil nil nil) (om-load-editor-box1 "sinewave.aif" (quote sound) (quote ((om-load-inputfun (quote input-funbox) "object" "self" nil) (om-load-inputfun (quote input-funbox) "a track index for multichannel mixing" "tracknum" 0) (om-load-inputfun (quote input-funbox) "a list of markers (s)" "markers" nil))) (om-make-point 179 192) (om-make-point 80 50) (let ((newobj (let ((thesound (load-sound (om-make-pathname :directory (quote (:absolute "Users" "Marlon_MBPro3" "Research" "OM-SoX" "OM-SoX 1.0" "resources" "sounds")) :device nil :host nil :name "sinewave" :type "aif") 0 100 0))) (when thesound (setf (markers thesound) (quote nil))) thesound))) (load-port-info newobj (quote nil)) (init-mus-color newobj (quote nil)) (set-extra-pairs newobj (quote nil)) (set-patch-pairs newobj (quote nil)) (set-name newobj "sinewave.aif") (set-tonalite newobj nil) newobj) "x" nil (pairlis (quote (approx fontsize staff cmnpref deltapict outport inport player zoom notechancolor? grillestep mode winsize winpos score-mode obj-mode show-stems scale palette-mode)) (list 2 24 (quote g) (let ((newobj (make-instance (quote edition-values)))) (setf (paper-size newobj) (om-make-point 600 800)) (setf (top-margin newobj) 2) (setf (left-margin newobj) 1) (setf (right-margin newobj) 1) (setf (bottom-margin newobj) 1) (setf (orientation newobj) nil) (setf (scale newobj) nil) (setf (system-space newobj) (quote (1))) (setf (system-color newobj) (quote nil)) (setf (line-space newobj) 1) (setf (title newobj) nil) (setf (show-title? newobj) nil) (setf (show-page? newobj) nil) (setf (sheet-id newobj) nil) (setf (page-mode newobj) nil) newobj) (om-make-point 0 0) nil 0 (quote :soxplayer) 1 nil 1000 0 (om-make-point 547 305) (om-make-point 400 22) 0 1 (quote t) nil 0)) t nil nil nil) (om-load-boxcomment "comment" (om-make-point 109 24) (quote "try these 2 sounds") "" (om-make-point 121 166) nil (om-make-color 0.0 0.0 1.0) (om-make-font "Verdana" 10.0 :family "Verdana" :style (quote (:italic)) :mode (quote nil))))) (quote ((7 0 6 2 nil 0) (10 0 8 0 nil 0) (6 0 8 1 nil 0) (8 0 9 0 nil 0) (16 0 11 0 nil 0) (14 0 16 0 nil 0) (0 0 17 0 nil 0) (22 0 17 1 nil 0) (23 0 18 0 nil 0) (17 0 18 1 nil 0) (18 0 21 0 nil 0) (29 0 25 0 nil 0) (26 0 25 1 nil 0) (27 0 26 0 nil 0) (25 0 28 0 nil 0))) (list (let ((newpict (make-instance (quote patch-picture) :name "omsox" :source (quote user) :pict-pathname (restore-pict-path (restore-path nil)) :thepict (om-get-picture "omsox" (quote user)) :storemode :external :draw-params (quote (p 0 0 100 100)) :extraobjs nil))) (setf (pict-pos newpict) (om-make-point 58 8)) (setf (pict-size newpict) (om-make-point 65 54)) newpict)) 6.070005))