This file is indexed.

/usr/share/genius/examples/linapprox.gel is in genius-common 1.0.23-3.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
# Category: Calculus
# Name: Linear approximation by a tangent graphically

function f(x) = sin(ln(x+1))^2;
df = SymbolicDerivative(f);

# Where to approximate
a = 2;

# The approximation
function lf(x) = df(a)*(x-a)+f(a);

function DoGraph(x) = (
  PlotCanvasFreeze();
  LinePlot(f,lf,[-0.5,5,-0.1,2]);
  LinePlotDrawLine(x,0,x,min(f(x),lf(x)),"color","orange");
  LinePlotDrawLine(x,min(f(x),lf(x)),x,max(f(x),lf(x)),"color","red");
  LinePlotDrawLine(-0.5,f(x),5,f(x),"color","black","thickness",1);
  LinePlotDrawLine(-0.5,lf(x),5,lf(x),"color","purple","thickness",1);
  PlotCanvasThaw();
  print("at x=" + x + "  error = |" + lf(x) + " - " + f(x) + "| = " + |lf(x)-f(x)|);
);

PlotWindowPresent(); # Make sure the window is raised

for x=2 to 5 by 0.0222 do (
  DoGraph(x);
  wait(0.003)
);
for x=5 to -0.5 by -0.0222 do (
  DoGraph(x);
  wait(0.06)
);
for x=-0.5 to 2 by 0.0222 do (
  DoGraph(x);
  wait(0.003)
);