c----------------------------------------------------------------------- c INCLUDE 'dimensions.h' c c dimensions.h contient les dimensions du modele c ndm est tel que iim=2**ndm c nqmx est la dimension de la variable traceur q c----------------------------------------------------------------------- INTEGER iim,jjm,llm,ndm PARAMETER (iim= 72,jjm=45,llm=19,ndm=1) integer nqmx parameter (nqmx=4) c-----------------------------------------------------------------------