function picreacten
% function picreacten
%
% This displays a picture illustrating use of the command REACTEN.
% Note that this will only run in Matlab versions that support the WEB
% command (Matlab 5.0 and above).  Otherwise, visit the following web site:
% http://www.owlnet.rice.edu/~ceng301/5.html#5.13
%
% Example: >> reacten('vs',[312 25],1:2,3:4,[0.94 0.21],[1 1 0]);
%
% Explanation: The inlet streams are 1 and 2 which are mixed and
%       then the reactions (rates are 0.94 and 0.21) are carried out
%       and the product stream is split into two exit streams.
%       The exit streams are stream 3 which is a vapor at 312 Tdeg
%       with all of cmpds 1, 2  and stream 4 which is a solid at 
%       25 Tdeg with all of cmpd 3. 
%
% Comments/Picture: TYLC, ACP
% Comments/Picture/Program: ADD
% Last updated:  May, 1997

c=version;
d = c(1:3);
e = str2num(d);
if e<5.0
  disp('Please use browser to visit:')
  disp(' http://www.owlnet.rice.edu/~ceng301/5.html#5.13')
  return
end
d = web('http://www.owlnet.rice.edu/~ceng301/5.html#5.13');
if d!=0
  error('Error with web browser, go to http://www.owlnet.rice.edu/~ceng301/5.html#5.13');
end
