18 lines
213 B
Fortran
18 lines
213 B
Fortran
![]() |
module test_math
|
||
|
use math
|
||
|
|
||
|
implicit none(type,external)
|
||
|
|
||
|
private
|
||
|
public :: test_math_run
|
||
|
|
||
|
contains
|
||
|
|
||
|
subroutine test_math_run()
|
||
|
|
||
|
call math_selfTest()
|
||
|
|
||
|
end subroutine test_math_run
|
||
|
|
||
|
end module test_math
|