Add AddWord procedure