program krackentest2
      character(255) filename
      logical lval

      logical lget
      external lget,rget,iget

C     define command and default argument values and read
C     command line arguments
      call kracken('cmd', ' -i 10 -r 10e3 -l "#N#" -f input')

C     get desired argument values
C     STRING EXAMPLE
      call retrev('cmd_f',filename,iflen,ier)
C     LOGICAL EXAMPLE
      lval = lget('cmd_l')
C     REAL EXAMPLE
      rval = rget('cmd_r')
C     INTEGER EXAMPLE
      ival = iget('cmd_i')

C     SHOW WHAT YOU GOT
      write(*,*)'filename=',filename(:iflen)
      write(*,*)'i=',ival
      write(*,*)'r=',rval
      write(*,*)'l=',lval

      end