| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | private | :: | ncid | ||||
| integer, | private | :: | nrec | = | 0 | ||
| type(domainptr), | private, | dimension(30) | :: | pfields | |||
| integer, | private, | parameter | :: | DERIV_DIV | = | 1 | |
| integer, | private, | parameter | :: | DERIV_DUDX | = | 2 | |
| integer, | private, | parameter | :: | DERIV_DVDY | = | 3 | |
| integer, | private, | parameter | :: | DERIV_DWDZ | = | 4 | |
| integer, | private, | parameter | :: | DERIV_PRHS | = | 5 | |
| integer, | private, | parameter | :: | DERIV_PDX | = | 6 | |
| integer, | private, | parameter | :: | DERIV_PDY | = | 7 | |
| integer, | private, | parameter | :: | DERIV_PDZ | = | 8 | |
| integer, | private | :: | derived_kind(30) | = | 0 | ||
| integer, | private | :: | derived_slot(30) | = | 0 | ||
| integer, | private | :: | nderived | = | 0 | ||
| real, | private, | allocatable, target | :: | dbuf(:,:,:,:) | |||
| character(len=80), | private | :: | fname | = | 'fielddump.xxx.xxx.xxx.nc' | ||
| character(len=80), | private, | dimension(1,4) | :: | tncname | |||
| integer, | private | :: | ilow | ||||
| integer, | private | :: | ihigh | ||||
| integer, | private | :: | jlow | ||||
| integer, | private | :: | jhigh | ||||
| integer, | private | :: | klow | ||||
| integer, | private | :: | khigh | ||||
| integer, | private | :: | nvar | ||||
| logical, | private | :: | ldiracc | = | .false. | ||
| logical, | private | :: | lbinary | = | .false. | ||
| logical, | private | :: | lhalos |
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real, | public, | pointer | :: | point(:,:,:) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | n | |||
| integer, | intent(in) | :: | kind |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | kind | |||
| real, | intent(out) | :: | out(ib:ie,jb:je,kb:ke) |