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