comdissip_mod_h.f90 Source File


Files dependent on this one

sourcefile~~comdissip_mod_h.f90~~AfferentGraph sourcefile~comdissip_mod_h.f90 comdissip_mod_h.f90 sourcefile~traceurpole.f90 traceurpole.f90 sourcefile~traceurpole.f90->sourcefile~comdissip_mod_h.f90 sourcefile~adaptdt.f90 adaptdt.f90 sourcefile~adaptdt.f90->sourcefile~comdissip_mod_h.f90 sourcefile~advtrac_loc.f90 advtrac_loc.f90 sourcefile~advtrac_loc.f90->sourcefile~comdissip_mod_h.f90 sourcefile~advtrac.f90 advtrac.f90 sourcefile~advtrac.f90->sourcefile~comdissip_mod_h.f90 sourcefile~interpre.f90 interpre.f90 sourcefile~interpre.f90->sourcefile~comdissip_mod_h.f90

Contents

Source Code


Source Code

! Replaces comdissip.h
MODULE comdissip_mod_h
  IMPLICIT NONE; PRIVATE
  PUBLIC coefdis, tetavel, tetatemp, gamdissip, niterdis

  INTEGER niterdis
  REAL tetavel, tetatemp, coefdis, gamdissip
END MODULE comdissip_mod_h