pcolormesh with negative coordinates and values to exercise edge cases
| Type | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|
| integer, | parameter | :: | nx | = | 31 | |
| integer, | parameter | :: | ny | = | 21 | |
| real(kind=wp) | :: | x(nx) | ||||
| real(kind=wp) | :: | y(ny) | ||||
| real(kind=wp) | :: | c(nx-1,ny-1) | ||||
| integer | :: | i | ||||
| integer | :: | j | ||||
| real(kind=wp), | parameter | :: | pi | = | 3.141592653589793_wp | |
| real(kind=wp) | :: | xc | ||||
| real(kind=wp) | :: | yc |