os/graphics/windowing/windowserver/DES/CLIENT.MDL
author sl
Tue, 10 Jun 2014 14:32:02 +0200
changeset 1 260cb5ec6c19
permissions -rw-r--r--
Update contrib.
     1 
     2 (object Petal
     3     version    	35)
     4 
     5 (object Design "<Top Level>"
     6     is_unit    	TRUE
     7     file_name  	"c:\wserv\des\client.mdl"
     8     is_loaded  	TRUE
     9     defaults   	(object defaults
    10 	rightMargin 	0.25
    11 	leftMargin 	0.25
    12 	topMargin  	0.25
    13 	bottomMargin 	0.5
    14 	pageOverlap 	0.25
    15 	clipIconLabels 	TRUE
    16 	autoResize 	FALSE
    17 	snapToGrid 	TRUE
    18 	gridX      	0
    19 	gridY      	0
    20 	defaultFont 	(object Font
    21 	    size       	10
    22 	    face       	"Arial"
    23 	    bold       	FALSE
    24 	    italics    	FALSE
    25 	    underline  	FALSE
    26 	    strike     	FALSE
    27 	    color      	0
    28 	    default_color 	TRUE)
    29 	showMessageNum 	3)
    30     root_category 	(object Class_Category "<Top Level>"
    31 	exportControl 	"Public"
    32 	global     	TRUE
    33 	subsystem  	"<Top Level>"
    34 	logical_models 	(list unit_reference_list
    35 	    (object Class "Thread"
    36 		fields     	(list has_relationship_list
    37 		    (object Has_Relationship
    38 			supplier   	"Thread")
    39 		    (object Has_Relationship
    40 			supplier   	"Window"
    41 			supplier_cardinality 	(value cardinality "n")
    42 			client_cardinality 	(value cardinality "1"))
    43 		    (object Has_Relationship
    44 			supplier   	"Pen"
    45 			supplier_cardinality 	(value cardinality "n")
    46 			client_cardinality 	(value cardinality "1"))
    47 		    (object Has_Relationship
    48 			supplier   	"Clock"
    49 			supplier_cardinality 	(value cardinality "n")
    50 			client_cardinality 	(value cardinality "1"))
    51 		    (object Has_Relationship
    52 			supplier   	"Sprite"
    53 			supplier_cardinality 	(value cardinality "n")
    54 			client_cardinality 	(value cardinality "1"))
    55 		    (object Has_Relationship
    56 			supplier   	"Bitmap sequence"
    57 			supplier_cardinality 	(value cardinality "n"))
    58 		    (object Has_Relationship
    59 			supplier   	"Text cursor"
    60 			supplier_cardinality 	(value cardinality "0..1")
    61 			client_cardinality 	(value cardinality "1"))
    62 		    (object Has_Relationship
    63 			supplier   	"Font"
    64 			supplier_cardinality 	(value cardinality "n")
    65 			client_cardinality 	(value cardinality "1"))
    66 		    (object Has_Relationship
    67 			supplier   	"Palette"
    68 			supplier_cardinality 	(value cardinality "n")
    69 			client_cardinality 	(value cardinality "1"))
    70 		    (object Has_Relationship
    71 			supplier   	"Brush"
    72 			supplier_cardinality 	(value cardinality "n")
    73 			client_cardinality 	(value cardinality "1"))
    74 		    (object Has_Relationship
    75 			supplier   	"Bitmap"
    76 			supplier_cardinality 	(value cardinality "n")
    77 			client_cardinality 	(value cardinality "1"))
    78 		    (object Has_Relationship
    79 			supplier   	"GC"
    80 			supplier_cardinality 	(value cardinality "n")
    81 			client_cardinality 	(value cardinality "1"))
    82 		    (object Has_Relationship
    83 			supplier   	"Clipping region"
    84 			supplier_cardinality 	(value cardinality "n")
    85 			client_cardinality 	(value cardinality "1"))
    86 		    (object Has_Relationship
    87 			supplier   	"Session"
    88 			supplier_cardinality 	(value cardinality "1")
    89 			client_cardinality 	(value cardinality "1"))))
    90 	    (object Class "Connection")
    91 	    (object Class "Drawable")
    92 	    (object Class "Window"
    93 		superclasses 	(list inheritance_relationship_list
    94 		    (object Inheritance_Relationship
    95 			supplier   	"Drawable")))
    96 	    (object Class "Bitmap"
    97 		superclasses 	(list inheritance_relationship_list
    98 		    (object Inheritance_Relationship
    99 			supplier   	"Drawable")))
   100 	    (object Class "Backed up window"
   101 		superclasses 	(list inheritance_relationship_list
   102 		    (object Inheritance_Relationship
   103 			supplier   	"Window")))
   104 	    (object Class "GDI Object")
   105 	    (object Class "AGDI Object"
   106 		used_nodes 	(list uses_relationship_list
   107 		    (object Uses_Relationship
   108 			supplier   	"Window")))
   109 	    (object Class "Brush"
   110 		superclasses 	(list inheritance_relationship_list
   111 		    (object Inheritance_Relationship
   112 			supplier   	"GDI Object"))
   113 		used_nodes 	(list uses_relationship_list
   114 		    (object Uses_Relationship
   115 			supplier   	"Bitmap")))
   116 	    (object Class "Font"
   117 		superclasses 	(list inheritance_relationship_list
   118 		    (object Inheritance_Relationship
   119 			supplier   	"GDI Object")))
   120 	    (object Class "Palette"
   121 		superclasses 	(list inheritance_relationship_list
   122 		    (object Inheritance_Relationship
   123 			supplier   	"GDI Object")))
   124 	    (object Class "Pen"
   125 		superclasses 	(list inheritance_relationship_list
   126 		    (object Inheritance_Relationship
   127 			supplier   	"GDI Object")))
   128 	    (object Class "Clock"
   129 		superclasses 	(list inheritance_relationship_list
   130 		    (object Inheritance_Relationship
   131 			supplier   	"AGDI Object")))
   132 	    (object Class "Sprite"
   133 		superclasses 	(list inheritance_relationship_list
   134 		    (object Inheritance_Relationship
   135 			supplier   	"AGDI Object")))
   136 	    (object Class "Bitmap sequence"
   137 		superclasses 	(list inheritance_relationship_list
   138 		    (object Inheritance_Relationship
   139 			supplier   	"AGDI Object")))
   140 	    (object Class "Text cursor"
   141 		superclasses 	(list inheritance_relationship_list
   142 		    (object Inheritance_Relationship
   143 			supplier   	"AGDI Object")))
   144 	    (object Class "GC"
   145 		used_nodes 	(list uses_relationship_list
   146 		    (object Uses_Relationship
   147 			supplier   	"Drawable")
   148 		    (object Uses_Relationship
   149 			supplier   	"Brush")
   150 		    (object Uses_Relationship
   151 			supplier   	"Palette")
   152 		    (object Uses_Relationship
   153 			supplier   	"Font")
   154 		    (object Uses_Relationship
   155 			supplier   	"Pen")
   156 		    (object Uses_Relationship
   157 			supplier   	"Clipping region")))
   158 	    (object Class "Clipping region"
   159 		superclasses 	(list inheritance_relationship_list
   160 		    (object Inheritance_Relationship
   161 			supplier   	"GDI Object")))
   162 	    (object Class "Pointer Cursor"
   163 		superclasses 	(list inheritance_relationship_list
   164 		    (object Inheritance_Relationship
   165 			supplier   	"AGDI Object")))
   166 	    (object Class "Session"
   167 		fields     	(list has_relationship_list
   168 		    (object Has_Relationship
   169 			supplier   	"GDI Object"
   170 			supplier_cardinality 	(value cardinality "n")
   171 			client_cardinality 	(value cardinality "1"))
   172 		    (object Has_Relationship
   173 			supplier   	"Drawable"
   174 			supplier_cardinality 	(value cardinality "n")
   175 			client_cardinality 	(value cardinality "1"))
   176 		    (object Has_Relationship
   177 			supplier   	"Store")
   178 		    (object Has_Relationship
   179 			supplier   	"AGDI Object"
   180 			supplier_cardinality 	(value cardinality "n")
   181 			client_cardinality 	(value cardinality "1"))))
   182 	    (object Class "Store"))
   183 	logical_presentations 	(list unit_reference_list
   184 	    (object ClassDiagram "Main"
   185 		title      	"Main"
   186 		zoom       	80
   187 		max_height 	28350
   188 		max_width  	21600
   189 		origin_x   	0
   190 		origin_y   	0
   191 		items      	(list diagram_item_list
   192 		    (object ClassView "Class" "Thread" @1
   193 			location   	(1982, 181)
   194 			label      	(object ItemLabel
   195 			    location   	(1878, 97)
   196 			    nlines     	2
   197 			    max_width  	240
   198 			    justify    	0
   199 			    label      	"Thread")
   200 			annotation 	8)
   201 		    (object ClassView "Class" "Drawable" @2
   202 			location   	(1927, 1363)
   203 			label      	(object ItemLabel
   204 			    location   	(1823, 1279)
   205 			    nlines     	2
   206 			    max_width  	240
   207 			    justify    	0
   208 			    label      	"Drawable")
   209 			annotation 	8)
   210 		    (object ClassView "Class" "Window" @3
   211 			location   	(2103, 1695)
   212 			label      	(object ItemLabel
   213 			    location   	(1999, 1611)
   214 			    nlines     	2
   215 			    max_width  	240
   216 			    justify    	0
   217 			    label      	"Window")
   218 			annotation 	8)
   219 		    (object ClassView "Class" "Bitmap" @4
   220 			location   	(1701, 1720)
   221 			label      	(object ItemLabel
   222 			    location   	(1597, 1636)
   223 			    nlines     	2
   224 			    max_width  	240
   225 			    justify    	0
   226 			    label      	"Bitmap")
   227 			annotation 	8)
   228 		    (object InheritView ""
   229 			client     	@3
   230 			supplier   	@2)
   231 		    (object InheritView ""
   232 			client     	@4
   233 			supplier   	@2)
   234 		    (object ClassView "Class" "Backed up window" @5
   235 			location   	(2286, 2005)
   236 			label      	(object ItemLabel
   237 			    location   	(2182, 1921)
   238 			    nlines     	2
   239 			    max_width  	240
   240 			    justify    	0
   241 			    label      	"Backed up window")
   242 			annotation 	8)
   243 		    (object InheritView ""
   244 			client     	@5
   245 			supplier   	@3)
   246 		    (object ClassView "Class" "GDI Object" @6
   247 			location   	(958, 646)
   248 			label      	(object ItemLabel
   249 			    location   	(854, 562)
   250 			    nlines     	2
   251 			    max_width  	240
   252 			    justify    	0
   253 			    label      	"GDI Object")
   254 			annotation 	8)
   255 		    (object ClassView "Class" "AGDI Object" @7
   256 			location   	(2496, 1463)
   257 			label      	(object ItemLabel
   258 			    location   	(2392, 1380)
   259 			    nlines     	2
   260 			    max_width  	240
   261 			    justify    	0
   262 			    label      	"AGDI Object")
   263 			height     	250
   264 			annotation 	8)
   265 		    (object ClassView "Class" "Brush" @8
   266 			location   	(1666, 1102)
   267 			label      	(object ItemLabel
   268 			    location   	(1562, 1018)
   269 			    nlines     	2
   270 			    max_width  	240
   271 			    justify    	0
   272 			    label      	"Brush")
   273 			annotation 	8)
   274 		    (object ClassView "Class" "Font" @9
   275 			location   	(178, 1103)
   276 			label      	(object ItemLabel
   277 			    location   	(74, 1019)
   278 			    nlines     	2
   279 			    max_width  	240
   280 			    justify    	0
   281 			    label      	"Font")
   282 			annotation 	8)
   283 		    (object ClassView "Class" "Palette" @10
   284 			location   	(542, 1110)
   285 			label      	(object ItemLabel
   286 			    location   	(438, 1026)
   287 			    nlines     	2
   288 			    max_width  	240
   289 			    justify    	0
   290 			    label      	"Palette")
   291 			annotation 	8)
   292 		    (object ClassView "Class" "Pen" @11
   293 			location   	(1284, 1110)
   294 			label      	(object ItemLabel
   295 			    location   	(1180, 1026)
   296 			    nlines     	2
   297 			    max_width  	240
   298 			    justify    	0
   299 			    label      	"Pen")
   300 			annotation 	8)
   301 		    (object ClassView "Class" "Clock" @12
   302 			location   	(3130, 2150)
   303 			label      	(object ItemLabel
   304 			    location   	(3026, 2066)
   305 			    nlines     	2
   306 			    max_width  	240
   307 			    justify    	0
   308 			    label      	"Clock")
   309 			annotation 	8)
   310 		    (object ClassView "Class" "Sprite" @13
   311 			location   	(3458, 1937)
   312 			label      	(object ItemLabel
   313 			    location   	(3354, 1853)
   314 			    nlines     	2
   315 			    max_width  	240
   316 			    justify    	0
   317 			    label      	"Sprite")
   318 			annotation 	8)
   319 		    (object ClassView "Class" "Bitmap sequence" @14
   320 			location   	(3431, 1626)
   321 			label      	(object ItemLabel
   322 			    location   	(3327, 1542)
   323 			    nlines     	2
   324 			    max_width  	240
   325 			    justify    	0
   326 			    label      	"Bitmap sequence")
   327 			annotation 	8)
   328 		    (object InheritView ""
   329 			client     	@8
   330 			supplier   	@6)
   331 		    (object InheritView ""
   332 			client     	@10
   333 			supplier   	@6)
   334 		    (object InheritView ""
   335 			client     	@9
   336 			supplier   	@6)
   337 		    (object InheritView ""
   338 			client     	@11
   339 			supplier   	@6)
   340 		    (object ClassView "Class" "Text cursor" @15
   341 			location   	(3407, 1293)
   342 			label      	(object ItemLabel
   343 			    location   	(3303, 1209)
   344 			    nlines     	2
   345 			    max_width  	240
   346 			    justify    	0
   347 			    label      	"Text cursor")
   348 			annotation 	8)
   349 		    (object InheritView ""
   350 			client     	@12
   351 			supplier   	@7)
   352 		    (object InheritView ""
   353 			client     	@14
   354 			supplier   	@7)
   355 		    (object InheritView ""
   356 			client     	@15
   357 			supplier   	@7)
   358 		    (object InheritView ""
   359 			client     	@13
   360 			supplier   	@7)
   361 		    (object ClassView "Class" "GC" @16
   362 			location   	(964, 1635)
   363 			label      	(object ItemLabel
   364 			    location   	(860, 1551)
   365 			    nlines     	2
   366 			    max_width  	240
   367 			    justify    	0
   368 			    label      	"GC")
   369 			annotation 	8)
   370 		    (object ClassView "Class" "Clipping region" @17
   371 			location   	(928, 1108)
   372 			label      	(object ItemLabel
   373 			    location   	(824, 1024)
   374 			    nlines     	2
   375 			    max_width  	240
   376 			    justify    	0
   377 			    label      	"Clipping region")
   378 			annotation 	8)
   379 		    (object InheritView ""
   380 			client     	@17
   381 			supplier   	@6)
   382 		    (object UsesView ""
   383 			client     	@7
   384 			supplier   	@3)
   385 		    (object UsesView ""
   386 			client     	@16
   387 			supplier   	@2)
   388 		    (object UsesView ""
   389 			client     	@16
   390 			supplier   	@8)
   391 		    (object UsesView ""
   392 			client     	@16
   393 			supplier   	@10)
   394 		    (object UsesView ""
   395 			client     	@16
   396 			supplier   	@9)
   397 		    (object UsesView ""
   398 			client     	@16
   399 			supplier   	@11)
   400 		    (object UsesView ""
   401 			client     	@16
   402 			supplier   	@17)
   403 		    (object ClassView "Class" "Pointer Cursor" @18
   404 			location   	(2700, 2245)
   405 			label      	(object ItemLabel
   406 			    location   	(2596, 2161)
   407 			    nlines     	2
   408 			    max_width  	240
   409 			    justify    	0
   410 			    label      	"Pointer Cursor")
   411 			annotation 	8)
   412 		    (object InheritView ""
   413 			client     	@18
   414 			supplier   	@7)
   415 		    (object ClassView "Class" "Session" @19
   416 			location   	(2314, 562)
   417 			label      	(object ItemLabel
   418 			    location   	(2210, 478)
   419 			    nlines     	2
   420 			    max_width  	240
   421 			    justify    	0
   422 			    label      	"Session")
   423 			annotation 	8)
   424 		    (object HasView ""
   425 			client     	@1
   426 			supplier   	@19)
   427 		    (object ClassView "Class" "Store" @20
   428 			location   	(2775, 707)
   429 			label      	(object ItemLabel
   430 			    location   	(2671, 623)
   431 			    nlines     	2
   432 			    max_width  	240
   433 			    justify    	0
   434 			    label      	"Store")
   435 			annotation 	8)
   436 		    (object UsesView ""
   437 			client     	@8
   438 			supplier   	@4)
   439 		    (object HasView ""
   440 			client     	@19
   441 			supplier   	@6)
   442 		    (object HasView ""
   443 			client     	@19
   444 			supplier   	@20)
   445 		    (object HasView ""
   446 			client     	@19
   447 			supplier   	@7)
   448 		    (object HasView ""
   449 			client     	@19
   450 			supplier   	@2)))))
   451     root_subsystem 	(object SubSystem "<Top Level>"
   452 	physical_models 	(list unit_reference_list)
   453 	physical_presentations 	(list unit_reference_list
   454 	    (object Module_Diagram "Main"
   455 		title      	"Main"
   456 		zoom       	100
   457 		max_height 	28350
   458 		max_width  	21600
   459 		origin_x   	0
   460 		origin_y   	0
   461 		items      	(list diagram_item_list))))
   462     process_structure 	(object Processes
   463 	ProcsNDevs 	(list
   464 	    (object Process_Diagram ""
   465 		title      	""
   466 		zoom       	100
   467 		max_height 	28350
   468 		max_width  	21600
   469 		origin_x   	0
   470 		origin_y   	0
   471 		items      	(list diagram_item_list))))
   472     properties 	(object Properties))