supsteam.m

%SUPSTEAM.M table of specific-volume values of superheated steam.
%       file SUPSTEAM.M builds a table of specific-volume values, in m^3/kg,
%       for superheated steam. The first column of the final table contains
%       the absolute pressures in bar (10^5 bar = 1 Pa = 1 N/m^2).
%       The first row of the final table contains temperatures in degrees C.
%       See book, Subsection 8.4.2.

sv1 = [ 0 240 260 280 300 320 340 360 380 400
6   0.393 0.410 0.426 0.443 0.459 0.475 0.491 0.508 0.524
7   0.336 0.350 0.365 0.379 0.393 0.407 0.421 0.435 0.448
8   0.293 0.305 0.318 0.331 0.343 0.335 0.367 0.380 0.392
9   0.259 0.271 0.282 0.293 0.304 0.315 0.326 0.337 0.348
11  0.210 0.220 0.229 0.239 0.248 0.257 0.266 0.275 0.283
12  0.192 0.201 0.210 0.218 0.227 0.235 0.243 0.252 0.260
13  0.176 0.185 0.193 0.201 0.209 0.216 0.224 0.232 0.239
14  0.163 0.171 0.179 0.186 0.193 0.201 0.208 0.215 0.222
15  0.152 0.159 0.166 0.173 0.180 0.187 0.194 0.200 0.207
16  0.141 0.148 0.155 0.162 0.168 0.175 0.181 0.188 0.194
140 NaN   NaN   NaN   NaN   NaN   0.013 0.015 0.016 0.018
161 NaN   NaN   NaN   NaN   NaN   NaN   0.012 0.013 0.015
201 NaN   NaN   NaN   NaN   NaN   NaN   NaN   0.009 0.010
220 NaN   NaN   NaN   NaN   NaN   NaN   NaN   0.007 0.009];
sv2 = [ 420 440 450 460 470 480 490 500 520 540 550
0.540 0.556 0.564 0.572 0.580 0.588 0.596 0.604 0.619 0.635 0.643
0.462 0.476 0.483 0.490 0.496 0.503 0.510 0.517 0.531 0.544 0.551
0.404 0.416 0.422 0.428 0.434 0.440 0.446 0.452 0.464 0.476 0.482
0.359 0.369 0.375 0.380 0.385 0.391 0.396 0.401 0.412 0.423 0.428
0.293 0.302 0.306 0.310 0.315 0.319 0.324 0.328 0.337 0.345 0.350
0.268 0.276 0.280 0.284 0.288 0.292 0.296 0.300 0.308 0.316 0.320
0.247 0.255 0.258 0.262 0.266 0.270 0.273 0.277 0.285 0.292 0.296
0.229 0.236 0.240 0.243 0.247 0.250 0.254 0.257 0.264 0.271 0.274
0.214 0.220 0.223 0.227 0.230 0.233 0.237 0.240 0.246 0.253 0.256
0.200 0.206 0.209 0.212 0.215 0.218 0.222 0.225 0.231 0.237 0.240
0.019 0.020 0.021 0.021 0.022 0.022 0.023 0.023 0.024 0.025 0.025
0.016 0.017 0.017 0.018 0.018 0.019 0.019 0.020 0.021 0.021 0.022
0.012 0.013 0.013 0.014 0.014 0.014 0.015 0.015 0.016 0.017 0.017
0.010 0.011 0.011 0.012 0.012 0.013 0.013 0.013 0.014 0.015 0.015];
svol = [ sv1 sv2 ];
svol(:,1) = svol(:,1)*0.980665;
clear sv1 sv2