FUNCTION dustem_get_wavelengths,bidon,help=help,isrf_wavelengths=isrf_wavelengths

;+
; NAME:
;    dustem_get_wavelengths

;

; PURPOSE:
;    returns the wavelengths used for dustemwrap spectra. (Are they the same for emission and extinction ?)

;

; CATEGORY:
;    DUSTEM Wrapper

;

; CALLING SEQUENCE:

;    wavelengths=dustem_get_wavelengths([/help][,isrf_wavelengths=])

;

; INPUTS:
;    None

;

; OPTIONAL INPUT PARAMETERS:
;    None

;

; OUTPUTS:

;    wavelengths = set of Spectra wavelengths used by dustemwrap[mic]

;

; OPTIONAL OUTPUT PARAMETERS:

;    isrf_wavelengths = set of ISRF wavelengths used by dustemwrap [mic]

;

; ACCEPTED KEY-WORDS:
;    help                  = if set, print this help

;

; COMMON BLOCKS:
;    None

;

; SIDE EFFECTS:
;    None

;

; RESTRICTIONS:
;    None

;

; PROCEDURE:
;    

;

; EXAMPLES
;
; MODIFICATION HISTORY:
;    Written by JPB 

;    Evolution details on the DustEMWrap gitlab.
;    See http://dustemwrap.irap.omp.eu/ for FAQ and help.  

;-

IF keyword_set(help) THEN BEGIN
  doc_library,'dustem_get_wavelengths'
  lambir=0.
  goto,the_end
ENDIF


IF !dustem_which EQ 'DESERT' THEN BEGIN
  lambir=((*!dustem_params).gemissiv.lambir)
ENDIF ELSE BEGIN

  lambir=((*!dustem_params).lambda.lambda) ; there is an error here that I have noticed a long time ago. Temporary fix is @ the returned value

ENDELSE

isrf_wavelengths=(*!dustem_params).ISRF.lambisrf

the_end:

;RETURN,lambir[1:*]
RETURN,lambir

END