clear; clc
figure(1); clf
i = 0:5:100;
x = 273.15 + i;
y = satprs (x );
plot ( x, y, 'om','Markersize',5);
hold on;
plot ( x, y, 'ob','Markersize',10);
hold off;
