Threaded Mode | Linear Mode

Gerald H · 03-24-2019, 10:55 AM

This programme does point 1.

Code:

::

  CK2&Dispatch

  # 48

  ::

    2DUP

    FPTR2 ^PUSHFLAGS_

    FPTR2 ^CLREXACT

    BINT103

    SetSysFlag

    FPTR 7 134

    FPTR2 ^POPFLAGS_

    3UNROLL

    xDROP2

  ;

;

eg For stack

[[ 4 5 ]
[ 3 8 ]]

<< SQRT >>

the programme returns the square root of the matrix in level 2.

The programme is posted in the General Software section but I can't remember where.