'
'delete ags_s
'svector ags_s=ags.@svectornb
!r=@rows(ags_s)

'add instruments
	for !k=1 to 10'  "r
		'finding country and industry codes in each equation
		%var=@word(ags_s(!k),1)
		!length=@length(%var)
		%id=@mid(ags_s(!k),11, !length-11)
		'add instrument
		addtospec(k=!k, add= @  log(tfpr_{%id}(-2)) ) ags  'addin that adds a line to the system specification
	next