z:x+y*%i;

f(z):=sin(z)+cos(z)=2;

a:realpart(f(z));

b:imagpart(f(z));

A:solve(a,y)$

A;

Acosh(u):=log(u+(u^2
−1)^(1/2)
);

Acosh(2/(sin(x)+cos(x)));

B:solve(b,x);

kill(all);p[i,j]:=[%pi*(j-4)-(3/4)*%pi+i*0,sin(%pi*(j-4)-(3/4)*%pi+i*0)];

genmatrix(p,1,8);