5ce5316a33 2021-03-01 jeff@gridfini: % define full path to desired Reduce input file
5ce5316a33 2021-03-01 jeff@gridfini: in "/storage/extSdCard/Reduce/constants.red";
5ce5316a33 2021-03-01 jeff@gridfini: lambda0:=5*10^(-6);
5ce5316a33 2021-03-01 jeff@gridfini: nu:=c/lambda0;
5ce5316a33 2021-03-01 jeff@gridfini: lambda0:=5*10^(-7);
5ce5316a33 2021-03-01 jeff@gridfini: nu:=c/lambda0;
5ce5316a33 2021-03-01 jeff@gridfini: h*nu/c;
5ce5316a33 2021-03-01 jeff@gridfini: h*nu;
5ce5316a33 2021-03-01 jeff@gridfini: h*nu/el;
5ce5316a33 2021-03-01 jeff@gridfini: end;