MODULE mod_zoom_attribut USE mod_object INTEGER,PARAMETER :: zoom__begin = zoom_object + 10 INTEGER,PARAMETER :: zoom__name = zoom_object + 11 INTEGER,PARAMETER :: zoom__description = zoom_object + 12 INTEGER,PARAMETER :: zoom__ni = zoom_object + 13 INTEGER,PARAMETER :: zoom__nj = zoom_object + 14 INTEGER,PARAMETER :: zoom__ibegin = zoom_object + 15 INTEGER,PARAMETER :: zoom__jbegin = zoom_object + 16 INTEGER,PARAMETER :: zoom__end = zoom_object + 17 END MODULE mod_zoom_attribut