+\AtEndOfPackageFile{geometry}{%
+ \setlength{\@tempdima}{\textheight}%
+ \setlength{\textheight}{\textwidth}%
+ \setlength{\textwidth}{\@tempdima}%
+ \expandafter\def\expandafter\Gm@process\expandafter{\Gm@process
+ \setlength{\@tempdima}{\textheight}%
+ \setlength{\textheight}{\textwidth}%
+ \setlength{\textwidth}{\@tempdima}}}