program madamtest

  use smadam

  implicit none

  print *,'Test succesful!'

  return
  
end program madamtest