function default_ret_info,retrieval_param
  if n_elements(retrieval_param) eq 0 then begin
       retrieval_param={ $
         ;Ind_type choices (determined by case statement in judge_indicator)
         ;  0 - Correlation
         ;  1 - Sloperat
         ;  2 - Ratall
         ;  3 - Rat2
         ;  4 - Precloud
         ;  5 - Rayleigh Ratio 2
         IND_TYPE:                2,     $ 
         MIN_STACK_THICKNESS:     1,     $
         IND_THRESHOLD_CORR:     -1.1d,  $
         IND_THRESHOLD_SLOPERAT:  0.995d,$
         IND_THRESHOLD_RATALL:    0.99455d,$; Version 3.21 $
;          IND_THRESHOLD_RATALL:    0.99225d,$;[0.99534190,   0.00092172634,  -4.5067495e-05,   7.3560278e-07,  -4.0310308e-09],$
         IND_THRESHOLD_RAT2:      0.995d,$
         IND_THRESHOLD_RR2:       0.01d, $
         IND_THRESHOLD_PRECLOUD:  2.0d,  $
         AUTO_SIGMA:              0b,    $
         FIX_SIGMA:               1b,    $
         AUTO_C:                  0b,    $
         FIX_C:                   0b,    $
         tile_radius:             0,     $ ;0 for 1x1 tiles, 1 for 3x3 tiles, 2 for 5x5 tiles (if you want such a thing) etc
         constrain_4parm:         1b,    $
         calc_slow_ind:           0b,    $
         MAX_POLY_SZA:            88d    $
       }
  end
  ret_info={ ret_info, $
             retrieval_param:    ptr_new(retrieval_param),   $
             retrieval_phase:    'Mie with geometry factor', $
             include_bad_ret:    1,                          $
             include_ozone:      1,                          $
             first_albedo_guess: 50d,                        $
             dont_camera:        ptr_new(['qq']),       $
	     	 cips_mie_pfun:      'cips_mie_pfun_14nm.sav'    $
           }
  return,ret_info
end