![]() ![]() The results given using simply fortran: != VECT_AUX = RQ(JK)=1.0/(PN-AUX*(AUX3/AUX2)) ! SOLUTION OF BEESEL FUNCTION the same code is written under intel fortran and it gives all the numerical values of the components of the bessel function vector. The first four elements of the found vectors give NAN and for the last four elements give fair values. ![]() ![]() the bessel function found are 8-dimensional vector of complex*16 type. I wrote a simply Fortran code that uses a Bessel function subroutine to solve a fluid-structure interaction problem. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |