Searched defs:DEPART (Results 1 – 1 of 1) sorted by relevance
192 SUBROUTINE DEPART subroutine196 INTEGER i, j, k, l local197 REAL*8, ALLOCATABLE :: tmp(:)