A few more renames, QRA65 --> QRA64.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6849 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2016-07-02 12:48:27 +00:00
parent 3016ccee01
commit 63fa30b0b2
3 changed files with 8 additions and 8 deletions

View File

@ -255,7 +255,7 @@ contains
endif
write(13,1011) params%nutc,nint(sync),snr,dt,float(freq),drift, &
decoded,nft
1011 format(i4.4,i4,i5,f6.2,f8.0,i4,3x,a22,' QRA65',i3)
1011 format(i4.4,i4,i5,f6.2,f8.0,i4,3x,a22,' QRA64',i3)
go to 100
endif

View File

@ -98,7 +98,7 @@ contains
ndecoded=0
if(nsubmode.ge.100) then
! This is QRA65 mode
! This is QRA64 mode
call qra64a(dd,nf1,nf2,nfqso,ntol,mycall,sync,nsnr,dtx,nfreq,decoded,nft)
! if(sync.lt.12.8) go to 900 !### Temporary ###
if (associated(this%callback)) then

View File

@ -13,21 +13,21 @@ CFLAGS = -O2 -Wall -I. -D_WIN32
%.o: %.F90
${FC} ${FFLAGS} -c $<
all: libqra65.a qracodes.exe
all: libqra64.a qracodes.exe
OBJS1 = normrnd.o npfwht.o pdmath.o qra12_63_64_irr_b.o \
qra13_64_64_irr_e.o qracodes.o
libqra65.a: $(OBJS1)
ar cr libqra65.a $(OBJS1)
ranlib libqra65.a
libqra64.a: $(OBJS1)
ar cr libqra64.a $(OBJS1)
ranlib libqra64.a
OBJS2 = main.o
qracodes.exe: $(OBJS2)
${CC} -o qracodes.exe $(OBJS2) libqra65.a -lm
${CC} -o qracodes.exe $(OBJS2) libqra64.a -lm
.PHONY : clean
clean:
$(RM) *.o libqra65.a qracodes.exe
$(RM) *.o libqra64.a qracodes.exe