Searched refs:backall_ (Results 1 – 3 of 3) sorted by relevance
122 LOGICAL, ALLOCATABLE :: backall_(:) local348 ALLOCATE(backall_(ntyp))349 backall_ (1:ntyp) = ip_backall(1:ntyp)364 STARTING_NS = starting_ns_, BACKALL = backall_ )
121 backall_ => backall, &1251 backall_(1:ntyp) = backall(1:ntyp)
630 SUBROUTINE init_Hubbard_back(is_back, objs, l_back, backall_, l1_back) 635 LOGICAL,OPTIONAL,INTENT(IN) :: backall_(nsp) local644 IF (PRESENT(backall_)) THEN 645 temp(1:nsp) = backall_(1:nsp)