File mttroot/mtt/lib/comp/compound/Chemical/Rate/Rate_cr.r artifact 1c605288a8 part of check-in b2d7fd3c1f

%% CR file for rate-of reaction component RATE

OPERATOR Rate;

% Reaction rate
FOR ALL k,q,h,n,Conc,Temp LET
    Rate(k,q,h,n,flow,1,
         Conc,effort,1,
	 Temp,effort,2
	 ) 
	 = k*Conc^n*e^(-q/Temp);

% Heat
FOR ALL k,q,h,n,Conc,Temp LET
    Rate(k,q,h,n,flow,2,
         Conc,effort,1,
	 Temp,effort,2
	 ) 
	 = k*Conc^n*h*e^(-q/Temp);

END;