bianchi2_about.f90

Go to the documentation of this file.

!------------------------------------------------------------------------------
! bianchi2_about
!
!------------------------------------------------------------------------------

program bianchi2_about

  use s2_types_mod

  implicit none

  ! Display info.
  write(*,'(a)') "=========================================================="
  write(*,'(a)') "BIANCHI2 package to simulate Bianchi type VIIh induced"
  write(*,'(a)') "temperature fluctuations in CMB maps when incorporating a"
  write(*,'(a)') "cosmological constant."
  write(*,'(a)') "By Jason McEwen, Anthony Lasenby and Thibaut Josset"
  write(*,'(a)') "See www.jasonmcewen.org for more information."
  write(*,'(a)') "See LICENSE.txt for license details."

  write(*,'(a,a)') "Version: ", bianchi2_version
  write(*,'(a,a)') "Build: ", bianchi2_build
  write(*,'(a)') "=========================================================="

end program bianchi2_about