> subroutine mysub(n,v) > integer :: n > real :: v(*) If you specify v(n) here, it does work. Bounds checking seems to need the bounds explicitly provided in this subroutine. FX