tdf#156270: use double for width/height

Otherwise 0.313159 is rounded to 0

Regression from
    commit 99f43923b66a98b75c78a50577f19293aa480998
    Author: Xisco Fauli <xiscofauli@libreoffice.org>
    Date:   Tue Apr 18 14:37:32 2023 +0200

    sw: fix divide by 0

Change-Id: Ib8bf0a770834e0ff73d215c27788df7a3b98404d
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/155561
Reviewed-by: Caolán McNamara <caolan.mcnamara@collabora.com>
Tested-by: Xisco Fauli <xiscofauli@libreoffice.org>
Reviewed-by: Xisco Fauli <xiscofauli@libreoffice.org>
diff --git a/sw/source/uibase/wrtsh/wrtsh1.cxx b/sw/source/uibase/wrtsh/wrtsh1.cxx
index 7a39048..af96916 100644
--- a/sw/source/uibase/wrtsh/wrtsh1.cxx
+++ b/sw/source/uibase/wrtsh/wrtsh1.cxx
@@ -915,8 +915,8 @@ void SwWrtShell::CalcAndSetScale( svt::EmbeddedObjectRef& xObj,
    }
    else
    {
        tools::Long nWidth(pCli->GetScaleWidth());
        tools::Long nHeight(pCli->GetScaleHeight());
        double nWidth(pCli->GetScaleWidth());
        double nHeight(pCli->GetScaleHeight());
        if (nWidth && nHeight)
        {
            aArea.Width ( aArea.Width()  / nWidth );