A high level routine that extracts a column from a table file.

% table_column_pull --help    

Usage: table_column_pull A1 Peak Y list.Peak Y   
arg1 - basename of table file (A for A.table)   
arg2 - parameter name 
arg3 - retain the "# data" marker (Y/N) 
arg4 - Full name of file for pulled column   
arg5 - run in debug/verbose mode (Y/N)  

Example: 
% cat A1.table 
# A sample table file 
# data
  24.539   537.000   366.964    20.979    19.318    18.759    22.105    19.969    19.083    
  19.847   590.000   393.234    19.724    18.945    18.773    20.355    19.241    18.774  
  18.473  3667.500   355.787    17.349    16.139    15.100    18.222    16.608    15.825    
  14.104 64183.000   401.363    12.288    11.944    12.692    12.675    12.065    11.926   

% cat A1.params  
mag_inst
Peak
AnnAv
g
r
i
B
V
R

% table_column_pull A1 Peak N list.Peak N 

% cat list.Peak 
  537.000
  590.000
  3667.500
  64183.000