次の8行だけのvimrcを書きました。

set expandtab
set tabstop=4
set shiftwidth=4
set softtabstop=4
function! F()
    >>
endfunction
nmap z :<C-u>call F()<CR>

zキーを押すと、半角スペース4個分インデントされる事を期待したいのですが、結果は2倍の8個分インデントされてしまいました。

ノーマルモードで>>やインサートモードでtabキーを押すと、半角スペース4個分インデントされました。
vimrcで定義したF関数の>>でインデントする時のみ、shiftwidthの2倍の幅でインデントされてしまいます。

shiftwidthに設定した幅でインデントさせる方法を教えてください。