
function setGlobalOmegaROmegaomega()

global OmegaR Omega omega A1h % A21
    
OmegaR=100.0, Omega=11.2, omega=10.0, A1h %, A21

prompt='What is A1h, the Einstein coefficient of Spontaneous Emission? (zero or nonzero)';
A1h=input(prompt);
 
% prompt='What is A21, the Einstein coefficient of Spontaneous Emission? (zero or nonzero)';
% A21=input(prompt);