$ if( allocated(cell_cntr) .or. & $ & allocated(vol)) then $ call abort_psblas $ end if
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(vertex), | intent(in), | allocatable | :: | verts(:) | ||
| type(face), | intent(in), | allocatable | :: | faces(:) | ||
| type(cell), | intent(in), | allocatable | :: | cells(:) | ||
| type(connectivity), | intent(in) | :: | v2f | |||
| type(connectivity), | intent(in) | :: | v2c | |||
| type(connectivity), | intent(in) | :: | f2c | |||
| integer, | intent(in) | :: | ncd | |||
| type(vector), | intent(out), | allocatable | :: | cell_cntr(:) | ||
| real(kind=psb_dpk_), | intent(out), | allocatable | :: | vol(:) | ||
| logical, | intent(in), | optional | :: | quiet |