Functions/Subroutines | |
subroutine | truncation (NWF, Na1, Na2, Na3, threshold_e, threshold_r, diff_transfers, a1, a2, a3, wcenter_lat, KS_R) |
subroutine | wrt_transfer_analysis (threshold_e, threshold_r, diff_transfers, Ntr, ib_map, jb_map, ia1_map, ia2_map, ia3_map, dist, tr) |
subroutine | set_kgrid (dense, kvec) |
subroutine | set_FR (NWF, nkb1, nkb2, nkb3, kgd1, kgd2, kgd3, Na1, Na2, Na3, La1, La2, La3, HR, FR) |
subroutine | get_weightR (kgd1, kgd2, kgd3, Na1, Na2, Na3, WEIGHT_R) |
subroutine m_truncation::get_weightR | ( | integer,intent(in) | kgd1, | |
integer,intent(in) | kgd2, | |||
integer,intent(in) | kgd3, | |||
integer,intent(in) | Na1, | |||
integer,intent(in) | Na2, | |||
integer,intent(in) | Na3, | |||
real(8),dimension(-na1:na1,-na2:na2,-na3:na3),intent(out) | WEIGHT_R | |||
) |
Definition at line 220 of file m_truncation.f90.
Referenced by set_FR().
subroutine m_truncation::set_FR | ( | integer,intent(in) | NWF, | |
integer,intent(in) | nkb1, | |||
integer,intent(in) | nkb2, | |||
integer,intent(in) | nkb3, | |||
integer,intent(in) | kgd1, | |||
integer,intent(in) | kgd2, | |||
integer,intent(in) | kgd3, | |||
integer,intent(in) | Na1, | |||
integer,intent(in) | Na2, | |||
integer,intent(in) | Na3, | |||
integer,intent(in) | La1, | |||
integer,intent(in) | La2, | |||
integer,intent(in) | La3, | |||
complex(8),dimension(nwf,nwf,-na1:na1,-na2:na2,-na3:na3),intent(inout) | HR, | |||
complex(8),dimension(nwf,nwf,-la1:la1,-la2:la2,-la3:la3),intent(out) | FR | |||
) |
Definition at line 153 of file m_truncation.f90.
References get_weightR().
Referenced by main().
subroutine m_truncation::set_kgrid | ( | integer,dimension(3),intent(in) | dense, | |
REAL(8),dimension(3,product(dense(1:3),intent(out) | kvec | |||
) |
Definition at line 130 of file m_truncation.f90.
Referenced by main().
subroutine m_truncation::truncation | ( | integer,intent(in) | NWF, | |
integer,intent(in) | Na1, | |||
integer,intent(in) | Na2, | |||
integer,intent(in) | Na3, | |||
real(8),intent(in) | threshold_e, | |||
real(8),intent(in) | threshold_r, | |||
real(8),intent(in) | diff_transfers, | |||
real(8),dimension(3),intent(in) | a1, | |||
real(8),dimension(3),intent(in) | a2, | |||
real(8),dimension(3),intent(in) | a3, | |||
real(8),dimension(3,nwf),intent(in) | wcenter_lat, | |||
complex(8),dimension(nwf,nwf,-na1:na1,-na2:na2,-na3:na3),intent(inout) | KS_R | |||
) |
Definition at line 4 of file m_truncation.f90.
References wrt_transfer_analysis().
Referenced by main().
subroutine m_truncation::wrt_transfer_analysis | ( | real(8),intent(in) | threshold_e, | |
real(8),intent(in) | threshold_r, | |||
real(8),intent(in) | diff_transfers, | |||
integer,intent(in) | Ntr, | |||
integer,dimension(ntr),intent(in) | ib_map, | |||
integer,dimension(ntr),intent(in) | jb_map, | |||
integer,dimension(ntr),intent(in) | ia1_map, | |||
integer,dimension(ntr),intent(in) | ia2_map, | |||
integer,dimension(ntr),intent(in) | ia3_map, | |||
real(8),dimension(ntr),intent(in) | dist, | |||
complex(8),dimension(ntr),intent(in) | tr | |||
) |
Definition at line 76 of file m_truncation.f90.
Referenced by truncation().