C TWOLATT  - plots two lattices to see if there is overlap
C
C  INPUT PARAMETERS
C      CARD 1    A1X A1Y B1X B1Y        LATTICE 1 in pixels (*)
C      CARD 2    A2X A2Y B2X B2Y        LATTICE 2 in pixels (*)
C      CARD 3    RADLIM                 LIMIT FOR PLOT in pixels (*)
C      CARD 4    TITLE                            (20A4)
C      CARD 5    DISTEST        threshold for interference (*)
C
C       v1.00   1.6.96  RH      Original program
C       v1.01   18.8.00 RH      converted to plot2000
C         "     13.6.01 TSH     P2K_FONT needed string terminator
C