File src/photonenergy.txt artifact 4d32c62a43 on branch master

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