unknown

Annie Hughes
1 parent a78ee4de
Showing 2 changed files with 5 additions and 7 deletions Show diff stats
src/idl/dustem_set_params.pro
src/idl/dustemwrap_plot.pro
@@ -12,7 +12,6 @@ Nparams=n_elements(*(*!dustem_fit).param_descs)
  
 dustem_set_func_ind,*(*!dustem_fit).param_descs,params
  
-
 ;SET THE PARAMETER VALUES IN DUSTEM INPUT FILES
 FOR i=0L,Nparams-1 DO BEGIN
  
@@ -137,15 +137,12 @@ ENDIF
  
 ;===========Making sure the predicted dustem SEDs are set
 if not keyword_set(dustem_sed) and isa((*!dustem_data).sed) then begin ;better test?
-  
       dustem_sed = dustem_compute_sed(p_dim,st=st,SED_spec=SED_spec)
       if !run_pol and tag_exist(*!dustem_show,'qsed') && !run_lin then begin
-          
           dustem_polsed = dustem_compute_polsed(p_dim,st=st,P_spec=P_spec,SP_spec=SP_spec,dustem_polfrac=dustem_polfrac)
           toto = dustem_compute_stokes(p_dim,st=st,Q_spec=Q_spec,U_spec=U_spec,PSI_spec=PSI_spec,dustem_psi_em=dustem_psi_em) 
           dustem_qsed = toto[0]
           dustem_used = toto[1]
-          
       endif         
 endif
  
@@ -162,6 +159,8 @@ if not keyword_set(dustem_ext) and isa((*!dustem_data).ext) then begin
       endif
 endif
  
+;stop
+
 ;===========We should call this something more adequate
 mouchard=*!iteration_mouchard
 new_mouchard=mouchard[0]
@@ -210,6 +209,7 @@ endif else begin
     test_m = test_sed 
     test_x = test_ext 
 endelse
+;stop
  
 n_plgns = n_tags(*!dustem_plugin)
  
@@ -726,8 +726,7 @@ if test_x then begin
     plotsym,0,/fill ;you might need to execute this again. hmm...
  
     if !run_pol and tag_exist(*!dustem_show,'qext') then begin
-        ;This part can be adjusted for future releases if the user wants to plot 
-        ;specific datasets 
+        ;This part can be adjusted for future releases if the user wants to plot specific datasets 
  
         ;lists because elements have different dimensions and/or we want entire arrays as elements
         dustem_interp = list(dustem_ext,dustem_fpolext,dustem_qext,dustem_uext,dustem_psi_ext,dustem_polext) ;DustEmWrap SED predictions
@@ -761,7 +760,7 @@ if test_x then begin
  
     endif else begin 
  
-        ; PLOTTING OF DATA THAT IS UNCHAED 
+        ; PLOTTING OF DATA THAT IS UNCHANGED 
         cgwindow,'dustem_plot_dataset', st, dataset=datasets, position=position,positive_only=positiveonly,negative_only=negativeonly, /addcmd, winid=winid_x, _extra=_extra & cmdind_x+=1 
         ; REFRESHING DATA - to plot the refreshed data for the first time.
         cgwindow,'dustem_plot_dataset', st, dustem_interp,dustem_spec,extra_spec=extra_spec,dataset=datasets,positive_only=positiveonly,negative_only=negativeonly, /refresh ,position=position, /addcmd, winid=winid_x, _extra=_extra & cmdind_x+=1