From 909b77f6d3e3887fe3d833a13634f468a1794f08 Mon Sep 17 00:00:00 2001 From: Annie Hughes Date: Fri, 4 Nov 2022 15:04:57 +1030 Subject: [PATCH] moved dustem_define_isrf_stellar_modifyer_variable.pro to ONHOLD outside repo --- src/idl/dustem_define_isrf_stellar_modifyer_variable.pro | 28 ---------------------------- 1 file changed, 0 insertions(+), 28 deletions(-) delete mode 100755 src/idl/dustem_define_isrf_stellar_modifyer_variable.pro diff --git a/src/idl/dustem_define_isrf_stellar_modifyer_variable.pro b/src/idl/dustem_define_isrf_stellar_modifyer_variable.pro deleted file mode 100755 index 18ce5be..0000000 --- a/src/idl/dustem_define_isrf_stellar_modifyer_variable.pro +++ /dev/null @@ -1,28 +0,0 @@ -FUNCTION dustem_define_isrf_stellar_modifyer_variable,stellar_values=stellar_values - -one_st={radius:0.,temperature:0.,distance:0.,amplitude:0.} - -IF not keyword_set(stellar_values) THEN BEGIN - ;The defaults is one sun at 1au, but with zero amplitude - Nstar=1 - st=replicate(one_st,Nstar) - one_pc=3.08e16 - one_au=1.49e11 - st[0].radius=1. ;Rsun - st[0].temperature=5770. ;K - st[0].distance=one_au/one_pc ;pc - st[0].amplitude=0. ;-- - status=1 -ENDIF ELSE BEGIN - Nstars=n_elements(stellar_values) - ;st=replicate(one_st,Nstar) - st=stellar_values - status=2 -ENDELSE - -defsysv,'!dustem_isrf_star_add',st -message,'defined !dustem_isrf_star_add',/continue - -RETURN,status - -END \ No newline at end of file -- libgit2 0.21.2