diff --git a/lib/decoder.f90 b/lib/decoder.f90 index d6ecc904a..6902c3a58 100644 --- a/lib/decoder.f90 +++ b/lib/decoder.f90 @@ -1,4 +1,4 @@ -subroutine multimode_decoder(ipc1,ss,id2,params,nfsample) +subroutine multimode_decoder(ss,id2,params,nfsample) !$ use omp_lib use prog_args diff --git a/lib/ft8_decode.f90 b/lib/ft8_decode.f90 index 6dca93e70..be75afff3 100644 --- a/lib/ft8_decode.f90 +++ b/lib/ft8_decode.f90 @@ -8,7 +8,7 @@ module ft8_decode integer n30fox(MAXFOX) integer n30z integer nfox - + type :: ft8_decoder procedure(ft8_decode_callback), pointer :: callback contains