IOIPSL/Mathelp/mathelp.f

MODULE mathelp

  ! From mathelp.f90, version 2.0 2004/04/05 14:47:50

  implicit none

  !- Variables used to detect and identify the operations
  CHARACTER(LEN=80), parameter:: seps='( ) , + - / * ^'

END MODULE mathelp
1	guez	30	MODULE mathelp
2
3			! From mathelp.f90, version 2.0 2004/04/05 14:47:50
4
5			implicit none
6
7			!- Variables used to detect and identify the operations
8	guez	104	CHARACTER(LEN=80), parameter:: seps='( ) , + - / * ^'
9	guez	30
10			END MODULE mathelp