$ $ if(associated(part) .and. size(part) /= ncells) then $ deallocate(part) $ part => null() $ end if $ $ if(.not.associated(part)) then
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | ncells | |||
integer, | intent(in) | :: | nprocs | |||
integer, | intent(out), | allocatable | :: | part(:) |