Metropoli BBS
VIEWER: logb.lst MODE: TEXT (LATIN1)
Voyager-generated listing of LOGB by Paul Dale.
Method: LOG of A (base B) is calculated as LN(A)/LN(B),
        using the internal 15-digit-accurate routines.

02D9D  ::
18EDF    CK2&Dispatch   *  Save current command, verify DEPTH ò 2, check args.
04099    REALREAL       *  2:Real,1:Real
02D9D    ::
2A5C1      %>%%         *  Converts real to extended real
2AB5B      %%LN         *  Extended-real ln(x)
03223      SWAP         *  ob1 ob2 --> ob2 ob1
2A5C1      %>%%         *  Converts real to extended real
2AB5B      %%LN         *  Extended-real ln(x)
2A9E8      %%/          *  Extended-real /
2A5B0      %%>%         *  Converts extended real to real
0312B    ;
0312B  ;
[ RETURN TO DIRECTORY ]