(IN-PACKAGE :CCL)
;; this patch was saved with PWGL version 1.0 beta RC 16 (0.9.16-310)
(ASSERT-PATCH-SAVED-VERSION-NOT-NEWER-THAN (QUOTE ((0 9 16) 310)))
(LET ((WIN (MAKE-INSTANCE (QUOTE PWGL-PW-WINDOW) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE FV-MORPHOLOGIE::MORPHOLOGIE-BOX) :R 0.10062528 :G 1.0 :B 0.0 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "seq" :CURVAL NIL :VALUE-STRING "nil" :CONNECTION NIL) (MAKE-INSTANCE (QUOTE PWGL-MENUBOX-SUBVIEW) :BOX-STRING "mode" :MINVAL 0 :MAXVAL 3 :MENU-LIST (LIST (LIST ":minflexmax" :MINFLEXMAX) (LIST ":minmax" :MINMAX) (LIST ":important-extrema" :IMPORTANT-EXTREMA) (LIST ":mdpp" :MDPP)) :MENU-LIST-STRING (LIST ":minflexmax" :MINFLEXMAX)) (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "thres" :VALUE-STRING "0.0")) :X 0.07404095716763593D0 :Y 1.8983248845851704D0 :W 0.4879999809265141D0 :H 0.16 :BOX-STRING "int-signature" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 2 1) :ORIG-GROUPING-LIST (LIST 2 1) :EXTENSION-PATTERN (LIST 1) :EXTENSION-LIMIT 4 :X-PROPORTIONS (LIST (LIST 0.5676855919701684D0 1) (LIST 1)) :BORDER 0.012) :PW-FUNCTION (QUOTE FV-MORPHOLOGIE:INT-SIGNATURE) :OPEN-STATE-W 0.5199999809265141D0 :OPEN-STATE-H 0.16) (MAKE-INSTANCE (QUOTE PWGL-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "value" :CURVAL (LIST 0 1) :VALUE-STRING "(0 1)")) :X 0.9900409571676359D0 :Y 1.9783248845851709D0 :W 0.26799999046325685D0 :H 0.11200000149011613D0 :BOX-STRING "value-box" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE VALUE-BOX) :PW-LOCK T :BOX-BUFFER (LIST 0.9558197 0.95540154 0.9552494 0.9422229 0.9643994 0.96006454 0.9626278 0.952643 0.9379243 0.9556627 0.96151186 0.968618 0.9672684 0.9624477 0.94775415 0.9540518 0.96090925 0.9418077 0.96390266 0.9569999 0.95826304 0.9532108 0.9332285 0.93706877 0.9517937 0.94996435 0.9432963 0.9470754 0.9628266 0.9602077 0.94785655 0.9610618 0.96824366 0.95087755 0.95486767 0.9357078 0.97051007 0.9442478 0.95069987 0.9512363 0.94629437 0.9565609 0.96227587 0.9427843 0.95460296 0.9487878 0.9619417 0.96324176 0.96821696 0.9561271 0.95528406 0.96125317 0.9621181 0.96109987 0.9553547 0.9629018 0.95341194 0.9574166 0.9423297 0.9605844 0.96632785 0.9602119 0.95549006 0.96974665 0.95622105 0.9634402 0.95606536 0.9512497 0.9429975 0.95953393 0.9527087 0.9462242 0.94126606 0.9479464 0.967505 0.96143234 0.9455635 0.961099 0.9551133 0.95330084 0.94332666 0.9511966 0.95669216 0.95294327 0.9540648 0.9336438 0.9628083 0.95916874 0.96339834 0.9666975 0.949384 0.9538882 0.9676191 0.95511 0.951138 0.95317287 0.95181627 0.94885254 0.96208597 0.95131207 0.95610464 0.9564954 0.9656588 0.96600163 0.95050765 0.9654031 0.94721735 0.94337267 0.94452417 0.9545394 0.95630855 0.9484669 0.95623357 0.9590324 0.91974777 0.94005096 0.94755716 0.9461719 0.9533251 0.9600288 0.94018424 0.9569288 0.9618158 0.9579481 0.9571928 0.9575358 0.94536704 0.9593252 0.9617058 0.94633013 0.9617205 0.9621189 0.9641351 0.942052 0.9543048 0.9602964 0.93809587 0.9630699 0.95339 0.954835 0.9527898 0.9379311 0.96726346 0.9486344 0.96241707 0.9490629 0.9587869 0.9436146 0.9462193 0.9561187 0.93292106 0.96670086 0.9630765 0.9557339 0.9441447 0.9419751 0.9492989 0.96172375 0.9402702 0.94921506 0.95369226 0.94443667 0.96759594 0.96567327 0.9668857 0.9521733 0.93225325 0.9589315 0.9488866 0.9393681 0.961329 0.93258626 0.94081575 0.91183037 0.92149717 0.9502823 0.93901444 0.95191575 0.95975477 0.9630569 0.94725615 0.96288085 0.95634956 0.93833614 0.95433587 0.91702635 0.9404958 0.9439634 0.95035905 0.959957 0.961035 0.9379198 0.9402625 0.9223476 0.95941884 0.93729747 0.9367047 0.9350815 0.95147455 0.9429036 0.92267466 0.9521978 0.9414548 0.9496877 0.95694155 0.9495552 0.9552178 0.9383522 0.9407784 0.9558024 0.965115 0.9541429 0.95906967 0.94987774 0.94625235 0.9535914 0.94764817 0.9228489 0.89375806 0.931711) :SHOW-TITLE-STRING? NIL :USER-STRING "some data" :OPEN-STATE-W 0.26799999046325685D0 :OPEN-STATE-H 0.11200000149011613D0) (MAKE-INSTANCE (QUOTE 2D-EDITOR) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-2D-SUBBOX) :APPLICATION-WINDOW (LET ((WIN (MAKE-INSTANCE (QUOTE PWGL-FUNCTION-EDITOR-WINDOW) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-2D-VIEW) :R 1.0 :G 1.0 :B 1.0 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE C-BREAK-POINT-FUNCTION) :POINTS (QUOTE ((0 0.9558197) (1 0.95540154) (2 0.9552494) (3 0.9422229) (4 0.9643994) (5 0.96006454) (6 0.9626278) (7 0.952643) (8 0.9379243) (9 0.9556627) (10 0.96151186) (11 0.968618) (12 0.9672684) (13 0.9624477) (14 0.94775415) (15 0.9540518) (16 0.96090925) (17 0.9418077) (18 0.96390266) (19 0.9569999) (20 0.95826304) (21 0.9532108) (22 0.9332285) (23 0.93706877) (24 0.9517937) (25 0.94996435) (26 0.9432963) (27 0.9470754) (28 0.9628266) (29 0.9602077) (30 0.94785655) (31 0.9610618) (32 0.96824366) (33 0.95087755) (34 0.95486767) (35 0.9357078) (36 0.97051007) (37 0.9442478) (38 0.95069987) (39 0.9512363) (40 0.94629437) (41 0.9565609) (42 0.96227587) (43 0.9427843) (44 0.95460296) (45 0.9487878) (46 0.9619417) (47 0.96324176) (48 0.96821696) (49 0.9561271) (50 0.95528406) (51 0.96125317) (52 0.9621181) (53 0.96109987) (54 0.9553547) (55 0.9629018) (56 0.95341194) (57 0.9574166) (58 0.9423297) (59 0.9605844) (60 0.96632785) (61 0.9602119) (62 0.95549006) (63 0.96974665) (64 0.95622105) (65 0.9634402) (66 0.95606536) (67 0.9512497) (68 0.9429975) (69 0.95953393) (70 0.9527087) (71 0.9462242) (72 0.94126606) (73 0.9479464) (74 0.967505) (75 0.96143234) (76 0.9455635) (77 0.961099) (78 0.9551133) (79 0.95330084) (80 0.94332666) (81 0.9511966) (82 0.95669216) (83 0.95294327) (84 0.9540648) (85 0.9336438) (86 0.9628083) (87 0.95916874) (88 0.96339834) (89 0.9666975) (90 0.949384) (91 0.9538882) (92 0.9676191) (93 0.95511) (94 0.951138) (95 0.95317287) (96 0.95181627) (97 0.94885254) (98 0.96208597) (99 0.95131207) (100 0.95610464) (101 0.9564954) (102 0.9656588) (103 0.96600163) (104 0.95050765) (105 0.9654031) (106 0.94721735) (107 0.94337267) (108 0.94452417) (109 0.9545394) (110 0.95630855) (111 0.9484669) (112 0.95623357) (113 0.9590324) (114 0.91974777) (115 0.94005096) (116 0.94755716) (117 0.9461719) (118 0.9533251) (119 0.9600288) (120 0.94018424) (121 0.9569288) (122 0.9618158) (123 0.9579481) (124 0.9571928) (125 0.9575358) (126 0.94536704) (127 0.9593252) (128 0.9617058) (129 0.94633013) (130 0.9617205) (131 0.9621189) (132 0.9641351) (133 0.942052) (134 0.9543048) (135 0.9602964) (136 0.93809587) (137 0.9630699) (138 0.95339) (139 0.954835) (140 0.9527898) (141 0.9379311) (142 0.96726346) (143 0.9486344) (144 0.96241707) (145 0.9490629) (146 0.9587869) (147 0.9436146) (148 0.9462193) (149 0.9561187) (150 0.93292106) (151 0.96670086) (152 0.9630765) (153 0.9557339) (154 0.9441447) (155 0.9419751) (156 0.9492989) (157 0.96172375) (158 0.9402702) (159 0.94921506) (160 0.95369226) (161 0.94443667) (162 0.96759594) (163 0.96567327) (164 0.9668857) (165 0.9521733) (166 0.93225325) (167 0.9589315) (168 0.9488866) (169 0.9393681) (170 0.961329) (171 0.93258626) (172 0.94081575) (173 0.91183037) (174 0.92149717) (175 0.9502823) (176 0.93901444) (177 0.95191575) (178 0.95975477) (179 0.9630569) (180 0.94725615) (181 0.96288085) (182 0.95634956) (183 0.93833614) (184 0.95433587) (185 0.91702635) (186 0.9404958) (187 0.9439634) (188 0.95035905) (189 0.959957) (190 0.961035) (191 0.9379198) (192 0.9402625) (193 0.9223476) (194 0.95941884) (195 0.93729747) (196 0.9367047) (197 0.9350815) (198 0.95147455) (199 0.9429036) (200 0.92267466) (201 0.9521978) (202 0.9414548) (203 0.9496877) (204 0.95694155) (205 0.9495552) (206 0.9552178) (207 0.9383522) (208 0.9407784) (209 0.9558024) (210 0.965115) (211 0.9541429) (212 0.95906967) (213 0.94987774) (214 0.94625235) (215 0.9535914) (216 0.94764817) (217 0.9228489) (218 0.89375806) (219 0.931711))))) :Y 1.0 :W 1.0 :H 1.0 :GLORTHOX1 -6.5699997 :GLORTHOX2 225.57 :GLORTHOY1 0.8914555 :GLORTHOY2 0.97281266)) :X 560 :Y 145 :HITS 1 :WINDOW-UPDATE? T :TITLE "2D-Editor3" :X 560 :Y 145 :WIDTH 1435 :HEIGHT 367))) WIN) :CONNECTION NIL)) :X 1.5671621841810582D0 :Y 1.9969189379382364D0 :W 1.2439999999999998D0 :H 0.3280000000000003D0 :BOX-STRING "2D-Editor" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "objects") (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "active")) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE 2D-EDITOR) :SHOW-TITLE-STRING? NIL :OPEN-STATE-W 1.2439999999999998D0 :OPEN-STATE-H 0.3280000000000003D0) (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-BOX) :R 0.65 :G 0.65 :B 0.65 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "arg" :VALUE-STRING "0" :CONNECTION NIL)) :X 0.07404095716763593D0 :Y 1.6623248845851706D0 :W 0.14799999046325674D0 :H 0.097 :BOX-STRING "2bpf" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE PWGL-ABSTRACTION) :OPEN-STATE-W 0.14799999046325674D0 :OPEN-STATE-H 0.097 :APPLICATION-WINDOW (LET ((WIN (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-WINDOW) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "function" :CURVAL (QUOTE FIRST) :VALUE-STRING "first") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "list" :CURVAL "(0 1)" :VALUE-STRING "(0 1)" :CONNECTION NIL)) :X 0.5399999999999996D0 :Y 1.0160000915527348D0 :W 0.26 :H 0.16 :BOX-STRING "mapcar" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1 1) :ORIG-GROUPING-LIST (LIST 1 1) :EXTENSION-PATTERN (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE MAPCAR)) (MAKE-INSTANCE (QUOTE PWGL-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "function" :CURVAL (QUOTE THIRD) :VALUE-STRING "third") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "list" :CURVAL "(0 1)" :VALUE-STRING "(0 1)" :CONNECTION NIL)) :X 0.8800000014901155D0 :Y 1.0160000900626187D0 :W 0.26 :H 0.16 :BOX-STRING "mapcar" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1 1) :ORIG-GROUPING-LIST (LIST 1 1) :EXTENSION-PATTERN (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE MAPCAR)) (MAKE-INSTANCE (QUOTE PWGL-2D-CONSTRUCTOR-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-MENUBOX-SUBVIEW) :BOX-STRING "selector" :PWGL-ACTION-FUNCTION (QUOTE 2D-CONSTRUCTOR-FUNCTION) :MINVAL 0 :MAXVAL 5 :MENU-LIST :2D-CONSTRUCTOR-CLASSES :MENU-LIST-STRING ":bpf") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "xs/l" :CURVAL (LIST (LIST 0 1 2) (LIST 0 1 0)) :VALUE-STRING "((0 1 2) (0 1 0))" :CONNECTION NIL) (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "ys" :CURVAL "()" :VALUE-STRING "()" :CONNECTION NIL)) :X 0.5640000000000005D0 :Y 0.6800000915527344D0 :W 0.45 :H 0.23579999 :BOX-STRING "2d-bpf-constructor" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1 1 1) :ORIG-GROUPING-LIST (LIST 1 1) :EXTENSION-PATTERN (LIST 1) :EXTENSION-LIMIT 5 :BORDER 0.012) :PW-FUNCTION (QUOTE 2D-BPF-CONSTRUCTOR) :CURRENT-EXTENSION-PATTERN-INDEX* 1) (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-INPUT-BOX) :R 0.7 :G 0.7 :B 0.7 :X 0.2280000000000002D0 :Y 1.1760000000000002D0 :W 0.1 :H 0.02 :BOX-STRING "1" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :PW-FUNCTION (QUOTE PWGL-ABSTRACTION-INPUT)) (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-OUTPUT-BOX) :R 0.7 :G 0.7 :B 0.7 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-INPUT-BOX) :R 0.9 :G 0.9 :B 0.9 :BOX-STRING "out" :CONNECTION NIL)) :X 0.7799999999999998D0 :Y 0.2759999999999998D0 :W 0.1 :H 0.02 :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "1")) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE PWGL-ABSTRACTION-OUTPUT))) :X 150 :Y 150 :CONNECTIONS (LIST (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 2 :OUT-BOX 0 :PWBOX2 4 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 3 :OUT-BOX 0 :PWBOX2 1 :INPUT-BOX 1 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 3 :OUT-BOX 0 :PWBOX2 0 :INPUT-BOX 1 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 0 :OUT-BOX 0 :PWBOX2 2 :INPUT-BOX 1 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 1 :OUT-BOX 0 :PWBOX2 2 :INPUT-BOX 2 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2))) :TITLE "2bpf" :X 150 :Y 150 :WIDTH 350 :HEIGHT 350))) WIN) :BOX-DOCUMENTATION "") (MAKE-INSTANCE (QUOTE 2D-EDITOR) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-2D-SUBBOX) :APPLICATION-WINDOW (LET ((WIN (MAKE-INSTANCE (QUOTE PWGL-FUNCTION-EDITOR-WINDOW) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-2D-VIEW) :R 1.0 :G 1.0 :B 1.0 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE C-BREAK-POINT-FUNCTION) :POINTS (QUOTE ((3 0.9422229) (4 0.9643994) (5 0.96006454) (6 0.9626278) (8 0.9379243) (11 0.968618) (14 0.94775415) (16 0.96090925) (17 0.9418077) (18 0.96390266) (19 0.9569999) (20 0.95826304) (22 0.9332285) (24 0.9517937) (26 0.9432963) (28 0.9628266) (30 0.94785655) (32 0.96824366) (33 0.95087755) (34 0.95486767) (35 0.9357078) (36 0.97051007) (37 0.9442478) (39 0.9512363) (40 0.94629437) (42 0.96227587) (43 0.9427843) (44 0.95460296) (45 0.9487878) (48 0.96821696) (50 0.95528406) (52 0.9621181) (54 0.9553547) (55 0.9629018) (56 0.95341194) (57 0.9574166) (58 0.9423297) (60 0.96632785) (62 0.95549006) (63 0.96974665) (64 0.95622105) (65 0.9634402) (68 0.9429975) (69 0.95953393) (72 0.94126606) (74 0.967505) (76 0.9455635) (77 0.961099) (80 0.94332666) (82 0.95669216) (83 0.95294327) (84 0.9540648) (85 0.9336438) (86 0.9628083) (87 0.95916874) (89 0.9666975) (90 0.949384) (92 0.9676191) (94 0.951138) (95 0.95317287) (97 0.94885254) (98 0.96208597) (99 0.95131207) (103 0.96600163) (104 0.95050765) (105 0.9654031) (107 0.94337267) (110 0.95630855) (111 0.9484669) (113 0.9590324) (114 0.91974777) (116 0.94755716) (117 0.9461719) (119 0.9600288) (120 0.94018424) (122 0.9618158) (124 0.9571928) (125 0.9575358) (126 0.94536704) (128 0.9617058) (129 0.94633013) (132 0.9641351) (133 0.942052) (135 0.9602964) (136 0.93809587) (137 0.9630699) (138 0.95339) (139 0.954835) (141 0.9379311) (142 0.96726346) (143 0.9486344) (144 0.96241707) (145 0.9490629) (146 0.9587869) (147 0.9436146) (149 0.9561187) (150 0.93292106) (151 0.96670086) (155 0.9419751) (157 0.96172375) (158 0.9402702) (160 0.95369226) (161 0.94443667) (162 0.96759594) (163 0.96567327) (164 0.9668857) (166 0.93225325) (167 0.9589315) (169 0.9393681) (170 0.961329) (171 0.93258626) (172 0.94081575) (173 0.91183037) (175 0.9502823) (176 0.93901444) (179 0.9630569) (180 0.94725615) (181 0.96288085) (183 0.93833614) (184 0.95433587) (185 0.91702635) (190 0.961035) (191 0.9379198) (192 0.9402625) (193 0.9223476) (194 0.95941884) (197 0.9350815) (198 0.95147455) (200 0.92267466) (201 0.9521978) (202 0.9414548) (204 0.95694155) (205 0.9495552) (206 0.9552178) (207 0.9383522) (210 0.965115) (211 0.9541429) (212 0.95906967) (214 0.94625235) (215 0.9535914) (218 0.89375806))))) :Y 1.0 :W 1.0 :H 1.0 :GLORTHOX1 -3.4499998 :GLORTHOX2 224.45 :GLORTHOY1 0.8914555 :GLORTHOY2 0.97281266)) :X 560 :Y 145 :HITS 1 :WINDOW-UPDATE? T :TITLE "2D-Editor3" :X 560 :Y 145 :WIDTH 1435 :HEIGHT 367))) WIN) :CONNECTION NIL)) :X 0.3431621856711726D0 :Y 1.6863248845851702D0 :W 0.9919999999999996D0 :H 0.3280000000000003D0 :BOX-STRING "2D-Editor" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "objects") (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "active")) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE 2D-EDITOR) :SHOW-TITLE-STRING? NIL :OPEN-STATE-W 1.2439999999999998D0 :OPEN-STATE-H 0.3280000000000003D0) (MAKE-INSTANCE (QUOTE FV-MORPHOLOGIE::MORPHOLOGIE-BOX) :R 0.10062528 :G 1.0 :B 0.0 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "seq" :CURVAL NIL :VALUE-STRING "nil" :CONNECTION NIL) (MAKE-INSTANCE (QUOTE PWGL-MENUBOX-SUBVIEW) :BOX-STRING "mode" :MINVAL 0 :MAXVAL 3 :MENU-LIST (LIST (LIST ":minflexmax" :MINFLEXMAX) (LIST ":minmax" :MINMAX) (LIST ":important-extrema" :IMPORTANT-EXTREMA) (LIST ":mdpp" :MDPP)) :MENU-LIST-STRING (LIST ":minflexmax" :MINFLEXMAX)) (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "thres" :CURVAL 0.25 :VALUE-STRING "0.25")) :X 0.07404095716763593D0 :Y 1.3023248845851712D0 :W 0.4879999809265141D0 :H 0.16 :BOX-STRING "int-signature" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 2 1) :ORIG-GROUPING-LIST (LIST 2 1) :EXTENSION-PATTERN (LIST 1) :EXTENSION-LIMIT 4 :X-PROPORTIONS (LIST (LIST 0.5676855919701684D0 1) (LIST 1)) :BORDER 0.012) :PW-FUNCTION (QUOTE FV-MORPHOLOGIE:INT-SIGNATURE) :OPEN-STATE-W 0.5199999809265141D0 :OPEN-STATE-H 0.16) (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-BOX) :R 0.65 :G 0.65 :B 0.65 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "arg" :VALUE-STRING "0" :CONNECTION NIL)) :X 0.07404095716763593D0 :Y 1.070324883095055D0 :W 0.14799999046325674D0 :H 0.097 :BOX-STRING "2bpf" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE PWGL-ABSTRACTION) :OPEN-STATE-W 0.14799999046325674D0 :OPEN-STATE-H 0.097 :APPLICATION-WINDOW (LET ((WIN (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-WINDOW) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "function" :CURVAL (QUOTE FIRST) :VALUE-STRING "first") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "list" :CURVAL "(0 1)" :VALUE-STRING "(0 1)" :CONNECTION NIL)) :X 0.5399999999999996D0 :Y 1.0160000915527348D0 :W 0.26 :H 0.16 :BOX-STRING "mapcar" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1 1) :ORIG-GROUPING-LIST (LIST 1 1) :EXTENSION-PATTERN (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE MAPCAR)) (MAKE-INSTANCE (QUOTE PWGL-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "function" :CURVAL (QUOTE THIRD) :VALUE-STRING "third") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "list" :CURVAL "(0 1)" :VALUE-STRING "(0 1)" :CONNECTION NIL)) :X 0.8800000014901155D0 :Y 1.0160000900626187D0 :W 0.26 :H 0.16 :BOX-STRING "mapcar" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1 1) :ORIG-GROUPING-LIST (LIST 1 1) :EXTENSION-PATTERN (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE MAPCAR)) (MAKE-INSTANCE (QUOTE PWGL-2D-CONSTRUCTOR-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-MENUBOX-SUBVIEW) :BOX-STRING "selector" :PWGL-ACTION-FUNCTION (QUOTE 2D-CONSTRUCTOR-FUNCTION) :MINVAL 0 :MAXVAL 5 :MENU-LIST :2D-CONSTRUCTOR-CLASSES :MENU-LIST-STRING ":bpf") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "xs/l" :CURVAL (LIST (LIST 0 1 2) (LIST 0 1 0)) :VALUE-STRING "((0 1 2) (0 1 0))" :CONNECTION NIL) (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "ys" :CURVAL "()" :VALUE-STRING "()" :CONNECTION NIL)) :X 0.5640000000000005D0 :Y 0.6800000915527344D0 :W 0.45 :H 0.23579999 :BOX-STRING "2d-bpf-constructor" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1 1 1) :ORIG-GROUPING-LIST (LIST 1 1) :EXTENSION-PATTERN (LIST 1) :EXTENSION-LIMIT 5 :BORDER 0.012) :PW-FUNCTION (QUOTE 2D-BPF-CONSTRUCTOR) :CURRENT-EXTENSION-PATTERN-INDEX* 1) (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-INPUT-BOX) :R 0.7 :G 0.7 :B 0.7 :X 0.2280000000000002D0 :Y 1.1760000000000002D0 :W 0.1 :H 0.02 :BOX-STRING "1" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :PW-FUNCTION (QUOTE PWGL-ABSTRACTION-INPUT)) (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-OUTPUT-BOX) :R 0.7 :G 0.7 :B 0.7 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-INPUT-BOX) :R 0.9 :G 0.9 :B 0.9 :BOX-STRING "out" :CONNECTION NIL)) :X 0.7799999999999998D0 :Y 0.2759999999999998D0 :W 0.1 :H 0.02 :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "1")) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE PWGL-ABSTRACTION-OUTPUT))) :X 150 :Y 150 :CONNECTIONS (LIST (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 2 :OUT-BOX 0 :PWBOX2 4 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 3 :OUT-BOX 0 :PWBOX2 1 :INPUT-BOX 1 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 3 :OUT-BOX 0 :PWBOX2 0 :INPUT-BOX 1 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 0 :OUT-BOX 0 :PWBOX2 2 :INPUT-BOX 1 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 1 :OUT-BOX 0 :PWBOX2 2 :INPUT-BOX 2 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2))) :TITLE "2bpf" :X 150 :Y 150 :WIDTH 350 :HEIGHT 350))) WIN) :BOX-DOCUMENTATION "") (MAKE-INSTANCE (QUOTE 2D-EDITOR) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-2D-SUBBOX) :APPLICATION-WINDOW (LET ((WIN (MAKE-INSTANCE (QUOTE PWGL-FUNCTION-EDITOR-WINDOW) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-2D-VIEW) :R 1.0 :G 1.0 :B 1.0 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE C-BREAK-POINT-FUNCTION) :POINTS (QUOTE ((3 0.9422229) (4 0.9643994) (8 0.9379243) (11 0.968618) (17 0.9418077) (18 0.96390266) (22 0.9332285) (32 0.96824366) (35 0.9357078) (36 0.97051007) (37 0.9442478) (42 0.96227587) (43 0.9427843) (48 0.96821696) (58 0.9423297) (60 0.96632785) (62 0.9612245) (65 0.9612245) (72 0.94126606) (74 0.967505) (76 0.9455635) (77 0.961099) (85 0.9336438) (86 0.9628083) (87 0.95761186) (105 0.95761186) (107 0.94337267) (113 0.9590324) (114 0.91974777) (119 0.9600288) (120 0.94018424) (122 0.9618158) (124 0.9553778) (132 0.9553778) (136 0.93809587) (137 0.9630699) (141 0.9379311) (142 0.96726346) (143 0.95310575) (149 0.95310575) (150 0.93292106) (151 0.96670086) (155 0.9419751) (157 0.96172375) (158 0.9402702) (162 0.96759594) (166 0.93225325) (167 0.9589315) (169 0.9393681) (170 0.961329) (173 0.91183037) (179 0.9630569) (185 0.91702635) (190 0.961035) (193 0.9223476) (194 0.95941884) (200 0.92267466) (201 0.9521978) (207 0.9383522) (210 0.965115) (211 0.9532641) (215 0.9532641) (218 0.89375806))))) :Y 1.0 :W 1.0 :H 1.0 :GLORTHOX1 -3.4499998 :GLORTHOX2 224.45 :GLORTHOY1 0.8914555 :GLORTHOY2 0.97281266)) :X 560 :Y 145 :HITS 1 :WINDOW-UPDATE? T :TITLE "2D-Editor3" :X 245 :Y 145 :WIDTH 1435 :HEIGHT 367))) WIN) :CONNECTION NIL)) :X 0.3431621856711726D0 :Y 1.070324883095055D0 :W 0.9919999999999996D0 :H 0.3280000000000003D0 :BOX-STRING "2D-Editor" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "objects") (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "active")) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE 2D-EDITOR) :SHOW-TITLE-STRING? NIL :OPEN-STATE-W 1.2439999999999998D0 :OPEN-STATE-H 0.3280000000000003D0) (MAKE-INSTANCE (QUOTE FV-MORPHOLOGIE::MORPHOLOGIE-BOX) :R 0.10062528 :G 1.0 :B 0.0 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "seq" :CURVAL NIL :VALUE-STRING "nil" :CONNECTION NIL) (MAKE-INSTANCE (QUOTE PWGL-MENUBOX-SUBVIEW) :BOX-STRING "mode" :MINVAL 0 :MAXVAL 3 :MENU-LIST (LIST (LIST ":minflexmax" :MINFLEXMAX) (LIST ":minmax" :MINMAX) (LIST ":important-extrema" :IMPORTANT-EXTREMA) (LIST ":mdpp" :MDPP)) :MENU-LIST-STRING (LIST ":minflexmax" :MINFLEXMAX)) (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "thres" :CURVAL 0.3 :VALUE-STRING "0.3") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "option" :CURVAL 0.5 :VALUE-STRING "0.5")) :X 0.07404095716763593D0 :Y 0.6823248830950546D0 :W 0.4879999809265141D0 :H 0.2268 :BOX-STRING "int-signature" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 2 1 1) :ORIG-GROUPING-LIST (LIST 2 1) :EXTENSION-PATTERN (LIST 1) :EXTENSION-LIMIT 4 :X-PROPORTIONS (LIST (LIST 0.5676855919701684D0 1) (LIST 1)) :BORDER 0.012) :PW-FUNCTION (QUOTE FV-MORPHOLOGIE:INT-SIGNATURE) :OPEN-STATE-W 0.4879999809265141D0 :OPEN-STATE-H 0.2268 :CURRENT-EXTENSION-PATTERN-INDEX* 1) (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-BOX) :R 0.65 :G 0.65 :B 0.65 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "arg" :VALUE-STRING "0" :CONNECTION NIL)) :X 0.07404095716763593D0 :Y 0.3823248845851712D0 :W 0.14799999046325674D0 :H 0.097 :BOX-STRING "2bpf" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE PWGL-ABSTRACTION) :OPEN-STATE-W 0.14799999046325674D0 :OPEN-STATE-H 0.097 :APPLICATION-WINDOW (LET ((WIN (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-WINDOW) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "function" :CURVAL (QUOTE FIRST) :VALUE-STRING "first") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "list" :CURVAL "(0 1)" :VALUE-STRING "(0 1)" :CONNECTION NIL)) :X 0.5399999999999996D0 :Y 1.0160000915527348D0 :W 0.26 :H 0.16 :BOX-STRING "mapcar" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1 1) :ORIG-GROUPING-LIST (LIST 1 1) :EXTENSION-PATTERN (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE MAPCAR)) (MAKE-INSTANCE (QUOTE PWGL-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "function" :CURVAL (QUOTE THIRD) :VALUE-STRING "third") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "list" :CURVAL "(0 1)" :VALUE-STRING "(0 1)" :CONNECTION NIL)) :X 0.8800000014901155D0 :Y 1.0160000900626187D0 :W 0.26 :H 0.16 :BOX-STRING "mapcar" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1 1) :ORIG-GROUPING-LIST (LIST 1 1) :EXTENSION-PATTERN (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE MAPCAR)) (MAKE-INSTANCE (QUOTE PWGL-2D-CONSTRUCTOR-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-MENUBOX-SUBVIEW) :BOX-STRING "selector" :PWGL-ACTION-FUNCTION (QUOTE 2D-CONSTRUCTOR-FUNCTION) :MINVAL 0 :MAXVAL 5 :MENU-LIST :2D-CONSTRUCTOR-CLASSES :MENU-LIST-STRING ":bpf") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "xs/l" :CURVAL (LIST (LIST 0 1 2) (LIST 0 1 0)) :VALUE-STRING "((0 1 2) (0 1 0))" :CONNECTION NIL) (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "ys" :CURVAL "()" :VALUE-STRING "()" :CONNECTION NIL)) :X 0.5640000000000005D0 :Y 0.6800000915527344D0 :W 0.45 :H 0.23579999 :BOX-STRING "2d-bpf-constructor" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1 1 1) :ORIG-GROUPING-LIST (LIST 1 1) :EXTENSION-PATTERN (LIST 1) :EXTENSION-LIMIT 5 :BORDER 0.012) :PW-FUNCTION (QUOTE 2D-BPF-CONSTRUCTOR) :CURRENT-EXTENSION-PATTERN-INDEX* 1) (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-INPUT-BOX) :R 0.7 :G 0.7 :B 0.7 :X 0.2280000000000002D0 :Y 1.1760000000000002D0 :W 0.1 :H 0.02 :BOX-STRING "1" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :PW-FUNCTION (QUOTE PWGL-ABSTRACTION-INPUT)) (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-OUTPUT-BOX) :R 0.7 :G 0.7 :B 0.7 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-INPUT-BOX) :R 0.9 :G 0.9 :B 0.9 :BOX-STRING "out" :CONNECTION NIL)) :X 0.7799999999999998D0 :Y 0.2759999999999998D0 :W 0.1 :H 0.02 :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "1")) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE PWGL-ABSTRACTION-OUTPUT))) :X 150 :Y 150 :CONNECTIONS (LIST (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 2 :OUT-BOX 0 :PWBOX2 4 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 3 :OUT-BOX 0 :PWBOX2 1 :INPUT-BOX 1 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 3 :OUT-BOX 0 :PWBOX2 0 :INPUT-BOX 1 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 0 :OUT-BOX 0 :PWBOX2 2 :INPUT-BOX 1 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 1 :OUT-BOX 0 :PWBOX2 2 :INPUT-BOX 2 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2))) :TITLE "2bpf" :X 150 :Y 150 :WIDTH 350 :HEIGHT 350))) WIN) :BOX-DOCUMENTATION "") (MAKE-INSTANCE (QUOTE 2D-EDITOR) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-2D-SUBBOX) :APPLICATION-WINDOW (LET ((WIN (MAKE-INSTANCE (QUOTE PWGL-FUNCTION-EDITOR-WINDOW) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-2D-VIEW) :R 1.0 :G 1.0 :B 1.0 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE C-BREAK-POINT-FUNCTION) :POINTS (QUOTE ((8 0.9379243) (11 0.968618) (22 0.9332285) (36 0.97051007) (37 0.9442478) (39 0.95450116) (58 0.95450116) (86 0.9628083) (87 0.9561577) (113 0.9561577) (114 0.91974777) (116 0.94755716) (136 0.93809587) (142 0.96726346) (150 0.93292106) (151 0.96670086) (158 0.9402702) (162 0.96759594) (166 0.93225325) (170 0.961329) (173 0.91183037) (179 0.9630569) (185 0.91702635) (190 0.961035) (193 0.9223476) (194 0.95941884) (200 0.92267466) (210 0.965115) (218 0.89375806))))) :Y 1.0 :W 1.0 :H 1.0 :GLORTHOX1 1.7000003 :GLORTHOX2 224.3 :GLORTHOY1 0.8914555 :GLORTHOY2 0.97281266)) :X 560 :Y 145 :HITS 1 :WINDOW-UPDATE? T :TITLE "2D-Editor3" :X 560 :Y 145 :WIDTH 1435 :HEIGHT 367))) WIN) :CONNECTION NIL)) :X 0.3431621856711726D0 :Y 0.42632488309505434D0 :W 0.9919999999999996D0 :H 0.3280000000000003D0 :BOX-STRING "2D-Editor" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "objects") (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "active")) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE 2D-EDITOR) :SHOW-TITLE-STRING? NIL :OPEN-STATE-W 0.9919999999999996D0 :OPEN-STATE-H 0.3280000000000003D0) (MAKE-INSTANCE (QUOTE FV-MORPHOLOGIE::MORPHOLOGIE-BOX) :R 0.10062528 :G 1.0 :B 0.0 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "seq" :CURVAL NIL :VALUE-STRING "nil" :CONNECTION NIL) (MAKE-INSTANCE (QUOTE PWGL-MENUBOX-SUBVIEW) :BOX-STRING "mode" :CURVAL 1 :MINVAL 0 :MAXVAL 3 :MENU-LIST (LIST (LIST ":minflexmax" :MINFLEXMAX) (LIST ":minmax" :MINMAX) (LIST ":important-extrema" :IMPORTANT-EXTREMA) (LIST ":mdpp" :MDPP)) :MENU-LIST-STRING (LIST ":minmax" :MINMAX)) (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "thres" :CURVAL 0.25 :VALUE-STRING "0.25")) :X 1.4780409586577524D0 :Y 1.3023248845851712D0 :W 0.4879999809265141D0 :H 0.16 :BOX-STRING "int-signature" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 2 1) :ORIG-GROUPING-LIST (LIST 2 1) :EXTENSION-PATTERN (LIST 1) :EXTENSION-LIMIT 4 :X-PROPORTIONS (LIST (LIST 0.5676855919701684D0 1) (LIST 1)) :BORDER 0.012) :PW-FUNCTION (QUOTE FV-MORPHOLOGIE:INT-SIGNATURE) :OPEN-STATE-W 0.5199999809265141D0 :OPEN-STATE-H 0.16) (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-BOX) :R 0.65 :G 0.65 :B 0.65 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "arg" :VALUE-STRING "0" :CONNECTION NIL)) :X 1.4780409586577524D0 :Y 1.070324883095055D0 :W 0.14799999046325674D0 :H 0.097 :BOX-STRING "2bpf" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE PWGL-ABSTRACTION) :OPEN-STATE-W 0.14799999046325674D0 :OPEN-STATE-H 0.097 :APPLICATION-WINDOW (LET ((WIN (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-WINDOW) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "function" :CURVAL (QUOTE FIRST) :VALUE-STRING "first") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "list" :CURVAL "(0 1)" :VALUE-STRING "(0 1)" :CONNECTION NIL)) :X 0.5399999999999996D0 :Y 1.0160000915527348D0 :W 0.26 :H 0.16 :BOX-STRING "mapcar" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1 1) :ORIG-GROUPING-LIST (LIST 1 1) :EXTENSION-PATTERN (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE MAPCAR)) (MAKE-INSTANCE (QUOTE PWGL-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "function" :CURVAL (QUOTE THIRD) :VALUE-STRING "third") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "list" :CURVAL "(0 1)" :VALUE-STRING "(0 1)" :CONNECTION NIL)) :X 0.8800000014901155D0 :Y 1.0160000900626187D0 :W 0.26 :H 0.16 :BOX-STRING "mapcar" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1 1) :ORIG-GROUPING-LIST (LIST 1 1) :EXTENSION-PATTERN (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE MAPCAR)) (MAKE-INSTANCE (QUOTE PWGL-2D-CONSTRUCTOR-BOX) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-MENUBOX-SUBVIEW) :BOX-STRING "selector" :PWGL-ACTION-FUNCTION (QUOTE 2D-CONSTRUCTOR-FUNCTION) :MINVAL 0 :MAXVAL 5 :MENU-LIST :2D-CONSTRUCTOR-CLASSES :MENU-LIST-STRING ":bpf") (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "xs/l" :CURVAL (LIST (LIST 0 1 2) (LIST 0 1 0)) :VALUE-STRING "((0 1 2) (0 1 0))" :CONNECTION NIL) (MAKE-INSTANCE (QUOTE PWGL-VALUE-BOX-SUBVIEW) :BOX-STRING "ys" :CURVAL "()" :VALUE-STRING "()" :CONNECTION NIL)) :X 0.5640000000000005D0 :Y 0.6800000915527344D0 :W 0.45 :H 0.23579999 :BOX-STRING "2d-bpf-constructor" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1 1 1) :ORIG-GROUPING-LIST (LIST 1 1) :EXTENSION-PATTERN (LIST 1) :EXTENSION-LIMIT 5 :BORDER 0.012) :PW-FUNCTION (QUOTE 2D-BPF-CONSTRUCTOR) :CURRENT-EXTENSION-PATTERN-INDEX* 1) (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-INPUT-BOX) :R 0.7 :G 0.7 :B 0.7 :X 0.2280000000000002D0 :Y 1.1760000000000002D0 :W 0.1 :H 0.02 :BOX-STRING "1" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT))) :PW-FUNCTION (QUOTE PWGL-ABSTRACTION-INPUT)) (MAKE-INSTANCE (QUOTE PWGL-ABSTRACTION-OUTPUT-BOX) :R 0.7 :G 0.7 :B 0.7 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-INPUT-BOX) :R 0.9 :G 0.9 :B 0.9 :BOX-STRING "out" :CONNECTION NIL)) :X 0.7799999999999998D0 :Y 0.2759999999999998D0 :W 0.1 :H 0.02 :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "1")) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE PWGL-ABSTRACTION-OUTPUT))) :X 150 :Y 150 :CONNECTIONS (LIST (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 2 :OUT-BOX 0 :PWBOX2 4 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 3 :OUT-BOX 0 :PWBOX2 1 :INPUT-BOX 1 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 3 :OUT-BOX 0 :PWBOX2 0 :INPUT-BOX 1 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 0 :OUT-BOX 0 :PWBOX2 2 :INPUT-BOX 1 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 1 :OUT-BOX 0 :PWBOX2 2 :INPUT-BOX 2 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2))) :TITLE "2bpf" :X 150 :Y 150 :WIDTH 350 :HEIGHT 350))) WIN) :BOX-DOCUMENTATION "") (MAKE-INSTANCE (QUOTE 2D-EDITOR) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-2D-SUBBOX) :APPLICATION-WINDOW (LET ((WIN (MAKE-INSTANCE (QUOTE PWGL-FUNCTION-EDITOR-WINDOW) :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE PWGL-2D-VIEW) :R 1.0 :G 1.0 :B 1.0 :PWGL-SUBVIEWS (LIST (MAKE-INSTANCE (QUOTE C-BREAK-POINT-FUNCTION) :POINTS (QUOTE ((3 0.9422229) (4 0.9643994) (8 0.9379243) (11 0.968618) (17 0.9418077) (18 0.96390266) (22 0.9332285) (32 0.96824366) (35 0.9357078) (36 0.97051007) (37 0.9442478) (42 0.96227587) (43 0.9427843) (48 0.96821696) (58 0.9423297) (60 0.96632785) (72 0.94126606) (74 0.967505) (76 0.9455635) (77 0.961099) (85 0.9336438) (86 0.9628083) (107 0.94337267) (113 0.9590324) (114 0.91974777) (119 0.9600288) (120 0.94018424) (122 0.9618158) (136 0.93809587) (137 0.9630699) (141 0.9379311) (142 0.96726346) (150 0.93292106) (151 0.96670086) (155 0.9419751) (157 0.96172375) (158 0.9402702) (162 0.96759594) (166 0.93225325) (167 0.9589315) (169 0.9393681) (170 0.961329) (173 0.91183037) (179 0.9630569) (185 0.91702635) (190 0.961035) (193 0.9223476) (194 0.95941884) (200 0.92267466) (201 0.9521978) (207 0.9383522) (210 0.965115) (218 0.89375806))))) :Y 1.0 :W 1.0 :H 1.0 :GLORTHOX1 -3.4499998 :GLORTHOX2 224.45 :GLORTHOY1 0.8914555 :GLORTHOY2 0.97281266)) :X 560 :Y 145 :HITS 1 :WINDOW-UPDATE? T :TITLE "2D-Editor3" :X 560 :Y 145 :WIDTH 1435 :HEIGHT 367))) WIN) :CONNECTION NIL)) :X 1.747162187161289D0 :Y 1.070324883095055D0 :W 0.9919999999999996D0 :H 0.3280000000000003D0 :BOX-STRING "2D-Editor" :PWGL-OUTPUTS (LIST (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "objects") (MAKE-INSTANCE (QUOTE PWGL-OUTPUT) :BOX-STRING "active")) :BOX-LAYOUT (MAKE-INSTANCE (QUOTE PWGL-BOX-LAYOUT) :GROUPING-LIST (LIST 1) :ORIG-GROUPING-LIST (LIST 1) :BORDER 0.012) :PW-FUNCTION (QUOTE 2D-EDITOR) :SHOW-TITLE-STRING? NIL :OPEN-STATE-W 1.2439999999999998D0 :OPEN-STATE-H 0.3280000000000003D0)) :X 5 :Y 5 :TRANSLY -0.0040000226497650966D0 :CONNECTIONS (LIST (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 1 :OUT-BOX 0 :PWBOX2 11 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 11 :OUT-BOX 0 :PWBOX2 12 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 12 :OUT-BOX 0 :PWBOX2 13 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 9 :OUT-BOX 0 :PWBOX2 10 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 1 :OUT-BOX 0 :PWBOX2 8 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 8 :OUT-BOX 0 :PWBOX2 9 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 1 :OUT-BOX 0 :PWBOX2 5 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 5 :OUT-BOX 0 :PWBOX2 6 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 6 :OUT-BOX 0 :PWBOX2 7 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 3 :OUT-BOX 0 :PWBOX2 4 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 0 :OUT-BOX 0 :PWBOX2 3 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 1 :OUT-BOX 0 :PWBOX2 2 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2)) (MAKE-INSTANCE (QUOTE PWGL-CONNECTION) :PWBOX1 1 :OUT-BOX 0 :PWBOX2 0 :INPUT-BOX 0 :DRAW-MODE :5POINT :BEZIER-SELECTOR1 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 1) :BEZIER-SELECTOR2 (MAKE-INSTANCE (QUOTE PWGL-BEZIER-SELECTOR) :POINT-NUM 2))) :WINDOW-DOCUMENTATION "INT-SIGNATURE

La ritournelle ose donc des milieux arrachés au chaos, les faits passer les uns dans les autres grâce au rythme, puis en sélectionnant des composantes de milieux qu'elle exprime, fait territoire, intensité auto-posée, marque, signature. Mais l'intensité du territoire, dans la mouvance perpétuelle des ritournelles, ne reste pas au stade de la signature : l'intensité - le territoire - s'étoffe en devenant style : rapports mobiles qui vont \"exprimer\" le rapport du territoire qu'elles tracent avec le milieu intérieur des impulsions et avec le milieu extérieur des circonstances\"
(Deleuze : Mille plateaux p. 390)

Une signature est anomal, ensemble de singularités, lignes de différenciation, zig-zag assymétrique, plis.

Comme une trace, elle s'efface.
" :X 0 :Y 0 :WIDTH 730 :HEIGHT 530))) (WINDOW-SELECT WIN) WIN)