/ palettes /
/palettes/NatINLafont.INblobpalette
1 Palette
2 [ ("interface"
3 , ( Circle { shapeStyle = ShapeStyle
4 { styleStrokeWidth = 2
5 , styleStrokeColour = RGB 255 255 255
6 , styleFill = RGB 255 255 255
7 }
8 , shapeRadius = 0.25
9 }
10 , Just [("interface", DoublePoint 0.0 0.25)]
11 , Just [] ))
12 , ("Add"
13 , ( TextInEllipse { shapeStyle = ShapeStyle
14 { styleStrokeWidth = 2
15 , styleStrokeColour = RGB 250 0 0
16 , styleFill = RGB 255 255 255
17 }
18 , shapeText = "+"
19 }
20 , Just [ ("left" , DoublePoint (-0.5) 0.0)
21 , ("up" , DoublePoint 0.0 (-0.5))
22 , ("right", DoublePoint 0.5 0.0)]
23 , Just [] ))
24 , ("Z"
25 , ( TextInEllipse { shapeStyle = ShapeStyle
26 { styleStrokeWidth = 2
27 , styleStrokeColour = RGB 250 0 0
28 , styleFill = RGB 255 255 255
29 }
30 , shapeText = "0"
31 }
32 , Just [("up" , DoublePoint 0.0 (-0.5))]
33 , Just [] ))
34 , ("S"
35 , ( TextInEllipse { shapeStyle = ShapeStyle
36 { styleStrokeWidth = 2
37 , styleStrokeColour = RGB 250 0 0
38 , styleFill = RGB 255 255 255
39 }
40 , shapeText = "S"
41 }
42 , Just [ ("up" , DoublePoint 0.0 (-0.5) )
43 , ("down" , DoublePoint 0.0 0.5) ]
44 , Just [] ))
45 , ("Mult"
46 , ( TextInEllipse { shapeStyle = ShapeStyle
47 { styleStrokeWidth = 2
48 , styleStrokeColour = RGB 250 0 0
49 , styleFill = RGB 255 255 255
50 }
51 , shapeText = "x"
52 }
53 , Just [ ("left" , DoublePoint (-0.5) 0.0)
54 , ("up" , DoublePoint 0.0 (-0.5))
55 , ("right", DoublePoint 0.5 0.0)]
56 , Just [] ))
57 , ("Max"
58 , ( TextInEllipse { shapeStyle = ShapeStyle
59 { styleStrokeWidth = 2
60 , styleStrokeColour = RGB 250 0 0
61 , styleFill = RGB 255 255 255
62 }
63 , shapeText = "Max"
64 }
65 , Just [ ("left" , DoublePoint (-0.5) 0.0)
66 , ("up" , DoublePoint 0.0 (-0.5))
67 , ("right", DoublePoint 0.5 0.0)]
68 , Just [] ))
69 , ("Dupl"
70 , ( TextInEllipse { shapeStyle = ShapeStyle
71 { styleStrokeWidth = 2
72 , styleStrokeColour = RGB 250 0 0
73 , styleFill = RGB 255 255 255
74 }
75 , shapeText = "Dupl"
76 }
77 , Just [ ("down" , DoublePoint 0.0 0.5)
78 , ("left" , DoublePoint (-0.5) 0.0)
79 , ("right", DoublePoint 0.5 0.0)]
80 , Just [] ))
81 , ("Aux"
82 , ( TextInEllipse { shapeStyle = ShapeStyle
83 { styleStrokeWidth = 2
84 , styleStrokeColour = RGB 250 0 0
85 , styleFill = RGB 255 255 255
86 }
87 , shapeText = "Aux"
88 }
89 , Just [ ("right", DoublePoint 0.5 0.0)
90 , ("left" , DoublePoint (-0.5) 0.0)
91 , ("up" , DoublePoint 0.0 (-0.5))]
92 , Just [] ))
93 , ("Erase"
94 , ( Composite { shapeSegments =
95 [ Circle { shapeStyle = ShapeStyle
96 { styleStrokeWidth = 2
97 , styleStrokeColour = RGB 250 0 0
98 , styleFill = RGB 255 255 255
99 }
100 , shapeRadius = 0.5
101 }
102 , Arc { shapeStyle = ShapeStyle
103 { styleStrokeWidth = 2
104 , styleStrokeColour = RGB 250 0 0
105 , styleFill = RGB 255 255 255
106 }
107 , shapeRadius = 0.2
108 , shapeStart = 90.0
109 , shapeEnd = 270.0
110 , shapeCenter = DoublePoint 0.0 (-0.18)
111 }
112 , Arc { shapeStyle = ShapeStyle
113 { styleStrokeWidth = 2
114 , styleStrokeColour = RGB 250 0 0
115 , styleFill = RGB 255 255 255
116 }
117 , shapeRadius = 0.2
118 , shapeStart = 90.0
119 , shapeEnd = 270.0
120 , shapeCenter = DoublePoint 0.0 0.18
121 }
122 ] }
123 , Just [ ("down" , DoublePoint 0.0 0.5) ]
124 , Just [] ))
125 ]