くだすれFORTRAN（超初心者用）その7

[9 デフォルトの名無しさん 2021/05/03(月) 02:23:13.56 ID:PQP1mUBv]

Do loop 中に

if (hoge) then
処理1
exit
elseif (hogehoge)
処理2
cycle
Endif

と言った同じ処理内容が100近くいくつもあるので、if -endif部分をサブルーチン化したいなと思ったのですが、exit やcycleが入ってると怒られます。
何か他にいい方法がありますか？