From 440f1ae1f92ec8d60113d7410af41a27d41f7f7d Mon Sep 17 00:00:00 2001
From: Annie Hughes <annie.hughes@irap.omp.eu>
Date: Wed, 29 Mar 2023 11:01:17 +0200
Subject: [PATCH] unknown

---
 src/idl/dustem_make_fits_predicted_ext.pro | 30 +++++++++++++++++++++++-------
 1 file changed, 23 insertions(+), 7 deletions(-)

diff --git a/src/idl/dustem_make_fits_predicted_ext.pro b/src/idl/dustem_make_fits_predicted_ext.pro
index 29c4a1f..b73a805 100644
--- a/src/idl/dustem_make_fits_predicted_ext.pro
+++ b/src/idl/dustem_make_fits_predicted_ext.pro
@@ -1,42 +1,56 @@
 FUNCTION dustem_make_fits_predicted_ext ,syst_var $
-										,dustem_predicted_ext $
-										,str_input_ext=str_input_ext $
-										,dustem_predicted_Qext=dustem_predicted_Qext $
-    									,dustem_predicted_Uext=dustem_predicted_Uext $
-										,help=help
+                                         ,dustem_predicted_ext $
+                                         ,str_input_ext=str_input_ext $
+                                         ,dustem_predicted_Qext=dustem_predicted_Qext $
+                                         ,dustem_predicted_Uext=dustem_predicted_Uext $
+                                         ,help=help
 
 ;+
 ; NAME:
 ;    dustem_make_fits_predicted_ext
+;  
 ; PURPOSE:
 ;    extracts dustemwrap predicted extinction SED from dustem system variable syst_var, to be put into fits files
+;
 ; CATEGORY:
 ;    DustEMWrap, Distributed, High-Level, User Convenience
+;
 ; CALLING SEQUENCE:
 ;    str_predicted_EXT=dustem_make_fits_predicted_ext(syst_var,dustem_predicted_ext[,str_input_ext=])
 ;    see dustem_write_fits_table.pro
+;
 ; INPUTS:
 ;    syst_var  : dustem system variable (*!dustem_data or *!dustem_show)
 ;    dustem_predicted_ext : dustemwrap predicted extinction SED as output by dustem_compute_ext.pro
+;
 ; OPTIONAL INPUT PARAMETERS:
 ;    dustem_predicted_Qext : Stokes Q extinction SED
 ;    dustem_predicted_Uext : Stokes U extinction SED
+;
 ; OUTPUTS:
 ;    str_predicted_EXT : dustemwrap predicted extinction SED as used to store into fits file
+;
 ; OPTIONAL OUTPUT PARAMETERS:
 ;    str_input_ext : dustem wrap input extinction SED
+;
 ; ACCEPTED KEY-WORDS:
 ;    help      = If set, print this help
+;
 ; COMMON BLOCKS:
 ;    None
+;
 ; SIDE EFFECTS:
 ;    None
+;
 ; RESTRICTIONS:
 ;    The DustEMWrap IDL code must be installed
+;
 ; PROCEDURE:
 ;    None
+;
 ; EXAMPLES:
 ;    str_predicted_EXT=dustem_make_fits_predicted_ext(*!dustem_data,dustem_predicted_ext,str_input_ext=str_input_ext)
+;
 ; MODIFICATION HISTORY:
 ;    Written by J.-Ph. Bernard Dec 2022
 ;    Evolution details on the DustEMWrap gitlab.
@@ -60,8 +74,10 @@ str_input_EXT.FILTER=(*syst_var.ext).filt_names
 str_input_EXT.Wavelength=(*syst_var.ext).wav
 str_input_EXT.StokesI_EXT=(*syst_var.ext).values
 str_input_EXT.varianceII_EXT=la_power((*syst_var.ext).sigma,2.)
-stop
+
+;stop
 ;IC; if I didn't misunderstand the str_input_EXT output lacks this information
+
 IF !run_pol THEN BEGIN
     qext=aos2soa(*syst_var.qext)
     FOR i=0L,n_elements(qext.wav)-1 DO BEGIN
@@ -106,4 +122,4 @@ RETURN,str_predicted_EXT
 
 the_end: 
 
-END
\ No newline at end of file
+END
--
libgit2 0.21.2