proc oid {oid name types} {
	puts "$oid $name GOST $name $oid"
}

source [lindex $argv 0]