OV-GSO-DC / dustem-wrapper_idl

Commit 1ed05015253a4eba01adb729cd5febf90ae686e7

Authored by Jean-Philippe Bernard
1 parent 7266e5ed
Exists in master

introduced a test that does not work for Ilyes to fix

Showing 1 changed file with 10 additions and 2 deletions   Show diff stats
Inline Side-by-side
src/idl/dustem_fit_intensity_example.pro
  Diff comments   View file @1ed0501
@@ -342,6 +342,8 @@ IF keyword_set(postscript) THEN BEGIN @@ -342,6 +342,8 @@ IF keyword_set(postscript) THEN BEGIN
342 device,filename=ps_file,/color 342 device,filename=ps_file,/color
343 ENDIF 343 ENDIF
344 344
  345 +;stop
  346 +
345 IF !dustem_noobj THEN BEGIN 347 IF !dustem_noobj THEN BEGIN
346 dustemwrap_plot_noobj,*(*!dustem_fit).CURRENT_PARAM_VALUES,dummy,xr=xr,/xstyle,yr=yr,/ysty,/ylog,/xlog,title=tit+' (Final fit)' 348 dustemwrap_plot_noobj,*(*!dustem_fit).CURRENT_PARAM_VALUES,dummy,xr=xr,/xstyle,yr=yr,/ysty,/ylog,/xlog,title=tit+' (Final fit)'
347 ENDIF ELSE BEGIN 349 ENDIF ELSE BEGIN
@@ -366,13 +368,19 @@ IF keyword_set(fits_save_and_restore) THEN BEGIN @@ -366,13 +368,19 @@ IF keyword_set(fits_save_and_restore) THEN BEGIN
366 ;=== information needed to recover the results and remake the plots has been saved in the FITS table 368 ;=== information needed to recover the results and remake the plots has been saved in the FITS table
367 ;stop 369 ;stop
368 dustem_read_fits_table,filename=fits_save_and_restore,dustem_st=dustem_spectra_st 370 dustem_read_fits_table,filename=fits_save_and_restore,dustem_st=dustem_spectra_st
  371 + ;stop
  372 + !dustem_show=ptr_new(*!dustem_data) ;test
  373 + !dustem_noobj=1
369 ;==== plot result taken from the saved fits table 374 ;==== plot result taken from the saved fits table
370 res=*(*!dustem_fit).CURRENT_PARAM_VALUES 375 res=*(*!dustem_fit).CURRENT_PARAM_VALUES
371 IF !dustem_noobj THEN BEGIN 376 IF !dustem_noobj THEN BEGIN
372 - dustemwrap_plot_noobj,res,dustem_spectra_st,xr=xr,/xstyle,yr=yr,/ysty,/ylog,/xlog,title=tit+' (From Saved FITS file)' 377 + ;dustemwrap_plot_noobj,res,dustem_spectra_st,xr=xr,/xstyle,yr=yr,/ysty,/ylog,/xlog,title=tit+' (From Saved FITS file)'
  378 + dustemwrap_plot_noobj,res,xr=xr,/xstyle,yr=yr,/ysty,/ylog,/xlog,title=tit+' (From Saved FITS file)'
373 ENDIF ELSE BEGIN 379 ENDIF ELSE BEGIN
374 - dustemwrap_plot,res,dustem_spectra_st,xr=xr,/xstyle,yr=yr,/ysty,/ylog,/xlog,title=tit+' (From Saved FITS file)' 380 + ;dustemwrap_plot,res,dustem_spectra_st,xr=xr,/xstyle,yr=yr,/ysty,/ylog,/xlog,title=tit+' (From Saved FITS file)'
  381 + dustemwrap_plot,res,xr=xr,/xstyle,yr=yr,/ysty,/ylog,/xlog,title=tit+' (From Saved FITS file)'
375 ENDELSE 382 ENDELSE
  383 + stop
376 IF keyword_set(wait) THEN BEGIN 384 IF keyword_set(wait) THEN BEGIN
377 message,'Saved the results as FITS in the file: '+fits_save_and_restore+', and made a plot using the data in this file',/info 385 message,'Saved the results as FITS in the file: '+fits_save_and_restore+', and made a plot using the data in this file',/info
378 wait,wait 386 wait,wait