Window polar_graph_legit() : Graph
	PauseUpdate; Silent 1		// building window...
	Display /W=(785,262,1480,900)
	ModifyGraph width={Plan,1,HorizCrossing,VertCrossing}
	SetDrawLayer UserBack
	SetDrawEnv xcoord= abs,ycoord= abs,fillpat= 0,fname= "default",textxjust= 1,textyjust= 1
	SetDrawEnv save
	SetDrawEnv linefgc= (65535,65535,65535),dash= 1
	SetDrawEnv save
	SetDrawEnv linefgc= (0,0,0),linebgc= (0,0,0),dash= 2
	SetDrawEnv save
	SetDrawEnv fsize= 18
	SetDrawEnv save
	SetDrawEnv save
	SetDrawEnv dash= 0
	SetDrawEnv save
	SetDrawEnv linethick= 0
	SetDrawEnv save
	SetDrawEnv save
	SetDrawEnv save
	SetDrawEnv save
	SetDrawEnv linethick= 1
	SetDrawEnv save
	SetDrawEnv save
	SetDrawEnv save
	SetDrawLayer ProgAxes
	SetDrawEnv xcoord= abs,ycoord= abs
	SetDrawEnv save
	SetDrawEnv fname= "default",fsize= 18
	SetDrawEnv save
	SetDrawEnv save
	SetDrawEnv save
	SetDrawLayer UserFront
	SetWindow kwTopWin,hook=WMPolarGraphHook,hookevents=1
EndMacro