windowing/windowserver/DES/WSV4.MDL
author hgs
Fri, 16 Jul 2010 11:45:55 +0300
changeset 116 171fae344dd4
parent 0 5d03bc08d59c
permissions -rw-r--r--
201026_3


(object Petal
    version    	35)

(object Design "<Top Level>"
    is_unit    	TRUE
    file_name  	"c:\wserv\des\wsv4.mdl"
    is_loaded  	TRUE
    defaults   	(object defaults
	rightMargin 	0.25
	leftMargin 	0.25
	topMargin  	0.25
	bottomMargin 	0.5
	pageOverlap 	0.25
	clipIconLabels 	TRUE
	autoResize 	FALSE
	snapToGrid 	TRUE
	gridX      	0
	gridY      	0
	defaultFont 	(object Font
	    size       	12
	    face       	"helvetica"
	    bold       	FALSE
	    italics    	FALSE
	    underline  	FALSE
	    strike     	FALSE
	    color      	0
	    default_color 	TRUE)
	showMessageNum 	3)
    root_category 	(object Class_Category "<Top Level>"
	exportControl 	"Public"
	global     	TRUE
	subsystem  	"<Top Level>"
	logical_models 	(list unit_reference_list
	    (object Class "Main"
		documentation 	"Top level windows server, recieves commands from clients, events from the O/S and timer completions."
		fields     	(list has_relationship_list
		    (object Has_Relationship
			supplier   	"Client"
			supplier_cardinality 	(value cardinality "n")
			client_cardinality 	(value cardinality "1"))
		    (object Has_Relationship
			supplier   	"WsrvClient"
			supplier_cardinality 	(value cardinality "1")
			client_cardinality 	(value cardinality "1"))
		    (object Has_Relationship
			supplier   	"System"
			supplier_cardinality 	(value cardinality "1")
			client_cardinality 	(value cardinality "1")))
		cardinality 	(value Cardinality "1"))
	    (object Class "BackedUpWindow"
		fields     	(list has_relationship_list
		    (object Has_Relationship
			supplier   	"Backup Bitmap"))
		superclasses 	(list inheritance_relationship_list
		    (object Inheritance_Relationship
			supplier   	"Window"))
		collaborators 	(list association_list
		    (object Association
			supplier   	"Bitmap")))
	    (object Class_Utility "$UNNAMED$0")
	    (object Class "Owner"
		fields     	(list has_relationship_list
		    (object Has_Relationship
			supplier   	"Bitmap"
			supplier_cardinality 	(value cardinality "n")
			client_cardinality 	(value cardinality "1"))
		    (object Has_Relationship
			supplier   	"Clock"
			supplier_cardinality 	(value cardinality "0..n")
			client_cardinality 	(value cardinality "1"))
		    (object Has_Relationship
			supplier   	"Font"
			supplier_cardinality 	(value cardinality "0..n")
			client_cardinality 	(value cardinality "1"))))
	    (object Class "GCB"
		collaborators 	(list association_list
		    (object Association
			supplier   	"Font"
			supplier_cardinality 	(value cardinality "1")
			client_cardinality 	(value cardinality "n"))
		    (object Association
			supplier   	"Backup Bitmap"
			supplier_cardinality 	(value cardinality "0..1")
			client_cardinality 	(value cardinality "n")))
		used_nodes 	(list uses_relationship_list
		    (object Uses_Relationship
			supplier   	"Drawable")))
	    (object Class "Bitmap"
		superclasses 	(list inheritance_relationship_list
		    (object Inheritance_Relationship
			supplier   	"Drawable"))
		collaborators 	(list association_list
		    (object Association
			supplier   	"System Bitmaps"
			supplier_cardinality 	(value cardinality "n")
			client_cardinality 	(value cardinality "1"))))
	    (object Class "Font"
		cardinality 	(value Cardinality "1..n"))
	    (object Class "$UNNAMED$1")
	    (object Class "System"
		superclasses 	(list inheritance_relationship_list
		    (object Inheritance_Relationship
			supplier   	"Owner")))
	    (object Class "System Bitmaps"
		collaborators 	(list association_list
		    (object Association
			supplier   	"Main"
			supplier_cardinality 	(value cardinality "n")
			client_cardinality 	(value cardinality "0"))
		    (object Association
			supplier   	"Bitmap"))
		cardinality 	(value Cardinality "1"))
	    (object Class "Drawable"
		fields     	(list has_relationship_list
		    (object Has_Relationship
			supplier   	"Window"))
		used_nodes 	(list uses_relationship_list
		    (object Uses_Relationship
			supplier   	"GCB"
			supplier_cardinality 	(value cardinality "1")
			client_cardinality 	(value cardinality "n"))))
	    (object Class "$UNNAMED$2")
	    (object Class "Window"
		superclasses 	(list inheritance_relationship_list
		    (object Inheritance_Relationship
			supplier   	
|Normal 

|Window

|
			)
		    (object Inheritance_Relationship
			supplier   	"Drawable")))
	    (object Class "Normal 

Window

")
	    (object Class "Clock"
		fields     	(list has_relationship_list
		    (object Has_Relationship
			supplier   	"GCB"))
		used_nodes 	(list uses_relationship_list
		    (object Uses_Relationship
			supplier   	"GCB")))
	    (object Class "System Clocks")
	    (object Class "WsrvClient"
		superclasses 	(list inheritance_relationship_list
		    (object Inheritance_Relationship
			supplier   	"Client")))
	    (object Class_Utility "$UNNAMED$3")
	    (object Class_Utility "$UNNAMED$4")
	    (object Parameterized_Class "$UNNAMED$5")
	    (object Instantiated_Class_Utility "$UNNAMED$6")
	    (object Instantiated_Class "$UNNAMED$7")
	    (object Parameterized_Class "$UNNAMED$8")
	    (object Class "Client"
		fields     	(list has_relationship_list
		    (object Has_Relationship
			supplier   	"GCB"
			supplier_cardinality 	(value cardinality "0..n")
			client_cardinality 	(value cardinality "1"))
		    (object Has_Relationship
			supplier   	"Window"
			supplier_cardinality 	(value cardinality "0..n")
			client_cardinality 	(value cardinality "1")))
		superclasses 	(list inheritance_relationship_list
		    (object Inheritance_Relationship
			supplier   	"Owner")))
	    (object Metaclass "$UNNAMED$9")
	    (object Class_Utility "$UNNAMED$10")
	    (object Class "Backup Bitmap"
		superclasses 	(list inheritance_relationship_list
		    (object Inheritance_Relationship
			supplier   	"Bitmap")))
	    (object Class "$UNNAMED$11")
	    (object Class "$UNNAMED$12")
	    (object Class "$UNNAMED$13")
	    (object Class "$UNNAMED$14")
	    (object Class_Category "$UNNAMED$15"
		exportControl 	"Public"
		logical_models 	(list unit_reference_list)
		logical_presentations 	(list unit_reference_list))
	    (object Class_Category "$UNNAMED$16"
		exportControl 	"Public"
		logical_models 	(list unit_reference_list)
		logical_presentations 	(list unit_reference_list)))
	logical_presentations 	(list unit_reference_list
	    (object ClassDiagram "Main"
		title      	"Main"
		zoom       	72
		max_height 	28350
		max_width  	21600
		origin_x   	0
		origin_y   	0
		items      	(list diagram_item_list
		    (object ClassView "Class" "Main" @1
			location   	(1053, 177)
			label      	(object ItemLabel
			    location   	(944, 87)
			    nlines     	2
			    max_width  	255
			    justify    	0
			    label      	"Main")
			width      	370
			height     	270
			annotation 	8)
		    (object ClassView "Class" "BackedUpWindow" @2
			location   	(468, 1946)
			label      	(object ItemLabel
			    location   	(361, 1859)
			    nlines     	2
			    max_width  	248
			    justify    	0
			    label      	"BackedUpWindow")
			width      	360
			height     	260
			annotation 	8)
		    (object ClassView "Class" "Owner" @3
			location   	(1204, 559)
			label      	(object ItemLabel
			    location   	(1101, 476)
			    nlines     	2
			    max_width  	238
			    justify    	0
			    label      	"Owner")
			width      	345
			height     	250
			annotation 	8)
		    (object ClassView "Class" "GCB" @4
			location   	(1594, 1447)
			label      	(object ItemLabel
			    location   	(1490, 1363)
			    nlines     	2
			    max_width  	240
			    justify    	0
			    label      	"GCB")
			annotation 	8)
		    (object ClassView "Class" "Bitmap" @5
			location   	(991, 1575)
			label      	(object ItemLabel
			    location   	(887, 1491)
			    nlines     	2
			    max_width  	240
			    justify    	0
			    label      	"Bitmap")
			annotation 	8)
		    (object ClassView "Class" "Font" @6
			location   	(2195, 1345)
			label      	(object ItemLabel
			    location   	(2091, 1261)
			    nlines     	2
			    max_width  	240
			    justify    	0
			    label      	"Font")
			annotation 	8)
		    (object ClassView "Class" "System" @7
			location   	(1802, 714)
			label      	(object ItemLabel
			    location   	(1698, 630)
			    nlines     	2
			    max_width  	240
			    justify    	0
			    label      	"System")
			annotation 	8)
		    (object ClassView "Class" "Drawable" @8
			location   	(880, 1170)
			label      	(object ItemLabel
			    location   	(776, 1086)
			    nlines     	2
			    max_width  	240
			    justify    	0
			    label      	"Drawable")
			annotation 	8)
		    (object ClassView "Class" "Window" @9
			location   	(467, 1407)
			label      	(object ItemLabel
			    location   	(363, 1323)
			    nlines     	2
			    max_width  	240
			    justify    	0
			    label      	"Window")
			annotation 	8)
		    (object ClassView "Class" "Clock" @10
			location   	(1430, 988)
			label      	(object ItemLabel
			    location   	(1326, 904)
			    nlines     	2
			    max_width  	240
			    justify    	0
			    label      	"Clock")
			annotation 	8)
		    (object HasView ""
			client     	@3
			supplier   	@10)
		    (object ClassView "Class" "WsrvClient" @11
			location   	(275, 680)
			label      	(object ItemLabel
			    location   	(171, 596)
			    nlines     	2
			    max_width  	240
			    justify    	0
			    label      	"WsrvClient")
			annotation 	8)
		    (object HasView ""
			client     	@1
			supplier   	@11)
		    (object HasView ""
			client     	@10
			supplier   	@4)
		    (object ClassView "Class" "Client" @12
			location   	(759, 557)
			label      	(object ItemLabel
			    location   	(655, 473)
			    nlines     	2
			    max_width  	240
			    justify    	0
			    label      	"Client")
			annotation 	8)
		    (object HasView ""
			client     	@12
			supplier   	@9)
		    (object AssociationView ""
			client     	@4
			supplier   	@6)
		    (object HasView ""
			client     	@12
			supplier   	@4)
		    (object ClassView "Class" "Backup Bitmap" @13
			location   	(991, 1968)
			label      	(object ItemLabel
			    location   	(881, 1877)
			    nlines     	2
			    max_width  	256
			    justify    	0
			    label      	"Backup Bitmap")
			width      	372
			height     	272
			annotation 	8)
		    (object AssociationView ""
			client     	@4
			supplier   	@13)
		    (object HasView ""
			client     	@2
			supplier   	@13)
		    (object InheritView ""
			client     	@9
			supplier   	@8)
		    (object InheritView ""
			client     	@5
			supplier   	@8)
		    (object InheritView ""
			client     	@2
			supplier   	@9)
		    (object InheritView ""
			client     	@13
			supplier   	@5)
		    (object InheritView ""
			client     	@11
			supplier   	@12)
		    (object InheritView ""
			client     	@7
			supplier   	@3)
		    (object HasView ""
			client     	@3
			supplier   	@5)
		    (object InheritView ""
			client     	@12
			supplier   	@3)
		    (object HasView ""
			client     	@3
			supplier   	@6)
		    (object HasView ""
			client     	@1
			supplier   	@7)
		    (object UsesView ""
			client     	@4
			supplier   	@8)
		    (object HasView ""
			client     	@1
			supplier   	@12)))))
    root_subsystem 	(object SubSystem "<Top Level>"
	physical_models 	(list unit_reference_list)
	physical_presentations 	(list unit_reference_list
	    (object Module_Diagram "Main"
		title      	"Main"
		zoom       	100
		max_height 	28350
		max_width  	21600
		origin_x   	0
		origin_y   	0
		items      	(list diagram_item_list))))
    process_structure 	(object Processes
	ProcsNDevs 	(list
	    (object Process_Diagram ""
		title      	""
		zoom       	100
		max_height 	28350
		max_width  	21600
		origin_x   	0
		origin_y   	0
		items      	(list diagram_item_list))))
    properties 	(object Properties))