function [w,r] = readsolar(filename);

fid = fopen(filename,'r','ieee-le');


fclose(fid);