L16 : INTENT attribute in NPROMA routines

In NPROMA routines (those processing a single NPROMA block), only NPROMA data should be allowed to have an INTENT different of IN. All other argument data should have the INTENT(IN) attribute.

This, for instance should be forbidden:

SUBROUTINE LAPINEA(&
& YDGEOMETRY, YDML_GCONF,YDML_DYN,KST,KPROF,YDSL,KIBL,PB1,PB2,PWRL9,&
& KVSEPC,KVSEPL,&
& PSAVEDP,PCCO,PUF,PVF,KL0,KLH0,PLSCAW,PRSCAW,KL0H,PLSCAWH,PRSCAWH,&
& PSCO,PGFLT1,KNOWENO)

INTEGER(KIND=JPIM),INTENT(INOUT) :: KVSEPC
INTEGER(KIND=JPIM),INTENT(INOUT) :: KVSEPL

In particular, YDMODEL and YDGEOMETRY as well as all their sub-components passed as arguments (eg YDDYNA) should have the INTENT(IN) attribute in NPROMA routines.