Révision 7 src/sinangle.f90

sinangle.f90 (revision 7)
1 1
     FUNCTION SinAngle(v1x,v1y,v1z,norm1,v2x,v2y,v2z,norm2)
2 2

  
3
       use Path_module, only :  Pi,KINT, KREAL
3
       use Path_module, only :  KREAL
4 4

  
5 5
       IMPLICIT NONE
6 6

  

Formats disponibles : Unified diff