/usr/share/octave/site/m/sundialsTB/cvodes/cvm/cvm_monitor.m is in octave-sundials 2.5.0-3+b1.
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 | function new_mondata = cvm_monitor(call, t, y, yQ, Ns, yS, fct, mondata)
%
% Wrapper around the actual user-provided Matlab function
%
N = length(y);
yS = reshape(yS,N,Ns);
if isempty(mondata)
feval(fct, call, t, y, yQ, yS);
new_mondata = [];
else
new_mondata = feval(fct, call, t, y, yQ, yS, mondata);
end
|