subroutine init_itv_118
!! <LI> (118) fpsep: f-value to ensure separatrix power is less than
use numerics, only: lablxc, boundl, boundu
implicit none
!! value from Kallenbach divertor (f-value for equation 69)
lablxc(118) = 'fpsep '
boundl(118) = 0.001D0
boundu(118) = 1.000D0
end subroutine init_itv_118