drive.f90


subroutine test1

integer, parameter :: r8 = selected_real_kind(12,100)


subroutine test2

    Typical interface to M3D

integer, parameter :: r8 = selected_real_kind(12,100)


Send comments about this document to Alexander Ppletzer. Thu Jan 26 12:43:45 2006