Octopus
infrared.F90 File Reference

Go to the source code of this file.

Functions/Subroutines

program infrared
 
subroutine read_dipole (dipole)
 
subroutine fourier (fi, ftfi)
 

Function/Subroutine Documentation

◆ infrared()

program infrared

Definition at line 114 of file infrared.F90.

◆ read_dipole()

subroutine infrared::read_dipole ( real(real64), dimension(:, :), intent(inout), allocatable  dipole)

Definition at line 203 of file infrared.F90.

◆ fourier()

subroutine infrared::fourier ( real(real64), dimension(:,:), intent(inout), contiguous  fi,
complex(real64), dimension(:,:), intent(out)  ftfi 
)

Definition at line 259 of file infrared.F90.