FUNCTION dustem_get_wavelengths,bidon,help=help ;+ ; 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]) ; ; INPUTS: ; None ; ; OPTIONAL INPUT PARAMETERS: ; None ; ; OUTPUTS: ; wavelengths = set of wavelengths [mic] ; ; OPTIONAL OUTPUT PARAMETERS: ; None ; ; 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 the_end: RETURN,lambir[1:*] END