dcstringcprintf.f90 File Reference

Go to the source code of this file.

Functions/Subroutines
character(len=string) function	dcstringcprintf (fmt, i, r, d, L, n, c1, c2, c3, ca)

Function/Subroutine Documentation

dcstringcprintf()

character(len = string) function dcstringcprintf	(	character(*), intent(in)	fmt,
		integer, dimension(:), intent(in), optional	i,
		real, dimension(:), intent(in), optional	r,
		real(dp), dimension(:), intent(in), optional	d,
		logical, dimension(:), intent(in), optional	L,
		integer, dimension(:), intent(in), optional	n,
		character(*), intent(in), optional	c1,
		character(*), intent(in), optional	c2,
		character(*), intent(in), optional	c3,
		character(*), dimension(:), intent(in), optional	ca
	)

Definition at line 16 of file dcstringcprintf.f90.

References dc_types::dp, and dc_types::string.

  !
  ! フォーマット文字列 fmt に従って変換された文字列を返します。
  ! 第1引数 fmt には指示子を含む文字列を与えます。
  ! 指示子には「<tt>%</tt>」を用います。
  ! <tt>%</tt> を用いたい場合は 「<tt>%%</tt>」と記述します。
  ! 指示子に関しての詳細や用例に関しては dc_utils/dcstringsprintf.f90 を参照ください。
  !
  use dc_types, only: string, dp
  use dc_string, only: printf
  implicit none
  character(len = STRING):: result
  character(*), intent(in):: fmt
  integer, intent(in), optional:: i(:), n(:)
  real, intent(in), optional:: r(:)
  real(DP), intent(in), optional:: d(:)
  logical, intent(in), optional:: l(:)
  character(*), intent(in), optional:: c1, c2, c3
  character(*), intent(in), optional:: ca(:)
continue
  call printf(result, fmt, i=i, r=r, d=d, l=l, n=n, &
    &         c1=c1, c2=c2, c3=c3, ca=ca)