diff --git a/lib/q65_decode.f90 b/lib/q65_decode.f90 index d3bb5dbd5..6e2b5e9d9 100644 --- a/lib/q65_decode.f90 +++ b/lib/q65_decode.f90 @@ -134,7 +134,8 @@ contains ibwa=max(1,int(1.8*log(baud*mode_q65)) + 1) ibwb=min(10,ibwa+5) maxiters=67 - else if(iand(ndepth,3).eq.3) then + endif + if(iand(ndepth,3).eq.3) then ibwa=max(1,ibwa-1) ibwb=min(10,ibwb+1) maxiters=100