Searched refs:leg_ortho (Results 1 – 5 of 5) sorted by relevance
/dports/science/quantum-espresso/q-e-qe-6.7.0/LAXlib/ |
H A D | la_helper.f90 | 20 leg_ortho_ => leg_ortho, & 35 INTEGER, OPTIONAL, INTENT(OUT) :: leg_ortho local 49 IF( PRESENT(leg_ortho) ) leg_ortho = leg_ortho_ 67 leg_ortho_ => leg_ortho, & 234 leg_ortho = 4 243 leg_ortho = 2 252 leg_ortho = 1 406 leg_ortho local 409 ortho_comm = ortho_comm, leg_ortho = leg_ortho, & 449 leg_ortho, ortho_cntx local [all …]
|
H A D | mp_diag.f90 | 24 INTEGER :: leg_ortho = 1 ! the distance in the father communicator variable 68 leg_ortho = 1
|
H A D | laxlib_low.h | 22 SUBROUTINE laxlib_getval_ ( nproc_ortho, leg_ortho, np_ortho, me_ortho, ortho_comm, ortho_row_comm,… 26 INTEGER, OPTIONAL, INTENT(OUT) :: leg_ortho
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/CPV/src/ |
H A D | ortho_base.f90 | 609 INTEGER :: np( 2 ), coor_ip( 2 ), leg_ortho local 615 CALL laxlib_getval( leg_ortho = leg_ortho ) 655 root = root * leg_ortho 761 CALL laxlib_getval( leg_ortho = leg_ortho ) 801 root = root * leg_ortho 898 CALL laxlib_getval( leg_ortho = leg_ortho ) 944 root = root * leg_ortho 1053 CALL laxlib_getval( leg_ortho = leg_ortho ) 1106 root = root * leg_ortho 1150 root = root * leg_ortho [all …]
|
H A D | inner_loop_cold.f90 | 94 INTEGER :: np_rot, me_rot, comm_rot, nrlx, leg_ortho local 102 CALL laxlib_getval( leg_ortho = leg_ortho ) 181 root = root * leg_ortho
|