public interface duplicate
Module Procedures
private subroutine dupl_s(v, n, vdup)
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=*),
|
intent(in) |
|
|
:: |
v(:) |
|
|
integer,
|
intent(in) |
|
|
:: |
n |
|
|
character(len=maxlen),
|
intent(out), |
|
ALLOCATABLE
|
:: |
vdup(:) |
|
private subroutine dupl_i(v, n, vdup)
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
integer,
|
intent(in) |
|
|
:: |
v(:) |
|
|
integer,
|
intent(in) |
|
|
:: |
n |
|
|
integer,
|
intent(out), |
|
ALLOCATABLE
|
:: |
vdup(:) |
|
private subroutine dupl_r(v, n, vdup)
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
real,
|
intent(in) |
|
|
:: |
v(:) |
|
|
integer,
|
intent(in) |
|
|
:: |
n |
|
|
real,
|
intent(out), |
|
ALLOCATABLE
|
:: |
vdup(:) |
|
private subroutine dupl_l(v, n, vdup)
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
logical,
|
intent(in) |
|
|
:: |
v(:) |
|
|
integer,
|
intent(in) |
|
|
:: |
n |
|
|
logical,
|
intent(out), |
|
ALLOCATABLE
|
:: |
vdup(:) |
|