how to use "proc" to get parameters from another file.tcl;

[goldwindlee]

Would you mind lefting your eyes on my question for a moment? here is the question.
i want to change prameters of $fy or $b ,I read updated parameters form matlab using socket server.This is the part of data. Then I use proc to get parameters .the section
part didn't recongnise the uniaxialMaterial steel01 and post err.Thank you for your attention.
the Part i need change:
set ColSecTag 1;
set Fy $Fy#[expr 215.*$MPa]; # Yield Strength of Q235 steel
set Es [expr 2.e5*$MPa]; # Steel Young'sModulus:2.0e11pa
set matID 1
set b $b #0.02;
set Hiso 0;
set Hkin [expr $Es*$b/(1-$b)];
Mattag E fy Hiso Hkin
uniaxialMaterial Steel01 $matID $Fy $Es $b;
the proc code:
proc getparameters1 {matID canshu1 canshu2} {
remove uniaxialMaterial Steel01 $matID $Fy $Es $b;
global canshu1
global canshu2
set N 1.0; # define basic units -- output units
set mm 1.0; # define basic units -- output units
set sec 1.0; # define basic units -- output units
set kg 1
set kN [expr 1000.0*$N];
set MPa [expr 1*$N/pow($mm,2)];
set Fy [expr $canshu1*$MPa];
set Es [expr 2.e5*$MPa];
set b [expr $canshu2]
global matID;
set matID 1;
set Hiso 0;
set Hkin [expr $Es*$b/(1-$b)];
uniaxialMaterial Steel01 $matID $Fy $Es $b;
}