Searched refs:currLead (Results 1 – 1 of 1) sorted by relevance
/dports/science/dftbplus/dftbplus-19.1/prog/dftb+/lib_extlibs/ |
H A D | negf_int.F90 | 1278 & currLead, writeTunn, tWriteLDOS, regionLabelLDOS, mu) argument 1285 & currLead, writeTunn, tWriteLDOS, regionLabelLDOS, mu) 1337 real(dp), allocatable, intent(inout) :: currLead(:) variable 1437 if(.not.allocated(currLead)) then 1438 allocate(currLead(size(currPVec)), stat=err) 1442 currLead = 0.0_dp 1444 currLead = currLead + currPVec 1465 call mpifx_allreduceip(mpicomm, currLead, MPI_SUM) 1470 currLead = currLead * convertCurrent(unitOfEnergy, unitOfCurrent) 1472 do ii = 1, size(currLead) [all …]
|