&fortin

  max_denerr_lev = 2

  prob_type = 4

  ! for problem type 1
!  pertmag =  0.00d0
!  rfire   =  0.15d0
!  uinit   = -3.00d4
!  vinit   =  0.20d4
!  winit   =  0.30d4

  ! for problem type 4
  rfire = 0.01d0

/