*amarnā- довольно точно соответствует балтослав. *ābolni- "яблоня" (ср. праслав. *abolnь, прусс. wobalne)
Это не только балто-славянский, но и германский корень.
скорее в ИИ нерегулярная замена *b (вообще редкого звука в ПИЕ) на m.
В том-то и дело, что на ПИЕ *b есть всего два примера (без яблока), поэтому логичнее предположить субстратное происхождение в германо-балтославянских, тем более что там такой лексики хватает.
Кроме того, есть ещё один корень для яблока: лат. mālum и греч. μῆλον.