This file is indexed.

/usr/include/nrn/scoplib.h is in neuron-dev 7.5-1.

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
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
/******************************************************************************
 *
 * File: scoplib.h
 *
 * Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989
 *   Duke University
 *
 * scoplib.h,v 1.2 1997/04/18 14:42:13 hines Exp
 *
 ******************************************************************************/

/****************************************************************/
/*								*/
/*  This file declares all the SCoP library functions that can	*/
/*  be called by the user to describe or solve his model's	*/
/*  equations.							*/
/*								*/
/****************************************************************/

/* Memory allocation routines */

double *makevector();		/* (length) */
int freevector();		/* (vector_address) */
double **makeptrvector();	/* (length) */
int freeptrvector();		/* (vector_address) */
double **makematrix();		/* (rows, columns) */
int freematrix();		/* (matrix_address) */
int zero_vector();		/* (vector, n) */
int zero_ptrvector();		/* (vector, n) */
int zero_matrix();		/* (matrix, rows, cols) */
int enqueue(), dequeue();	/* (&variable, vsize) */

/* Printing error messages */

int cls(),
    abort_run(),		/* (error_code) */
    prterr();			/* (message_string) */

/* Solution of first order ordinary differential equations */

int euler(), heun(), runge(), adams(), /* (neqn, &var, &der, p, indep, h, derfunc,
				    * first_time, temp) */
adeuler(), adrunge();		   /* (neqn, &var, &der, p, indep, h, derfunc,
				    * first_time, temp, maxerror) */

/* Implicit backwards eulerian integration.  Can find steady-state solution of
 * first-order odes by passing "infinite" time step h */

int _advance();			/* (n,&var,&der,&indep,h,derfunc,first_time,&p
				 * coef,linflag) */

/* Solution of boundary value problems */

int 
boundary(),			/* (npts, x, y, p, fval, gval, qval) */
shoot();			/* (nbound, indepindex, matchtime, matchvalue,
				 *  known, unknown, p, diff) */

/* Solution of parabolic partial differential equations */

int crank();			/* (n, y, fval, gval, p, dt, dx, first_time,
				 * bound_string) */

/* Definite integrals */

int romberg();			/* (a, b, func, p, integral) */
double legendre();		/* (a, b, func, p) */

/* Solution of simultaneous algebraic equations */

int 
simeq(), seidel(),		/* (n, coef, &soln) */
invert(),			/* (n, matrix) */
crout(),			/* (n, matrix, perm) */
solve(),			/* (n, matrix, const_vect, perm, &soln) */
tridiag(),			/* (n, super, diag, sub, const, &soln) */
newton(),			/* (n, &soln, p, funcval, &value) */
simplex(),			/* (n, &soln, p, funcval, &value) */
buildjacobian();		/* (n, &var, p, funcval, value, jacobian) */

/*  Sensitivity analysis */

int 
linearsens(),			/* (nvar,&var,p,param,funcval,coeff,newjac,
				 * &sens) */
steadysens(),			/* (nvar,&var,p,param,funcval,value,newjac,
				 * &sens) */
trajecsens(),			/* (nvar,&var,&der,param,first_time,newjac,
				 * &sens,&Dsens) */
envelope();			/* (&var, vsize, param, uncert, &sens, &plus,
				 * &minus) */

/* Curve-fitting and interpolation functions */

int derivs();			/* (nbase, x, y, mesh, der) */
double spline();		/* (nbase, x, y, mesh, der, x_inter) */
double force();			/* (t, filename) */
double stepforce();			/* (..., t, filename) */
#define deflate scoplib_deflate /* causes python gzip to fail if nrniv launched. i.e zlib declares global deflate */
int deflate();			/* (degree, coeff, root) */
int expfit();			/* (terms, reffile, amplitude, decay,
				 * &fiterror) */

/* General modeling functions */

double 
hyperbol(), revhyperbol(),	/* (x, max, K) */
sigmoid(), revsigmoid(),	/* (x, max, K, n) */
*lag();				/* (var, curt, lagt, vsize) */

/* Forcing functions */

int threshold();		/* (x, limit, mode) */
double 
harmonic(),			/* (t, period, amplitude, phase) */
squarewave(),			/* (t, period, amplitude) */
sawtooth(),			/* (t, period, amplitude) */
revsawtooth(),			/* (t, period, amplitude) */
ramp(),				/* (t, lag, height, duration) */
pulse(),			/* (t, lag, height, duration) */
perpulse(),			/* (t, lag, height, duration, delay) */
step(),				/* (t, jump_time, jump_height) */
perstep();			/* (t, lag, period, jump_height) */

/* Probability functions */

int 
setseed(),			/* (seed) */
poisrand();			/* (mean) */
double 
factorial(),			/* (n) */
scop_random(), exprand(),
normrand(),			/* (mean, std_dev) */
poisson(),			/* (x, mean) */
gauss(),			/* (x, mean, std_dev) */
scop_erf();				/* (x) */

/* ANSI C Math Functions (that we must include in scoplib when the host system
 * does not yet support them).
 */
#if MAC
#undef fmod
#endif
double fmod();