init_itv_167 Subroutine

public subroutine init_itv_167()

Uses

  • (167) fncycle : f-value for minimum CS coil stress load cycles

    Arguments

    None

    Contents

    Source Code


    Source Code

      subroutine init_itv_167
        !! <LI> (167) fncycle : f-value for minimum CS coil stress load cycles
        use numerics, only: lablxc, boundl, boundu
        implicit none
        lablxc(167) = 'fncycle       '
        boundl(167) = 1.0d-8
        boundu(167) = 1.0d0
      end subroutine init_itv_167