Lines Matching refs:rhoc_r
917 TYPE(pw_p_type) :: rhoc_r local
998 CALL pw_pool_create_pw(auxbas_pw_pool, rhoc_r%pw, &
1001 CALL rs_pw_transfer(rs_rho, rhoc_r%pw, rs2pw)
1004 total_rho = pw_integrate_function(rhoc_r%pw, isign=-1)
1006 CALL pw_transfer(rhoc_r%pw, rho_core%pw)
1008 CALL pw_pool_give_back_pw(auxbas_pw_pool, rhoc_r%pw)
1040 TYPE(pw_p_type) :: rhoc_r local
1086 CALL pw_pool_create_pw(auxbas_pw_pool, rhoc_r%pw, &
1089 CALL rs_pw_transfer(rs_rho, rhoc_r%pw, rs2pw)
1092 CALL pw_transfer(rhoc_r%pw, rho_gb%pw)
1094 CALL pw_pool_give_back_pw(auxbas_pw_pool, rhoc_r%pw)
1130 TYPE(pw_p_type) :: rhoc_r local
1187 CALL pw_pool_create_pw(auxbas_pw_pool, rhoc_r%pw, &
1190 CALL rs_pw_transfer(rs_rho, rhoc_r%pw, rs2pw)
1195 total_rho_metal = pw_integrate_function(rhoc_r%pw, isign=-1)
1197 CALL pw_transfer(rhoc_r%pw, rho_metal%pw)
1198 CALL pw_pool_give_back_pw(auxbas_pw_pool, rhoc_r%pw)
1233 TYPE(pw_p_type) :: rhoc_r local
1280 CALL pw_pool_create_pw(auxbas_pw_pool, rhoc_r%pw, &
1283 CALL rs_pw_transfer(rs_rho, rhoc_r%pw, rs2pw)
1286 CALL pw_transfer(rhoc_r%pw, rho_gb%pw)
1288 CALL pw_pool_give_back_pw(auxbas_pw_pool, rhoc_r%pw)
1327 TYPE(pw_p_type) :: rhoc_r local
1383 CALL pw_pool_create_pw(auxbas_pw_pool, rhoc_r%pw, &
1386 CALL rs_pw_transfer(rs_rho, rhoc_r%pw, rs2pw)
1389 CALL pw_transfer(rhoc_r%pw, rho_resp%pw)
1390 CALL pw_pool_give_back_pw(auxbas_pw_pool, rhoc_r%pw)