WSJT-X/lib/jt65_mod.f90

module jt65_mod

  integer param(0:9)
  integer mrs(63)
  integer mrs2(63)
  integer mdat(126),mref(126,2),mdat2(126),mref2(126,2)    !From prcom

  real s1(-255:256,126)
  real s3a(64,63)
  real pr(126)
  real width

end module jt65_mod
Replace all "common/test00?" with "use jt65_mod", etc. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6515 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 2016-03-10 09:25:22 -05:00			`module jt65_mod`

			`integer param(0:9)`
			`integer mrs(63)`
			`integer mrs2(63)`
Further progress on average and smoothed decodes. Not finished, though! git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6524 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 2016-03-11 11:26:06 -05:00			`integer mdat(126),mref(126,2),mdat2(126),mref2(126,2) !From prcom`
Replace all "common/test00?" with "use jt65_mod", etc. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6515 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 2016-03-10 09:25:22 -05:00
			`real s1(-255:256,126)`
			`real s3a(64,63)`
Further progress on average and smoothed decodes. Not finished, though! git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6524 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 2016-03-11 11:26:06 -05:00			`real pr(126)`
Many changes in aid of decoding signals with significant Doppler spread in submodes JT65B, C. More changes still to come! git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6535 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 2016-03-17 09:28:57 -04:00			`real width`
Replace all "common/test00?" with "use jt65_mod", etc. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6515 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 2016-03-10 09:25:22 -05:00
			`end module jt65_mod`