Subroutine DCStringPrintf

subroutine DCStringPrintf

        ! Uses
    use dc_types, only: DP
    use dcstring_base, only: VSTRING, assignment(=), operator(.cat.)

        ! Variables
    type (VSTRING), intent(out) :: unit
    character (len=*), intent(in) :: fmt
    integer, optional, intent(in), dimension (:) :: i
    integer, optional, intent(in), dimension (:) :: n
    real, optional, intent(in), dimension (:) :: r
    real (kind=DP), optional, intent(in), dimension (:) :: d
    logical, optional, intent(in), dimension (:) :: L
    type (VSTRING), optional, intent(in), dimension (:) :: s
    character (len=*), optional, intent(in) :: c1
    character (len=*), optional, intent(in) :: c2
    character (len=*), optional, intent(in) :: c3
    character (len=*), optional, intent(in), dimension (:) :: ca
    integer :: ni
    integer :: nr
    integer :: nd
    integer :: nl
    integer :: ns
    integer :: nc
    integer :: na
    integer :: nn
    integer :: cur
    integer :: endp
    integer :: ptr
    integer :: repeat
    integer :: m
    character (len=80) :: cbuf

end subroutine DCStringPrintf

Description of Variables

unit

type (VSTRING), intent(out) :: unit

fmt

character (len=*), intent(in) :: fmt

i

integer, optional, intent(in), dimension (:) :: i

n

integer, optional, intent(in), dimension (:) :: n

r

real, optional, intent(in), dimension (:) :: r

d

real (kind=DP), optional, intent(in), dimension (:) :: d

L

logical, optional, intent(in), dimension (:) :: L

s

type (VSTRING), optional, intent(in), dimension (:) :: s

c1

character (len=*), optional, intent(in) :: c1

c2

character (len=*), optional, intent(in) :: c2

c3

character (len=*), optional, intent(in) :: c3

ca

character (len=*), optional, intent(in), dimension (:) :: ca

ni

integer :: ni

nr

integer :: nr

nd

integer :: nd

nl

integer :: nl

ns

integer :: ns

nc

integer :: nc

na

integer :: na

nn

integer :: nn

cur

integer :: cur

endp

integer :: endp

ptr

integer :: ptr

repeat

integer :: repeat

m

integer :: m

cbuf

character (len=80) :: cbuf