function [H C] = oasis_read_csv(csv)

if ~exist('csv', 'var') || isempty(csv)
    csv = 'oasis_subset.csv';
end

fid = fopen(csv);
H = textscan(fid, '%q%q%q%q%q%q%q%q%q%q%q%q%q%q', 1, 'delimiter', ',');
C = textscan(fid, '%q%q%q%q%n%n%n%n%n%n%n%n%q%n', 'delimiter', ',');
fclose(fid);