function Wave_plot(Hs)

plot(Hs.data.datenum, Hs.data.waarde)
datetick('x')
Axis([datenum('2009-07-20') datenum('2009-08-03') 0 400])

      xlabel ('date')
      ylabel ('Hs  [cm]')
      grid on
      title('Significant wave heights near IJmuiden')

      
A1=find(Hs.data.datenum == datenum('2009-07-23'));
A2=find(Hs.data.datenum == datenum('2009-07-25'));
figure
plot(Hs.data.datenum(A1:A2), Hs.data.waarde(A1:A2))
datetick('x')
     xlabel ('date')
     ylabel ('Hs  [cm]')
     grid on
     title('Significant wave heights near IJmuiden') 
           
B1=find(Hs.data.datenum == datenum('2009-07-30'));
B2=find(Hs.data.datenum == datenum('2009-08-01'));
figure
plot(Hs.data.datenum(B1:B2), Hs.data.waarde(B1:B2))
datetick('x')
     xlabel ('date')
     ylabel ('Hs  [cm]')
     grid on
     title('Significant wave heights near IJmuiden')
      