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

 import XMonad.Layout.MosaicAlt
 import qualified Data.Map as M

Then edit your layoutHook by adding the MosaicAlt layout:

 myLayouts = MosaicAlt M.empty ||| Full ||| etc..
 main = xmonad defaultConfig { layoutHook = myLayouts }

For more detailed instructions on editing the layoutHook see:

XMonad.Doc.Extending

In the key-bindings, do something like:

     , ((modMask x .|. shiftMask  , xK_a    ), withFocused (sendMessage . expandWindowAlt))
     , ((modMask x .|. shiftMask  , xK_z    ), withFocused (sendMessage . shrinkWindowAlt))
     , ((modMask x .|. shiftMask  , xK_s    ), withFocused (sendMessage . tallWindowAlt))
     , ((modMask x .|. shiftMask  , xK_d    ), withFocused (sendMessage . wideWindowAlt))
     , ((modMask x .|. controlMask, xK_space), sendMessage resetAlt)
     ...

For detailed instruction on editing the key binding see:

XMonad.Doc.Extending.