BOT
if (i==0) return(BOT);
if (kl==BOT) return(2);
case TOP: case BOT: exhl = "-1p"; break;
case BOT: exhr = ln==1 ? "-1p" : "+1p"; break;
case TOP: case BOT: exhr = "+1p"; break;
case BOT: exhl = ln==1 ? "1p" : "-1p"; break;