Type-Bound Procedures
-
private subroutine init_field2d(this, pp, perr, psp, dim, fftflag, state, gcells)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(parallel_pipe), |
intent(in), |
|
pointer | :: |
pp | |
class(perrors), |
intent(in), |
|
pointer | :: |
perr | |
class(spect2d), |
intent(in), |
|
pointer | :: |
psp | |
integer, |
intent(in) |
|
| :: |
dim | |
logical, |
intent(in) |
|
| :: |
fftflag | |
integer, |
intent(in), |
optional |
| :: |
state | |
integer, |
intent(in), |
optional |
| :: |
gcells | |
-
private subroutine end_field2d(this)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
-
private subroutine fftrk_field2d(this, kind)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
integer, |
intent(in) |
|
| :: |
kind | |
-
private subroutine fftkr_field2d(this, kind)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
integer, |
intent(in) |
|
| :: |
kind | |
-
private subroutine divf_field2d(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
-
private subroutine gradf_field2d(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
-
private subroutine curlf_field2d(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
-
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
-
private subroutine smoothf_field2d(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
-
private subroutine elfield_field2d(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
-
private subroutine bfield_field2d(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
-
private subroutine bfield_qp_field2d(cu, dcu, amu, bxy, c, dex)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
cu | |
class(field2d), |
intent(inout) |
|
| :: |
dcu | |
class(field2d), |
intent(inout) |
|
| :: |
amu | |
class(field2d), |
intent(inout) |
|
| :: |
bxy | |
real, |
intent(in) |
|
| :: |
c | |
real, |
intent(in) |
|
| :: |
dex | |
-
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
-
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
-
private subroutine pipesend_field2d(this, stag, id)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
integer, |
intent(in) |
|
| :: |
stag | |
integer, |
intent(inout) |
|
| :: |
id | |
-
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
integer, |
intent(in) |
|
| :: |
rtag | |
-
private subroutine copyfrom(this, that, lpos, sdim, ddim)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field3d), |
intent(in) |
|
| :: |
that | |
integer, |
intent(in) |
|
| :: |
lpos | |
integer, |
intent(in), |
|
dimension(:) | :: |
sdim | |
integer, |
intent(in), |
|
dimension(:) | :: |
ddim | |
-
private subroutine copyadd(this, that, lpos, sdim, ddim)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field3d), |
intent(in) |
|
| :: |
that | |
integer, |
intent(in) |
|
| :: |
lpos | |
integer, |
intent(in), |
|
dimension(:) | :: |
sdim | |
integer, |
intent(in), |
|
dimension(:) | :: |
ddim | |
generic, public :: cb => copyto
-
private subroutine copyto(this, that, lpos, sdim, ddim)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field3d), |
intent(in) |
|
| :: |
that | |
integer, |
intent(in) |
|
| :: |
lpos | |
integer, |
intent(in), |
|
dimension(:) | :: |
sdim | |
integer, |
intent(in), |
|
dimension(:) | :: |
ddim | |
generic, public :: as => asc, asa
-
private subroutine asc(this, value)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
real, |
intent(in) |
|
| :: |
value | |
-
private subroutine asa(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
-
private subroutine sum1(this, a1, a2)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(in) |
|
| :: |
a1 | |
class(field2d), |
intent(in) |
|
| :: |
a2 | |
-
private subroutine sum2(this, a1, a2, dim, dim1, dim2)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(in) |
|
| :: |
a1 | |
class(field2d), |
intent(in) |
|
| :: |
a2 | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim1 | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim2 | |
-
private subroutine minus1(this, a1, a2)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(in) |
|
| :: |
a1 | |
class(field2d), |
intent(in) |
|
| :: |
a2 | |
-
private subroutine minus2(this, a1, a2, dim, dim1, dim2)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(in) |
|
| :: |
a1 | |
class(field2d), |
intent(in) |
|
| :: |
a2 | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim1 | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim2 | |
-
private subroutine multiply1(this, a1, value)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(in) |
|
| :: |
a1 | |
real, |
intent(in) |
|
| :: |
value | |
-
private subroutine multiply2(this, a1, dim, dim1, value)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(in) |
|
| :: |
a1 | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim1 | |
real, |
intent(in), |
|
dimension(:) | :: |
value | |
-
private subroutine writehdf5_field2d(this, file, dim)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(hdf5file), |
intent(in) |
|
| :: |
file | |
integer, |
intent(in) |
|
| :: |
dim | |
procedure, private :: end_field2d
-
private subroutine end_field2d(this)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
procedure, private :: init_field2d
-
private subroutine init_field2d(this, pp, perr, psp, dim, fftflag, state, gcells)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(parallel_pipe), |
intent(in), |
|
pointer | :: |
pp | |
class(perrors), |
intent(in), |
|
pointer | :: |
perr | |
class(spect2d), |
intent(in), |
|
pointer | :: |
psp | |
integer, |
intent(in) |
|
| :: |
dim | |
logical, |
intent(in) |
|
| :: |
fftflag | |
integer, |
intent(in), |
optional |
| :: |
state | |
integer, |
intent(in), |
optional |
| :: |
gcells | |
procedure, private :: divf_field2d
-
private subroutine divf_field2d(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
procedure, private :: fftkr_field2d
-
private subroutine fftkr_field2d(this, kind)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
integer, |
intent(in) |
|
| :: |
kind | |
procedure, private :: fftrk_field2d
-
private subroutine fftrk_field2d(this, kind)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
integer, |
intent(in) |
|
| :: |
kind | |
procedure, private :: potential_field2d
-
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
procedure, private :: curlf_field2d
-
private subroutine curlf_field2d(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
procedure, private :: gradf_field2d
-
private subroutine gradf_field2d(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
procedure, private :: bfield_field2d
-
private subroutine bfield_field2d(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
procedure, private :: elfield_field2d
-
private subroutine elfield_field2d(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
procedure, private :: smoothf_field2d
-
private subroutine smoothf_field2d(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
procedure, private :: copyguard_field2d
-
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
procedure, private :: bfield_qp_field2d
-
private subroutine bfield_qp_field2d(cu, dcu, amu, bxy, c, dex)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
cu | |
class(field2d), |
intent(inout) |
|
| :: |
dcu | |
class(field2d), |
intent(inout) |
|
| :: |
amu | |
class(field2d), |
intent(inout) |
|
| :: |
bxy | |
real, |
intent(in) |
|
| :: |
c | |
real, |
intent(in) |
|
| :: |
dex | |
procedure, private :: pipesend_field2d
-
private subroutine pipesend_field2d(this, stag, id)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
integer, |
intent(in) |
|
| :: |
stag | |
integer, |
intent(inout) |
|
| :: |
id | |
procedure, private :: acopyguard_field2d
-
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
procedure, private :: multiply1
-
private subroutine multiply1(this, a1, value)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(in) |
|
| :: |
a1 | |
real, |
intent(in) |
|
| :: |
value | |
procedure, private :: minus1
-
private subroutine minus1(this, a1, a2)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(in) |
|
| :: |
a1 | |
class(field2d), |
intent(in) |
|
| :: |
a2 | |
procedure, private :: sum1
-
private subroutine sum1(this, a1, a2)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(in) |
|
| :: |
a1 | |
class(field2d), |
intent(in) |
|
| :: |
a2 | |
procedure, private :: asa
-
private subroutine asa(this, that)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(inout) |
|
| :: |
that | |
procedure, private :: asc
-
private subroutine asc(this, value)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
real, |
intent(in) |
|
| :: |
value | |
procedure, private :: piperecv_field2d
-
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
integer, |
intent(in) |
|
| :: |
rtag | |
procedure, private :: minus2
-
private subroutine minus2(this, a1, a2, dim, dim1, dim2)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(in) |
|
| :: |
a1 | |
class(field2d), |
intent(in) |
|
| :: |
a2 | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim1 | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim2 | |
procedure, private :: sum2
-
private subroutine sum2(this, a1, a2, dim, dim1, dim2)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(in) |
|
| :: |
a1 | |
class(field2d), |
intent(in) |
|
| :: |
a2 | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim1 | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim2 | |
procedure, private :: multiply2
-
private subroutine multiply2(this, a1, dim, dim1, value)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field2d), |
intent(in) |
|
| :: |
a1 | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim | |
integer, |
intent(in), |
|
dimension(:) | :: |
dim1 | |
real, |
intent(in), |
|
dimension(:) | :: |
value | |
procedure, private :: writehdf5_field2d
-
private subroutine writehdf5_field2d(this, file, dim)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(hdf5file), |
intent(in) |
|
| :: |
file | |
integer, |
intent(in) |
|
| :: |
dim | |
procedure, private :: copyadd
-
private subroutine copyadd(this, that, lpos, sdim, ddim)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field3d), |
intent(in) |
|
| :: |
that | |
integer, |
intent(in) |
|
| :: |
lpos | |
integer, |
intent(in), |
|
dimension(:) | :: |
sdim | |
integer, |
intent(in), |
|
dimension(:) | :: |
ddim | |
procedure, private :: copyto
-
private subroutine copyto(this, that, lpos, sdim, ddim)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field3d), |
intent(in) |
|
| :: |
that | |
integer, |
intent(in) |
|
| :: |
lpos | |
integer, |
intent(in), |
|
dimension(:) | :: |
sdim | |
integer, |
intent(in), |
|
dimension(:) | :: |
ddim | |
procedure, private :: copyfrom
-
private subroutine copyfrom(this, that, lpos, sdim, ddim)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(inout) |
|
| :: |
this | |
class(field3d), |
intent(in) |
|
| :: |
that | |
integer, |
intent(in) |
|
| :: |
lpos | |
integer, |
intent(in), |
|
dimension(:) | :: |
sdim | |
integer, |
intent(in), |
|
dimension(:) | :: |
ddim | |
procedure, public :: getks
-
private function getks(this)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(in) |
|
| :: |
this | |
Return Value class(ufield2d),
pointer
procedure, public :: getrs
-
private function getrs(this)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(in) |
|
| :: |
this | |
Return Value class(ufield2d),
pointer
procedure, public :: getgcells
-
private function getgcells(this)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(in) |
|
| :: |
this | |
Return Value integer
procedure, public :: getstate
-
private function getstate(this)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(field2d), |
intent(in) |
|
| :: |
this | |
Return Value integer