Searched defs:s8b (Results 1 – 2 of 2) sorted by relevance
68 subroutine s8b(n) subroutine69 integer :: n local71 real, save :: x(n)
37 subroutine s8b(a,n,m) subroutine38 integer, intent(in) :: n, m local39 real, intent(in) :: a(n-1,m+2)