Merge branch 'master' of https://gitlab.irap.omp.eu/OV-GSO-DC/dustem-wrapper_idl

Annie Hughes
2 parents bfd73a3c 74043007
Showing 2 changed files with 12 additions and 2 deletions Show diff stats
src/idl/dustem_init.pro
src/idl/dustem_mpfit_run.pro
@@ -84,6 +84,12 @@ ENDIF
  
 dustem_define_la_common 
  
+defsysv,'!dustem_noobj',1  ;set to 1 to not use object graphics
+
+un_mouchard={iteration:0L,chi2:0.d0,rchi2:0.d0,parameters_descriptions:ptr_new(),parameters_values:ptr_new()}
+mouchard=ptr_new(replicate(un_mouchard,1))
+defsysv,'!iteration_mouchard',mouchard
+
 defsysv,'!dustem_verbose',0             ;1=verbose
 IF keyword_set(verbose) THEN !dustem_verbose=1
  
@@ -307,8 +307,12 @@ message,&#39;======================================================================&#39;
 !Error_State.msg=''
  
 ;=== plotting the fit
-if !dustem_iter.act NE !dustem_iter.prv or !dustem_iter.prv EQ 1 then begin 
-    dustemwrap_plot_noobj,p_dim,st,dustem_sed,SED_spec,dustem_qsed,Q_spec,dustem_used,U_spec,dustem_polsed,P_spec,dustem_polfrac,SP_spec, dustem_psi_em, PSI_spec,dustem_ext,EXT_spec,dustem_qext,QEXT_spec,dustem_uext,UEXT_spec,dustem_polext,POLEXT_spec,dustem_fpolext,SPEXT_spec,dustem_psi_ext,PSIEXT_spec,_extra=_extra
+if !dustem_iter.act NE !dustem_iter.prv or !dustem_iter.prv EQ 1 then begin
+    IF !dustem_noobj EQ 0 THEN BEGIN
+      dustemwrap_plot,p_dim,st,dustem_sed,SED_spec,dustem_qsed,Q_spec,dustem_used,U_spec,dustem_polsed,P_spec,dustem_polfrac,SP_spec, dustem_psi_em, PSI_spec,dustem_ext,EXT_spec,dustem_qext,QEXT_spec,dustem_uext,UEXT_spec,dustem_polext,POLEXT_spec,dustem_fpolext,SPEXT_spec,dustem_psi_ext,PSIEXT_spec,_extra=_extra
+    ENDIF ELSE BEGIN
+      dustemwrap_plot_noobj,p_dim,st,dustem_sed,SED_spec,dustem_qsed,Q_spec,dustem_used,U_spec,dustem_polsed,P_spec,dustem_polfrac,SP_spec, dustem_psi_em, PSI_spec,dustem_ext,EXT_spec,dustem_qext,QEXT_spec,dustem_uext,UEXT_spec,dustem_polext,POLEXT_spec,dustem_fpolext,SPEXT_spec,dustem_psi_ext,PSIEXT_spec,_extra=_extra
+    ENDELSE
     if !dustem_iter.act EQ 1 then begin
         !dustem_iter.prv=0
         !dustem_iter.act=0