Searched defs:read_ns (Results 1 – 1 of 1) sorted by relevance
675 SUBROUTINE read_ns() subroutine696 INTEGER :: iunocc, iunocc1, ierr697 CHARACTER (LEN=256) :: dirname698 REAL(DP) :: eth, eth1