C LAST UPDATE: 
C+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
C
C**************************
C**     LRL_BDAT         **
C**************************
C
C
      BLOCK DATA LRL_BDAT
C
      INCLUDE 'implicit_none.finc'
C
C Purpose: Initialise LRL data
C
C Author:  John W. Campbell, July 1993
C
C **** Service Routine Only ****
C
C====== GLOBALS:
C
      INCLUDE 'lrl_data.finc'

      DATA NUM_SPOTS/0/, NSING/0/, NMULT/0/, NUM_REFLEX/0/
      DATA NTRIES/0/, LASTHKL/3*0/, XSTART/-1.0E09/, XEND/1.0E09/
      DATA INTEGRATED /.FALSE./ DISTOR_CORR/.TRUE./
      DATA OVLAP_STATUS/0/, ISORT /0/, INTCODE_TYPE/0/
C
C-------------------------------------------------------------------------------
C
      END
