procedure( find_netlist_param( param_string column_number netlist_dir)

let( (grep_string_cmd find_param_cmd local_param_string param_sub_string)

sprintf(grep_string_cmd "grep %s= %s/input.scs > tempfile0" param_string netlist_dir)
system(grep_string_cmd)

sprintf(add_comma_delims_cmd "nawk  -f ./add_comma_delims.nawk tempfile0 > tempfile1")
system(add_comma_delims_cmd)

sprintf(find_param_cmd "nawk  -f ./match_string.nawk match_string=%s tempfile1 > tempfile2" param_string)
system(find_param_cmd)

fpin = infile("./tempfile2")
gets( local_param_string fpin)
system( "rm ./tempfile0 ./tempfile1 ./tempfile2")
local_param_string

)
)