Ticket #39365: patch-UTIL-second_NONE.f.diff

File patch-UTIL-second_NONE.f.diff, 280 bytes (added by dstrubbe (David Strubbe), 11 years ago)

  • UTIL/second_NONE.f

    old new  
    3434*     End of ARSCND
    3535*
    3636      END
     37
     38
     39
     40      subroutine second(t)
     41        real :: t
     42
     43        call arscnd(t)
     44
     45      end subroutine