LAPACK  3.7.0
LAPACK: Linear Algebra PACKage
subroutine mysub ( integer  N,
real, dimension(n)  X,
real, dimension(n)  Y 
)