use bigrat;print[Y,N]->[(shift()*10**1000/shift)=~"/"],$/