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. raghu81

    call perl in fortan

    Dear all, Thank you for your previous responses. I wrote a perl script which clears comments (text following '#' in any line) and empty lines from a fortran input file. Some of my inputs are very lengthy so I write comments followed by '#'. Before using the input as such, I use the script to...
  2. raghu81

    Compiling DVODE_F90 fails on gfortran, works on g95

    Try something like gfortran -std=legacy dvode_f90_m.f90 example1.f90 -o test
  3. raghu81

    Compiling DVODE_F90 fails on gfortran, works on g95

    Works fine in gfortran 4.4
  4. raghu81

    Compiling DVODE_F90 fails on gfortran, works on g95

    I am using gfortran 4.3. I got no error message, only several warnings.
  5. raghu81

    Process grid data

    @GerritGroot: Yes. Assigning the whole 3-D arrays to zero and then reading the indices for non-zero values and then the values themselves solves the problem. Thanks to mikrom and GerritGroot. Note: I did the same also for the case involving floating point values for x, y, z grid coordinates as...
  6. raghu81

    Process grid data

    @mikrom: IMHO: What you posted could not work. 1) In one loop you are using step_x: do x = x_min, x_max, step_x ... but in the other loop you are using stepx: do ind_x = x_min, x_max, stepx The first code was my guess, I think this how the program I had used gave me only non-zero data. This...
  7. raghu81

    Process grid data

    @GerritGroot: Let me define the problem through the example which I had posted. I have the grid data # X Y Z data(X,Y,Z) 1 1 3 0.1 1 2 1 0.2 1 3 2 0.1 1 3 3 0.4 2 1 2 0.5 3 1 1 0.3 3 3 1 0.4 N_data = 7 For 3 grids along x, y, z there...
  8. raghu81

    Process grid data

    Here is an example Actual data for x_min = y_min = z_min = 1 x_max = y_max = z_max = 3 step_x = step_y = step_z = 1 This is what I want # X Y Z data(X,Y,Z) 1 1 1 0 1 1 2 0 1 1 3 0.1 1 2 1 0.2 1 2 2 0 1 2 3 0 1 3 1 0 1 3 2 0.1...
  9. raghu81

    Process grid data

    Dear all, I have a grid based data which is a 3-D array data(N1,N2,N3) where N1 = (x_max - x_min + step_x) / step_x N2 = (y_max - y_min + step_y) / step_y N3 = (z_max - z_min + step_z) / step_z x_min is the minimum value for the x-coordinate x_max is the maximum value for the x-coordinate...
  10. raghu81

    how to avoid multiple do loops

    From an application point of view, the version based of the recursive routine is compact. Thanx to GerritGroot, xwb and mikrom.
  11. raghu81

    Need a Fortran IV compiler

    I think you can try what xwb says, compile the code and post the error messages here.
  12. raghu81

    Need a Fortran IV compiler

    I think I used a legacy f77 compiler that came with a linux distribution. A friend of mine later told that he could he could run the code using g77 after 1 or 2 changes. About this issue, the following link may have some useful info http://www.eng-tips.com/viewthread.cfm?qid=192717
  13. raghu81

    Need a Fortran IV compiler

    Few years ago, I compiled an old quantum chemistry code written in FORTRAN IV using f77 program.
  14. raghu81

    how to avoid multiple do loops

    Dear xwb, Excellent work, Thank you for your help. This is exactly what I needed. Regards, Raghu
  15. raghu81

    how to avoid multiple do loops

    thank you GerritGroot, but i guess that does not solve the problem.
  16. raghu81

    how to avoid multiple do loops

    Dear all, In a code which I have been trying to generalize, I have an array of integers for ex., A = [1, 2, 3] then I have multiple do loops as do i1 = 1, A(1) do i2 = 1, A(2) do i3 = 1, A(3) ... ... enddo enddo enddo I want to generalize this code so that...
  17. raghu81

    Use cpp function ASSERT in fortran

    Hi, I am using Gfortran 4.3 which does not have this feature. - Raghu.
  18. raghu81

    Use cpp function ASSERT in fortran

    Hi ArkM, Including error msgs in a Fortran code unnecessarily makes the code lengthy. I found the following cpp code on the net and like to know if it can be used in a Fortran code. #if FPP_NODEBUG # define ASSERT(expr) if(.not.(expr))call ASSERT_FAILED(__STRING(expr),__FILE__,__LINE__) #...
  19. raghu81

    Use cpp function ASSERT in fortran

    Hi, I am looking for a way to use the c++ ASSERT function in a fortran code like for ex., allocate (a(10,10), stat=memstat) ASSERT(memstat==0) I am looking for a way to define the 'ASSERT' function in a header file and include some error msg with line numbers etc. and use it. Can any body...
  20. raghu81

    help in dislin

    Hi, I think this thread will help you. http://www.tek-tips.com/viewthread.cfm?qid=1495743&page=1 You may try to compile and run the program as mentioned in the thread. - raghu

Part and Inventory Search

Back
Top