Searched refs:vl_paw (Results 1 – 2 of 2) sorted by relevance
548 subroutine v_local_seperate_paw(vl_paw,vl_notpaw) argument550 complex*16 vl_paw(*) local591 call Parallel_shared_vector_zero(.false.,2*npack0,vl_paw)625 > vl_paw)642 call D1dB_Vector_SumAll(2*npack0,vl_paw)