Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. cbmurphy

    Audio array clean-up algorithm

    i think i got it, it seems to have worked now: [code/] program cleanAudio implicit none integer:: n = 0, i = 0 character:: dummy integer, parameter:: max = 40000. real, dimension(max):: array1, array2 real, dimension(max):: array1Out, array2Out read(*,*)dummy, n do i = 1, n...
  2. cbmurphy

    Audio array clean-up algorithm

    i now have this and it doesnt show any compiling errors: [code/] program cleanAudio implicit none integer:: n = 0, i = 0 character:: dummy integer, parameter:: max = 40000. real, dimension(max):: array1, array2 real, dimension(max):: array1Out, array2Out read(*,*)dummy, n do i = 1, n...
  3. cbmurphy

    Audio array clean-up algorithm

    here is what i have so far, still getting some error messages: [code/] subroutine cleanUp(arrayIn, n, arrayOut) implicit none integer, intent(in):: n real, intent(in), dimension(n):: arrayIn real, intent(out), dimension(n):: arrayOut integer:: i = 0 do i = 1, n arrayOut(i) = arrayIn(i)...
  4. cbmurphy

    Audio array clean-up algorithm

    i am needing to write a program to clean up an audio signal where it is clamped to a negative value using the equation A(i) = A(2), if i = 1 A(i-1)+A(i+1)/2, if 1<i<N A(N-1), if i = N where N is the total number of audio samples in 1 channel (there are 2 channels) i need to...
  5. cbmurphy

    Help with Array in fortran 95/2003

    please delete this thread, i got it working!!!
  6. cbmurphy

    Help with Array in fortran 95/2003

    sorry, here: [code/] program testVectors implicit none integer:: n = 0, i = 0 character:: dummy read(*,*)dummy, n real, dimension(n):: array1, array2 do i = 1, n read(*,*)array1(i), array2(i) end do end program real function innerProd(array1, array2, n)...
  7. cbmurphy

    Help with Array in fortran 95/2003

    now i have modified it to read a .dat file in the form: # numberOfArrayValues array1(1) array2(1) array1(2) array2(2) . . . . . array1(n) array2(n) and the code is as follows: [code/] program testVectors implicit none integer:: n = 0, i = 0 character:: dummy read(*,*)dummy, n...
  8. cbmurphy

    Help with Array in fortran 95/2003

    here is my code so far, please tell me what i am doing wrong: [code/] program testVectors implicit none integer:: n integer:: i = 0 real:: innerProd real, dimension(n):: array1, array2 write(*,*)"Enter number of elements to each array: " read(*,*)n do i = 1, n if(i == 1) then...
  9. cbmurphy

    Help with Array in fortran 95/2003

    i am supposed to write a function that computes the dot product of 2 vectors where the dot product equals the sum of Xi and Yi when i goes from 0 to n-1. then i have to write a test program to test it. we had one day of instruction on arrays and the assignment is due the next day (tomorrow) and...
  10. cbmurphy

    Help with infinite series calculation of SIN

    i actually fixed it yesterday, but thanks... also, the formula is correct, the one you put in goes from 0 to infinity where mine goes from 1 to infinity, they are in fact equal formulas though
  11. cbmurphy

    Help with infinite series calculation of SIN

    hello, i am a new fortran user in college... our teacher is a first year teacher and has assigned us 3 programs to write, none of which she explained how to do. i read the entire book up to where we are but apparently i still do not grasp the full concept yet. we are supposed to write a program...

Part and Inventory Search

Back
Top