init_itv_37 Subroutine

public subroutine init_itv_37()

Uses

  • (37) j_cs_flat_top_end

    Arguments

    None

    Contents

    Source Code


    Source Code

      subroutine init_itv_37
        !! <LI> (37) j_cs_flat_top_end
        use numerics, only: lablxc, boundl, boundu
        implicit none
        lablxc(37) = 'j_cs_flat_top_end        '
        boundl(37) = 1.000D5
        boundu(37) = 1.000D8
      end subroutine init_itv_37