' Title=\$title Ny=${Ny} ${struc} >> ${out}


cat <<EOF >> ${out}

## call gnuplot
proc "plot_var" "title column" {
    exec echo set grid\; > ${tmp}
    exec echo plot \"${dat2}\" using 1:\$column title \"\$title\" with lines\; > ${tmp}
    exec echo plot \"${dat2}\" using 1:\$column title \"\$title\" with lines\; >> ${tmp}
    exec echo exit\; >> ${tmp}
    exec gnuplot -geometry 400x300 -persist -title "\$title" ${tmp} &
}

## print output
proc "print" "parameter" {
    set filename [tk_getSaveFile\