PRO dustem_define_la_common

  ;+
; NAME:
;   dustem_define_la_common
; PURPOSE:
;   Defines common blocks needed by the la_ routines
; CATEGORY:
;    DustEMWrap, Distributed, Low-Level, Initialization
; CALLING SEQUENCE:
;   dustem_define_la_common
; INPUTS:
;    None
; OPTIONAL INPUT PARAMETERS:
;    None
; OUTPUTS:
;    None
; OPTIONAL OUTPUT PARAMETERS:
;    None
; ACCEPTED KEY-WORDS:
;   None
; COMMON BLOCKS:
;    ERROR_CURRENT; SESSION_MODE; STATUS_BOOL
; SIDE EFFECTS:
;    Initializes common blocks
; RESTRICTIONS:
;    None
; PROCEDURES AND SUBROUTINES USED:
;    None
; EXAMPLES
;    dustem_define_la_common
; MODIFICATION HISTORY:
;    Written 2007
;    Evolution details on the DustEMWrap gitlab.
;    See http://dustemwrap.irap.omp.eu/ for FAQ and help.  
;-


COMMON SESSION_BLOCK, SESSION_MODE, ERROR_CURRENT, STATUS_BOOL
ERROR_CURRENT=0                                               
SESSION_MODE=0                                                
STATUS_BOOL=0                                                 
END