COMIS with PAW

A high level interface to COMIS is provided by PAW. The PAW user creates and edit text files containing Fortran code using the local editor. These files are automatically interpreted and executed by the PAW commands without typing any COMIS commands. From the PAW level COMIS may be invoked in one of the three following ways:

• Using a COMIS command. Example: PAW > COMIS
  CS >   do x=1.,10.
  MND>      sq=sqrt(x)*10.
  MND>      print *,x,sq
  MND>   od
  MND>   end
  CS > quit
  PAW >
  
• Using an APPLication command. Example: PAW > Vector/Create Y(10) r 1 2 3 4 5 6 7 8 9 10
  PAW > APPLication COMIS QUIT
  CS >     subroutine demo
  FSD>     vector y, x(10)
  FSD>     do 10 i=1,10
  FSD>       xx=i
  FSD>       x(i)=y(i)*sqrt(xx)*10.
  FSD>  10 continue
  FSD>     end
  CS >     call demo
  MND>     end
  CS > quit
  PAW> Vector/print X
  
• Using a CALL command: CALL urout.
  • Case 1:
    urout is a routine compiled and linked with PAW, for example HPRINT. Then one can type CALL HPRINT(10)
  • Case 2:
    urout is the name of a file which can be edited interactively with the PAW EDIT command. For example if the file UROUT.FOR contains:       SUBROUTINE UROUT(N)
          SUM=0.
          DO 10 I=1,N
            SUM=SUM+I
      10  CONTINUE
          PRINT *,SUM
          END
    Then one can type CALL UROUT.FOR(10).

PAW users are recommended to use the standard Fortran notation and to read the following chapter to be aware of the few COMIS restrictions.