¡@
python Programming Glossary: enddoReading a direct access fortran unformatted file in Python http://stackoverflow.com/questions/10475839/reading-a-direct-access-fortran-unformatted-file-in-python 3 do i 1 100 do j 1 100 fn i j sin i p t 100 cos j p t 100 enddo enddo write 10 rec t 1 fn enddo close 10 end program binary_out.. 1 100 do j 1 100 fn i j sin i p t 100 cos j p t 100 enddo enddo write 10 rec t 1 fn enddo close 10 end program binary_out The.. i p t 100 cos j p t 100 enddo enddo write 10 rec t 1 fn enddo close 10 end program binary_out The program should give me zeros..
f2py, Python function that returns an array (vector-valued function) http://stackoverflow.com/questions/17474225/f2py-python-function-that-returns-an-array-vector-valued-function 1 x2 xs I fx1 f x1 fx2 f x2 result result fx1 fx2 x2 x1 2 enddo return end The problem is that Fortran is only integrating the.. fx1 f x1 J fx2 f x2 J result J result J fx1 fx2 x2 x1 2 enddo enddo return end Which works from Fortran 2.66680271e 03 4.00040812e.. x1 J fx2 f x2 J result J result J fx1 fx2 x2 x1 2 enddo enddo return end Which works from Fortran 2.66680271e 03 4.00040812e..
How to get priorly-unkown array as the output of a function in Fortran http://stackoverflow.com/questions/8264336/how-to-get-priorly-unkown-array-as-the-output-of-a-function-in-fortran x n n i j y j 0 do i 1 n if x i 0 then j j 1 y j x i endif enddo end function The questions are in Fortran 1 how to declare y.. y j 0 do i 1 size x if x i 0 then j j 1 temp j x i endif enddo allocate y j y temp j end function select end program test Edit..
comparing python with c/fortran http://stackoverflow.com/questions/9439869/comparing-python-with-c-fortran y 2.0 z 3.0 do j 1 3000 do i 1 1000000 r sqrt x x y y z z enddo enddo end program root_square C #include stdio.h #include math.h.. z 3.0 do j 1 3000 do i 1 1000000 r sqrt x x y y z z enddo enddo end program root_square C #include stdio.h #include math.h int..
|