LBL 'BINET' ; Key: 21
'BINET'
AVIEW
PSE
FIX 00
'N ?'
PROMPT
STO 00
5
SQRT
1
+
2
/
RCL 00
Y^X
5
SQRT
/
5
SQRT
1
-
2
/
RCL 00
Y^X
5
SQRT
/
-
STOP
END