![]() |
libSUFR
a LIBrary of Some Useful Fortran Routines
|
Procedures to do computations in optics. More...
Go to the source code of this file.
Modules | |
module | sufr_optics |
Procedures to do computations in optics. | |
Functions/Subroutines | |
elemental subroutine | sufr_optics::reflectance_transmittance (angi, nref1, nref2, runp, tunp, rprp, rpar, tprp, tpar, angt) |
Compute the reflectance for the transition from a medium with refractive index Nref1 to one with Nref2, under an incident angle ang. Optionally, compute the transmittance, and the polarised components. The media are assumed to be non-magnetic. | |
pure real(double) function | sufr_optics::refractive_index_air (wavelength, temperature, pressure, humidity) |
Computes real index of refraction of air given wavelength, temperature, pressure and relative humidity. | |
pure real(double) function | sufr_optics::refractive_index_pmma (wavelength) |
Refractive index of PMMA as a function of wavelength. | |
real(double) function, dimension(3) | sufr_optics::wavelength2rgb (wl, df) |
Return an RGB-value representing the colour corresponding to a light ray with a given wavelength. | |
Procedures to do computations in optics.
Definition in file optics.f90.