getarg()

Hi, Dr. Johnson,

 I got the answer about how to use command line in Fortran and use it in
my parallel assignment, it works well. Fortran 90 uses subroutine 

      getarg() 

to implement this. Here is the code that appears in my
assignment to read the five parameters from the command line:

  DOUBLE PRECISION:: DW,D
  INTEGER::N,P,T

!DEFINE BUFFER HOLDS THE COMMAND LINE ARGUMENT
  CHARACTER *100 BUFFER  

!GET THE PARAMETERS FROM THE COMMAND LINE ARGUMENT
    CALL GETARG(1,BUFFER)
    READ(BUFFER,*) D
    CALL GETARG(2,BUFFER)
    READ(BUFFER,*) DW
    CALL GETARG(3,BUFFER)
    READ(BUFFER,*) N
    CALL GETARG(4,BUFFER)
    READ(BUFFER,*) P
    CALL GETARG(5,BUFFER)
    READ(BUFFER,*) T
    
     ... 

   The information can be found in site:

 http://www.eeng.brad.ac.uk/help/.packlangtool/.langs/.comline.ex.html

 

Zhanshou Yu