25 REAL(KIND=
JPRB) ,INTENT(OUT) :: PAEROS
 
INTERFACE SUBROUTINE SUAERV PVOBGA
 
INTERFACE SUBROUTINE SUAERV PETAH
 
INTERFACE SUBROUTINE SUAERV PAEROS &&USE JPRB INTEGER(KIND=JPIM)
 
INTERFACE SUBROUTINE SUAERV && PAEOPD
 
!$Id ok_orolf LOGICAL ok_limitvrai LOGICAL ok_all_xml INTEGER iflag_ener_conserv REAL solaire REAL(kind=8) RCO2
 
INTERFACE SUBROUTINE SUAERV PVDAED
 
INTERFACE SUBROUTINE SUAERV && PVDAES
 
INTERFACE SUBROUTINE SUAERV && PTRBGA
 
INTERFACE SUBROUTINE SUAERV PAEADK
 
INTERFACE SUBROUTINE SUAERV PAEROS &&USE ONLY
 
INTERFACE SUBROUTINE SUAERV PVDAEU
 
INTERFACE SUBROUTINE SUAERV PVDAEL
 
INTERFACE SUBROUTINE SUAERV PAEADM
 
INTERFACE SUBROUTINE SUAERV && KLEV
 
INTERFACE SUBROUTINE SUAERV PTRPT
 
INTERFACE SUBROUTINE SUAERV PSTBGA
 
INTERFACE SUBROUTINE SUAERV PAEOPL
 
INTERFACE SUBROUTINE SUAERV PAEOPU
 
INTERFACE SUBROUTINE SUAERV PAEOPS