function [out] = ndirs (in)
%NDIRS


function [cout] = cder (cin)
%CDIR