Home
last modified time | relevance | path

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

/dports/science/elmerfem/elmerfem-release-9.0/elmerice/Solvers/
H A DCalvingGeometry.F903167 rxs = VecCross2D(r,s)
3173 t = VecCross2D(bma,s) / rxs
3174 u = VecCross2D(bma,r) / rxs
3203 rxs = VecCross2D(r,s)
3212 t = VecCross2D(bma,s) / rxs
3213 u = VecCross2D(bma,r) / rxs
3219 FUNCTION VecCross2D(a, b) RESULT (c) function
3224 END FUNCTION VecCross2D