Hello!

Could you fix the errors?

DIM x1 AS _INTEGER64: DIM y1 AS _INTEGER64: DIM z1 AS _INTEGER64: DIM t1 AS _INTEGER64
DIM x2 AS _INTEGER64: DIM y2 AS _INTEGER64: DIM z2 AS _INTEGER64: DIM t2 AS _INTEGER64
DIM x3 AS _INTEGER64: DIM y3 AS _INTEGER64: DIM z3 AS _INTEGER64: DIM t3 AS _INTEGER64
DIM x AS _INTEGER64: DIM y AS _INTEGER64: DIM z AS _INTEGER64: DIM t AS _INTEGER64

RESTORE
READ x1: READ y1: READ z1: READ t1
READ x2: READ y2: READ z2: READ t2
READ x3: READ y3: READ z3: READ t3

x = r(t1, y1, z1, t2, y2, z2, t3, y3, z3)
PRINT x

END
????? DIM r AS
FUNCTION r (a1, b1, c1, a2, b2, c2, a3, b3, c3)
?????
    DIM a1 AS _INTEGER64: DIM b1 AS _INTEGER64: DIM c1 AS _INTEGER64
    DIM a2 AS _INTEGER64: DIM b2 AS _INTEGER64: DIM c2 AS _INTEGER64
    DIM a3 AS _INTEGER64: DIM b3 AS _INTEGER64: DIM c3 AS _INTEGER64

    r = a1 * b2 * c3 + a2 * b3 * c1 + a3 * b1 * c2
    r = r - a3 * b2 * c1 - a1 * b3 * c2 - a2 * b1 * c3
END FUNCTION

DATA 3,4,5,6
DATA 1,6,8,9
DATA 3,10,18,19