dc_args::dcargsnumber Interface Reference

Private Member Functions
integer function	dcargsnumber0 (arg)

Detailed Description

Definition at line 263 of file dc_args.f90.

Member Function/Subroutine Documentation

dcargsnumber0()

integer function dc_args::dcargsnumber::dcargsnumber0 ( type(args), intent(inout)  arg )

private

Definition at line 818 of file dc_args.f90.

    !
    ! コマンドライン引数として与えられた引数の数を返します.
    !
    use dc_message, only: messagenotify
    implicit none
    type(args), intent(inout) :: arg
    integer :: result
    character(len = *), parameter  :: subname = 'DCArgsNumber'
  continue
    if (.not. arg % initialized) then
      call messagenotify('W', subname, 'Call Open before Help in dc_args.')
      call dcargsopen(arg)
    end if
    result = size(cmd_argv_list)

---

The documentation for this interface was generated from the following file:

• dc_utils/dc_args.f90