Result

WA

Duration

585ms

Code [DL]

:let l=[]
for i in range(4)
  for c in split(getline(i+1),'\_s')
    call add(l,str2nr(c))
  endfor
endfor
for i in range(9)
let l[i+3]-=l[(i%3)]
endfor
call setline(1, (l[3]*l[7]*l[11]+l[6]*l[10]*l[5]+l[9]*l[4]*l[8]-l[5]*l[7]*l[9]-l[8]*l[10]*l[3]-l[11]*l[4]*l[6])/6)
:wq

Disassembly

:let l=[]<NL>for i in range(4)<NL>  for c in split(getline(i+1),'\_s')<NL>    call add(l,str2nr(c))<NL>  endfor<NL>endfor<NL>for i in range(9)<NL>let l[i+3]-=l[(i%3)]<NL>endfor<NL>call setline(1, (l[3]*l[7]*l[11]+l[6]*l[10]*l[5]+l[9]*l[4]*l[8]-l[5]*l[7]*l[9]-l[8]*l[10]*l[3]-l[11]*l[4]*l[6])/6)<NL>:wq

stdin

79 01 27
68 73 01
37 58 16
82 88 58

stdout

stderr

strace