Xmonad：ウィンドウの浮き上がりと「自然なサイズ」でサイズ変更

xmonadでは、ウィンドウの標準動作はタイリングです。 xprop | grep WM_CLASSを実行し、次のように入力します。

myManageHook = composeAll
    [ className =? "MPlayer"        --> doFloat
    , className =? "Gimp"           --> doFloat]

これにより、このプログラムのウィンドウはフローティング状態になります。「自然なサイズ」（GNOMEに現れるのと同じ）。

今私の質問は次のとおりです。これを「すぐに」実行できますか？

mod-button1を押しながらクリックしてドラッグすると、手動でサイズ変更できます。ただし、自動的に「自然サイズ」にサイズ変更する必要があります。これを達成するためにxmonad.hsで何を変更できますか？

もう一つの可能​​性（そしてこれは私にとって十分です）はいくつかの「スタートアップスクリプト」を持つことです。これをxmsと呼びます。xms fooプログラム foo と入力すると、フローティングを開始し、そのウィンドウには「自然なサイズ」があります。