MODULE planet
  IMPLICIT NONE
  SAVE

  REAL :: coefvis, coefir
  
END MODULE planet