link ../../../LMDZ.GENERIC/libf/phystd/calc_rayleigh.F90