LBL 'STIR'  ; Key: 13
'STIRLING'
AVIEW
PSE
FIX 00
'N ?'
PROMPT
STO 00
2
*
PI
*
SQRT
RCL 00
1
E^X
/
RCL 00
Y^X
*
RCL 00
1/X
12
/
1
+
*
STOP
END