Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_mp_obj), | intent(in) | :: | mp_env |
PURE FUNCTION dbcsr_mp_npcols(mp_env) RESULT(npcols) TYPE(dbcsr_mp_obj), INTENT(IN) :: mp_env INTEGER :: npcols npcols = SIZE(mp_env%mp%pgrid, 2) END FUNCTION dbcsr_mp_npcols