Remove two unused routines. Remove declaration of unused variable.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@4544 ab8295b8-cf94-4d9e-aec4-7959e3be5d79

lib/encode4.f90

@@ -1,20 +0,0 @@
-subroutine encode4(message,ncode)
-
-  parameter (MAXCALLS=7000,MAXRPT=63)
-  integer ncode(206)
-  character*22 message          !Message to be generated
-  character*3 cok               !'   ' or 'OOO'
-  integer dgen(13)
-  integer*1 data0(13),symbol(216)
-  logical text
-
-  call chkmsg(message,cok,nspecial,flip)
-  call packmsg(message,dgen,text)  !Pack 72-bit message into 12 six-bit symbols
-  call entail(dgen,data0)
-  call encode232(data0,206,symbol)       !Convolutional encoding
-  call interleave24(symbol,1)            !Apply JT4 interleaving
-  do i=1,206
-     ncode(i)=symbol(i)
-  enddo
-
-end subroutine encode4