Blame view

src/gdl_startup_sample 1.21 KB
08afb50c   Jean-Philippe Bernard   First commit
1
2
3
4
5
6
7
8
9
message,'This is a minimal IDL/GDL startup meant to be used for the Dustem-Wrapper in the context of the ISM Workshop',/info

!path=!path+':'+'/Users/jpb/Soft_Librairies/gdl/src/pro'

defsysv,'!psep',':'         ;idl path separator for a Mac/unix. To be changed for PCs
defsysv,'!indef',-32768.    ;undefined value

;===DUSTEM_WRAP release V1.3 (gitlab head version)
;This is the files to use for dustem4.3_wk
19c45d4a   Jean-Philippe Bernard   fixed bug
10
11
defsysv,'!dustem_soft_dir',getenv('HOME')+'/Soft_Libraries/dustem4.3_wk/'
defsysv,'!dustem_wrap_soft_dir',getenv('HOME')+'/Soft_Libraries/dustem-wrapper_idl/'
08afb50c   Jean-Philippe Bernard   First commit
12
13
14
defsysv,'!dustem_which','WEB3p8'
defsysv,'!dustem_dat','/tmp/Dustem/'   ;This must be the same as data_path in file DM_constants.f90
defsysv,'!dustem_res','/tmp/Dustem/'   ;This must be the same as data_path in file DM_constants.f90
19c45d4a   Jean-Philippe Bernard   fixed bug
15
defsysv,'!dustem_f90_exec',getenv('HOME')+'/Soft_Libraries/dustem4.3_wk/src/dustem'
08afb50c   Jean-Philippe Bernard   First commit
16
17
18
19
20
!path=!path+!psep+expand_path('+'+!dustem_wrap_soft_dir+'/src/idl')           ;add idl wrapper software to the idl path 
!path=!path+!psep+expand_path('+'+!dustem_wrap_soft_dir+'/src/idl_misc')      ;for librairies dependences
!path=!path+!psep+expand_path('+'+!dustem_wrap_soft_dir+'/src/workshop')      ;For the ISM workshop only

device,decompose=0