@idlarge = ($Data_Hash{$Call_Hash{"TST_" . "IDS_Large_1"}}, $Data_Hash{$Call_Hash{"TST_" . "IDS_Large_2"}}, ...

@idsmall = ($Data_Hash{$Call_Hash{"TST_" . "IDS_Small_1"}}, $Data_Hash{$Call_Hash{"TST_" . "IDS_Small_2"}}, ...

@Vg = ($Call_Hash{"OPT_" . "VGS_1"}, $Call_Hash{"OPT_" . "VGS_2"}, ...

##</code><code>##

%Data_Hash = (
	%Call_Hash = (
			TST_IDS_Large_1 =>2.9E-12,
			TST_IDS_Large_2 =>1.85E-12,

			TST_IDS_Small_1 =>1.86E-9,
			TST_IDS_Small_2 =>2.83E-9,
		),
	OPT_VGS_1 =>0,
	OPT_VGS_2 =>0.02,
	
);