mirror of
https://git.salome-platform.org/gitpub/modules/smesh.git
synced 2025-01-16 04:40:33 +05:00
6 lines
152 B
FortranFixed
6 lines
152 B
FortranFixed
|
double precision function areteideale( xyz, direction )
|
||
|
|
double precision xyz(3), direction(3)
|
||
|
|
areteideale = 10
|
||
|
|
return
|
||
|
|
end
|