C LAST UPDATE: 
C+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
C
C****************************
C**     LFN_SAINT_BDAT     **
C****************************
C
C
      BLOCK DATA LFN_SAINT_BDAT
C
      INCLUDE 'implicit_none.finc'
C
C Purpose: Block data for LFN_SAINT routines
C
C Author:  John W. Campbell, November 1995
C
C **** Service Routine Only ****
C
C
C====== Parameter statements
C 
      INCLUDE 'saint_limits.finc'
C
C====== GLOBALS:
C
      INCLUDE 'lfn_saint.finc'
      DATA IPROF_PK/0/, IPROF_PL/0/
C
C-------------------------------------------------------------------------------
C
      END
