Home
last modified time | relevance | path

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

/dports/science/elmerfem/elmerfem-release-9.0/elmerice/Solvers/
H A DCalvingGeometry.F901431 INTEGER :: PointCount, NewNumberOfNodes local
1433 NewNumberOfNodes = Group % NumberOfNodes + PointCount
1434 ALLOCATE(NewNodeNumbers(NewNumberOfNodes))
1437 NewNodeNumbers(Group % NumberOfNodes+1:NewNumberOfNodes) = Points(1:PointCount)
1440 Group % NumberOfNodes = NewNumberOfNodes