path: root/1460/CH12/EX12.6/12_6.sce

clc
//initialization of variables
RH=0.62
T=80+460 //R
//calculations
disp("From stram tables,")
P=RH*0.5069
//results
printf("Partial pressure of water vapor = %.4f lb/in^2",P)