Commit e93f80fc630e5ff34c9bfd35f652cd47b1cf184e

Authored by daniau
1 parent 2919a9e2da

git-svn-id: https://lxsd.femto-st.fr/svn/fvn@46 b657c933-2333-4658-acf2-d3c7c2708721

Showing 4 changed files with 4 additions and 4 deletions Side-by-side Diff

fvn_test/test_bsin.f90
... ... @@ -3,7 +3,7 @@
3 3 implicit none
4 4 integer :: n,npoints,i
5 5 real(4) :: xmin,xmax,xstep,x,y
6   -real(4),dimension(200,6) :: bes
  6 +real(4),dimension(200,0:5) :: bes
7 7 ! interface
8 8 ! real(4) function besjn(n,x,factor,big)
9 9 ! integer :: n
fvn_test/test_bsjn.f90
... ... @@ -3,7 +3,7 @@
3 3 implicit none
4 4 integer :: n,npoints,i
5 5 real(4) :: xmin,xmax,xstep,x,y
6   -real(4),dimension(200,6) :: bes
  6 +real(4),dimension(200,0:5) :: bes
7 7 ! interface
8 8 ! real(4) function besjn(n,x,factor,big)
9 9 ! integer :: n
fvn_test/test_bskn.f90
... ... @@ -3,7 +3,7 @@
3 3 implicit none
4 4 integer :: n,npoints,i
5 5 real(4) :: xmin,xmax,xstep,x,y
6   -real(4),dimension(200,6) :: bes
  6 +real(4),dimension(200,0:5) :: bes
7 7 ! interface
8 8 ! real(4) function besjn(n,x,factor,big)
9 9 ! integer :: n
fvn_test/test_bsyn.f90
... ... @@ -3,7 +3,7 @@
3 3 implicit none
4 4 integer :: n,npoints,i
5 5 real(4) :: xmin,xmax,xstep,x,y
6   -real(4),dimension(200,6) :: bes
  6 +real(4),dimension(200,0:5) :: bes
7 7 ! interface
8 8 ! real(4) function besjn(n,x,factor,big)
9 9 ! integer :: n