test

Jean-Philippe Bernard
1 parent 6ad05c38
Showing 3 changed files with 9 additions and 3 deletions Show diff stats
LabTools/IRAP/JPB/srun/make_phangs_grids.pro
src/idl/dustem_make_sed_table.pro
src/idl/test_dustem_dl07_isrf_model.pro
@@ -22,8 +22,12 @@ t0=systime(/sec)
 ;make_sed_phangs_tables,/test,grid_type=2,/show_seds,isrf_class=15
 ;make_sed_phangs_tables,grid_type=2,isrf_class=15
 ;make_sed_phangs_tables,/test,/show_seds,grid_type=2,isrf_class=0
-make_sed_phangs_tables,grid_type=2,isrf_class=0
-
+;make_sed_phangs_tables,grid_type=2,isrf_class=0
+N=1.e9
+FOR i=0L,N-1 DO BEGIN
+	print,"hello world"
+	wait,3
+ENDFOR
 t1=systime(/sec)
  
 message,'It took '+strtrim((t1-t0)/60./60.,2)+' hrs',/info
@@ -69,6 +69,7 @@ Nparams=n_elements(parameters_description)
 ;== INITIALISE DUSTEM
 use_polarization=0
 dustem_init,model=model,pol=use_polarisation
+!quiet=1
 ;!dustem_verbose=1
 ;!dustem_show_plot=1
 !dustem_which='RELEASE'
@@ -148,7 +149,7 @@ loadct,13
 FOR i=0L,Nc-1 DO BEGIN
 	;dustem_init,model=model,pol=use_polarisation
 	;dustem_set_data,m_fit=sed,m_show=sed,x_fit=ext,x_show=ext
-    dummy=0 ;otherwise model is not recomputed !!
+  dummy=0 ;otherwise model is not recomputed !!
  
 	;fpval = *parameter_values[i]
   pval = *parameter_values[i]
@@ -2,6 +2,7 @@ PRO test_dustem_dl07_isrf_model
  
 use_model='DL07'
 dustem_init,model=use_model,polarization=use_polarization
+!quiet=1
  
 ;set up some data (needed as will return an SED)
 dir=!dustem_wrap_soft_dir+'/Data/EXAMPLE_OBSDATA/'