Pro SaveTest1
  e=11.0
  f=Dindgen(10)

;  Save,/Variable ;-- SaveTest1内の変数をSave --
;  Save,/Variable, Level=1 ;-- SaveTest内の変数をSave --

  SaveTest2
End


Pro SaveTest2
  g='abcde'
  h=[10,11,12,13]

;  Save,/Variable ;-- SaveTest2内の変数をSave --
;  Save,/Variable, Level=1  ;-- SaveTest内の変数をSave --
;  Save,/Variable, Level=-2 ;-- SaveTest内の変数をSave --
;  Save,/Variable, Level=2  ;-- SaveTest1内の変数をSave --
;  Save,/Variable, Level=-1 ;-- SaveTest1内の変数をSave --
End



Pro SaveTest
  a=1.0
  b=1L
  c='aa'
  d=Findgen(100)

;  Save, a, b, c, d  ;-- 指定した変数をSave --
  Save, /Variable   ;-- 全ての変数をSave --

  SaveTest1
End