COMPUTE DISTANCES - ZZZ possibly superfluous for 3D case???
ZZZ end possibly superfluous block of code...
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=wp), | intent(in) | :: | dxn | |||
real(kind=wp), | intent(in) | :: | dyn | |||
real(kind=wp), | intent(in) | :: | dzn | |||
real(kind=wp), | intent(in) | :: | meanlat | |||
real(kind=wp), | intent(in) | :: | meanlong | |||
character(len=*), | intent(in) | :: | neudir | |||
type(curvmesh), | intent(inout) | :: | x |