Searched defs:ts_fix_contours (Results 1 – 1 of 1) sorted by relevance
| /dports/science/siesta/siesta-4.1.5/Src/ |
| H A D | m_ts_io_ctype.f90 | 993 subroutine ts_fix_contours(N,c_io,Ni,idx) subroutine
998 integer, intent(in) :: N local
999 type(ts_c_io), intent(inout) :: c_io(N)
1000 integer, intent(in) :: Ni
1001 integer, intent(in) :: idx(Ni)
1003 integer :: i, start, j local
1004 integer :: cur, next, prev
1005 logical :: done
1086 subroutine update_done()
|