subroutine PrintMCSP ! Uses use unpmc_mod ! Variables integer :: i real :: pmag real :: cost end subroutine PrintMCSP
integer :: i
real :: pmag
real :: cost