&figpar   ! This is for model bravo prd6_mod.dat.
 afile='./bravo/prd6_mod.dat'
  abundmax=1.      ! High abundance case.
  abundmin=1.e-5
 ! abundmax=1.e-5  ! Low abundance case.
 ! abundmin=1.e-9
 caption='\rm PRD6 density'
         '\rm Exponential fit, v_{e}='
 file_abund='./bravo/prd6_abund.ps'
 file_rho='./bravo/prd6_rho.ps'
 iabund=1
 idash=0,1
 ifile=1
 ifile_expon=1  ! If 1, plot the exponential fit if there is one.
 ifile_type=2   ! The prd6.dat file type.
 ipost=1,1      ! 1 for square (default);  2 for portrait;  3 for landscape.
 iradio=4       ! I think I've got them all set up now.
 ivel_center=1  ! This means interpolate the cell edge velocities
                !  to the cell centers.  I'm assuming the Bravo
                !  model velocities are cell edge velocities. 
 ivel_kms=1
 ivel_label=11
 ivel_labelb=-6,6,6,-6,  0,0,  0,0,0,0,  0,0,0,0,  0,0,0,0,
 ivel_label_radio=3
 rhomax=.5e-8
 rhomin=2.e-13
 title='Model PRD6'
 vel_label=300.,1000,2000.,2500.,  5000.,7500.,10000.,12500.,15000.,17500., 20000.,
 vel_label_radio=6250.,11250.,18750.,
 velmax=22000.
 velmin=0.
 velmax_abund=22000.
 velmin_abund=0.
 ! velmax_abund=15000.
 ! velmin_abund=10000.
 xytable=8000., 3.e-9
/