X-Git-Url: http://git.salome-platform.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2FMEFISTO2%2Fareteideale.f;h=8ee61fadc43a685c62b645303831ec6b0e15c68f;hb=73c9a31febc20e598dc4347f53bd80d88438c6be;hp=f0c8744ca31358ed26ee3ae719bfcfda86fccd84;hpb=547de73ed6f02f522e3580a4e16d1641703515f0;p=modules%2Fsmesh.git diff --git a/src/MEFISTO2/areteideale.f b/src/MEFISTO2/areteideale.f index f0c8744ca..8ee61fadc 100755 --- a/src/MEFISTO2/areteideale.f +++ b/src/MEFISTO2/areteideale.f @@ -1,6 +1,6 @@ c MEFISTO : library to compute 2D triangulation from segmented boundaries c -c Copyright (C) 2003 Laboratoire J.-L. Lions UPMC Paris +c Copyright (C) 2006 Laboratoire J.-L. Lions UPMC Paris c c This library is free software; you can redistribute it and/or c modify it under the terms of the GNU Lesser General Public @@ -21,7 +21,8 @@ c c c File : areteideale.f c Module : SMESH -c Author: Alain PERRONNET +c Author : Alain PERRONNET +c Date : 13 novembre 2006 double precision function areteideale( xyz, direction ) double precision xyz(3), direction(3)