#!/usr/bin/octave -q

args = argv();
if isempty(args)
   disp("Provide input filename");
   exit(1);
endif
   
fname = args{1};
format long;
x = load(fname);
m = mc(x);
disp(m);