pro set_size, xwsize, ywsize ; ; proceedure to read rotations ; read, ' Enter the window size in the x direction:', xwsize read, ' Enter the window size in the y direction:', ywsize end