init_itv_70 Subroutine

public subroutine init_itv_70()

Uses

  • (70) vcool

    Arguments

    None

    Contents

    Source Code


    Source Code

      subroutine init_itv_70
        !! <LI> (70) vcool
        use numerics, only: lablxc, boundl, boundu
        implicit none
        lablxc(70) = 'vcool         '
        boundl(70) = 1.000D0
        boundu(70) = 1.000D2
      end subroutine init_itv_70