| Type | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|
| real(kind=8), | parameter | :: | pi | = | 3.14159265358979323846d0 | |
| real(kind=8), | parameter | :: | me | = | 1.00d-20 | |
| integer | :: | nxp | ||||
| integer | :: | nyp | ||||
| integer | :: | nzp | ||||
| real(kind=8) | :: | hxp | ||||
| real(kind=8) | :: | hyp | ||||
| real(kind=8) | :: | hzp | ||||
| real(kind=8) | :: | l_0 | ||||
| real(kind=8), | allocatable, dimension(:,:,:) | :: | aaa | |||
| real(kind=8), | allocatable, dimension(:,:,:) | :: | bbb | |||
| real(kind=8), | allocatable, dimension(:,:,:) | :: | ccc | |||
| real(kind=8), | allocatable, dimension(:,:,:) | :: | ddd | |||
| real(kind=8), | allocatable, dimension(:,:) | :: | aa | |||
| real(kind=8), | allocatable, dimension(:,:) | :: | bb | |||
| real(kind=8), | allocatable, dimension(:,:) | :: | cc | |||
| real(kind=8), | allocatable, dimension(:,:) | :: | dd | |||
| real(kind=8), | allocatable, dimension(:,:) | :: | ee | |||
| integer | :: | ierr | ||||
| real(kind=8) | :: | xx | ||||
| real(kind=8) | :: | yy | ||||
| real(kind=8) | :: | zz | ||||
| real(kind=8) | :: | fxyz | ||||
| integer | :: | i | ||||
| integer | :: | j | ||||
| integer | :: | k | ||||
| real(kind=4), | dimension(2) | :: | startt | |||
| real(kind=4), | dimension(2) | :: | endt | |||
| real(kind=4) | :: | result |