eiffel - Eiffel ループをループの不変条件/変種をサポートしない言語に翻訳する

Question

Eiffel のループは次の形式に従います。

from
    Init
invariant
    Invariant
until
    Exit
variant
    Variant
loop
    Body
end

上記の Eiffel 疑似コードを、ループの不変条件/不変条件をサポートしない言語にどのように翻訳しますか? assertそのようなターゲット言語に、不変/変種をチェックする命令があると仮定しましょう。