tell application "iCal"
	-- activate -- if you want to bring iCal to the front
	
	set curBounds to bounds of window 1 -- take current window settings
	-- set curBounds to {30, 100, 740, 650} -- fixed position
	
	switch view to day view
	set bounds of window 1 to curBounds
	switch view to week view
	set bounds of window 1 to curBounds
	switch view to month view
	set bounds of window 1 to curBounds	
	
end tell