Searched defs:qexsd_init_clocks (Results 1 – 1 of 1) sorted by relevance
| /dports/science/quantum-espresso/q-e-qe-6.7.0/Modules/ |
| H A D | qexsd.f90 | 550 SUBROUTINE qexsd_init_clocks (timing_, total_clock, partial_clocks) subroutine
554 TYPE(timing_type),INTENT(INOUT) :: timing_
555 CHARACTER(LEN=12),INTENT(IN) :: total_clock
556 CHARACTER(LEN=12),OPTIONAL,INTENT(IN) :: partial_clocks(:)
558 TYPE (clock_type) :: total_
559 TYPE(clock_type),ALLOCATABLE :: partial_(:)
560 LOGICAL,ALLOCATABLE :: match(:)
561 INTEGER :: partial_ndim = 0, ic, ipar, nc
562 REAL (DP) :: t(2)
614 END SUBROUTINE qexsd_init_clocks argument
|