According to the first page I found documenting gluLookAt,
the following "lookAt" verb should do the same thing:
normalize=: ] % +/&.:*:
X=: (1&|[EMAIL PROTECTED] * _1&|[EMAIL PROTECTED]) - _1&|[EMAIL PROTECTED] *
1&|[EMAIL PROTECTED]
lookAt=:3 :0
y+9#0
'eye center up'=. 3 3$y
f=.normalize center-eye
s=.f X normalize up
u=.s X f
M=.s,u,(-f),:_4{.1
glMultMatrix M
glTranslated -eye
)
However, I have not tested this.
--
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
