init_structure_variables Subroutine

  subroutine init_structure_variables
    !! Initialise module variables
    implicit none

    aintmass = 0.0D0
    clgsmass = 0.0D0
    coldmass = 0.0D0
    fncmass = 0.0D0
    gsmass = 0.0D0
  end subroutine init_structure_variables