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 Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Recent content by 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... -
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... -
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)... -
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... -
Help with Array in fortran 95/2003
please delete this thread, i got it working!!! -
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)... -
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... -
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... -
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... -
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 -
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...
