You can use this module with the following in your ~/.xmonad/xmonad.hs:

 import XMonad.Layout.WindowNavigation

Then edit your layoutHook by adding the WindowNavigation layout modifier to some layout:

 myLayouts = windowNavigation (Tall 1 (3/100) (1/2))  ||| Full ||| etc..
 main = xmonad defaultConfig { layoutHook = myLayouts }

For more detailed instructions on editing the layoutHook see:

XMonad.Doc.Extending#Editing_the_layout_hook

In keybindings:

    , ((modMask x,                 xK_Right), sendMessage $ Go R)
    , ((modMask x,                 xK_Left ), sendMessage $ Go L)
    , ((modMask x,                 xK_Up   ), sendMessage $ Go U)
    , ((modMask x,                 xK_Down ), sendMessage $ Go D)
    , ((modMask x .|. controlMask, xK_Right), sendMessage $ Swap R)
    , ((modMask x .|. controlMask, xK_Left ), sendMessage $ Swap L)
    , ((modMask x .|. controlMask, xK_Up   ), sendMessage $ Swap U)
    , ((modMask x .|. controlMask, xK_Down ), sendMessage $ Swap D)

For detailed instruction on editing the key binding see:

XMonad.Doc.Extending#Editing_key_bindings.