Steel02 & Steel02b -- flexSDOF
Key to Plot Legend -- variable Steel02
S02
Steel02: baseline
S2a
Steel02: set a2 1000; set a1 [expr $a2*($Fy/$Es)]
S2b
Steel02: set a4 1000; set a3 [expr $a4*($Fy/$Es)]
