### Related

##### fix

ggg(x,y,w,b) := if y=...

d : ggg(9360,1241,0,1);

Calculate

##### fix-print

xcalc(x,y,a,b) := if ...

d : xcalc((9360),1241...

Calculate

p:53;

q:43;

e : 1241;

Calculate

p:61;

q:157;

n : p*q;

Calculate

fix(1241/1241);

Calculate

fix(9360/1241);

Calculate

##### fix-mod

a(n):=(n+1)/2+3/4*(-1...

a(3);

Calculate

p:43;

q:53;

n : p*q;

Calculate

##### fix-mod

a(n):=(n+1)/2+3/4*(-1...

a(3);

Calculate

p:61;

q:157;

n : p*q;

Calculate

### fix

Run Example
```(%i1)fix(1241/9360);
(%o1)                                  0
(%i2) ```
Run Example
```a(n):=(n+1)/2+3/4*(-1)^n+1/12-(1/3)*(-2)^fix(mod(n, 3)/2);
mod(n, 3)
fix(---------)
n + 1   3      n   1       1               2
(%o1)      a(n) := ----- + - (- 1)  + -- + (- -) (- 2)
2     4          12      3
(%i2) ```
Run Example
```display2d:false;

(%o1) false
(%i2)
circ:heta*(heta+a1^2/p)+zeta*(zeta+a2^2/q);

(%o2) zeta*(zeta+a2^2/q)+heta*(a1^2/p+heta)
(%i3)
fix:subst(-a2^2/(2*p),zeta,circ);

(%o3) heta*(a1^2/p+heta)-a2^2*(a2^2/q-a2^2/(2*p))/(2*p)
(%i4)
solve(fix,heta);

(%o4) [heta = -(sqrt((a1^4-a2^4)*q^2+2*a2^4*p*q)+a1^2*q)/(2*p*q),
heta = (sqrt((a1^4-a2^4)*q^2+2*a2^4*p*q)-a1^2*q)/(2*p*q)]
(%i5)
Heta:(sqrt(2)*a1*a2*sqrt(p*q)-a1^2*q)/(2*p*q);

(%o5) (sqrt(2)*a1*a2*sqrt(p*q)-a1^2*q)/(2*p*q)
(%i6)
Zeta:-a2^2/(2*p);

(%o6) -a2^2/(2*p)
(%i7)
zetarr:-a2^2/Zeta;

(%o7) 2*p
(%i8)
hetarr:-a1^2/Heta;

(%o8) -2*a1^2*p*q/(sqrt(2)*a1*a2*sqrt(p*q)-a1^2*q)
(%i9)
```

Help for Fix