Leonardus
Extension LeoScript Operator isunitfraction

STACK

$ Q\ --\ Q\ B $

DESCRIPTION

Operator checks if the top most object on the operand stack is a Q and has a numerator equal 1.

ORIGIN

Core code registered in leodict.