Home
last modified time | relevance | path

Searched refs:BodyIdR (Results 1 – 1 of 1) sorted by relevance

/dports/science/elmerfem/elmerfem-release-9.0/fem/src/
H A DDefUtils.F902265 INTEGER :: mat_id, BodyIdL, BodyIdR local
2274 BodyIdR = 0; BodyIdL = 0
2276 IF (ASSOCIATED(BulkElementR)) BodyIdR = BulkElementR % BodyId
2279 IF (BodyIdR == 0 .AND. BodyIdL == 0) THEN
2281 ELSE IF (BodyIdR > BodyIdL) THEN
2283 ELSE IF (bodyIdL >= BodyIdR) THEN