Index: LMDZ6/trunk/libf/phylmd/cosp/phys_cosp.f90
===================================================================
--- LMDZ6/trunk/libf/phylmd/cosp/phys_cosp.f90	(revision 6124)
+++ LMDZ6/trunk/libf/phylmd/cosp/phys_cosp.f90	(revision 6125)
@@ -5,7 +5,5 @@
 !Idelkadi Abderrahmane Nov 2015 version v1.4.0
 
-  subroutine phys_cosp( itap,dtime,freq_cosp, &
-                        ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, &
-                        ecrit_mth,ecrit_day,ecrit_hf, ok_all_xml, missing_val, &
+  subroutine phys_cosp( itap,dtime,missing_val, &
                         Nptslmdz,Nlevlmdz,lon,lat, presnivs,overlaplmdz,sunlit, &
                         ref_liq,ref_ice,fracTerLic,u_wind,v_wind,phis,phi,ph,p,skt,t, &
@@ -79,11 +77,13 @@
   USE mod_phys_lmdz_para
   USE mod_grid_phy_lmdz
-  use ioipsl
-  use iophy
-  use cosp_output_mod
-  use cosp_output_write_mod
+  USE ioipsl
+  USE iophy
+  USE cosp_output_mod
+  USE cosp_output_write_mod
 !  use MOD_COSP_Modis_Simulator, only : cosp_modis 
   USE lmdz_xios, ONLY: xios_field_is_active, using_xios
-  use cosp_read_otputkeys
+  USE cosp_read_otputkeys
+  USE conf_phys_m, ONLY : freq_cosp, ecrit_day,ecrit_hf,ecrit_mth, &
+                          ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, ok_all_xml
 
   IMPLICIT NONE
@@ -132,6 +132,5 @@
 ! Declaration necessaires pour les sorties IOIPSL
   integer :: ii
-  real    :: ecrit_day,ecrit_hf,ecrit_mth, missing_val
-  logical :: ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, ok_all_xml
+  real    :: missing_val
 
   logical, save :: debut_cosp=.true.
@@ -150,5 +149,5 @@
   real,dimension(Nlevlmdz)        :: presnivs
   integer                         :: itap,k,ip
-  real                            :: dtime,freq_cosp
+  real                            :: dtime
   real,dimension(2)               :: time_bnds
 
Index: LMDZ6/trunk/libf/phylmd/cospv2/lmdz/lmdz_cosp_interface.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/cospv2/lmdz/lmdz_cosp_interface.F90	(revision 6124)
+++ LMDZ6/trunk/libf/phylmd/cospv2/lmdz/lmdz_cosp_interface.F90	(revision 6125)
@@ -12,6 +12,5 @@
 ! Interface ecrite par A.Idelkadi (11/2025)
 !%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-subroutine lmdz_cosp_interface(itap, dtime, freq_cosp, ok_mensuelCOSP, ok_journeCOSP,   &
-                         ok_hfCOSP, ecrit_mth, ecrit_day, ecrit_hf, ok_all_xml,   &
+subroutine lmdz_cosp_interface(itap, dtime, & 
                          missing_val, Nptslmdz, Nlevlmdz, lon, lat, presnivs,     &
                          overlaplmdz, sunlit, ref_liq, ref_ice, fracTerLic,       &
@@ -70,4 +69,6 @@
   use lmdz_cosp_subsample_and_optics_mod, only : subsample_and_optics
   use lmdz_cosp_construct_destroy_mod
+  USE conf_phys_m, ONLY : freq_cosp, ecrit_day,ecrit_hf,ecrit_mth, &
+                          ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, ok_all_xml  
 
 !!! Modules faisant partie du code source de COSPv2
@@ -147,6 +148,5 @@
 
 ! Declaration necessaires pour les sorties IOIPSL
-  real          :: ecrit_day, ecrit_hf, ecrit_mth, missing_val
-  logical       :: ok_mensuelCOSP, ok_journeCOSP, ok_hfCOSP, ok_all_xml
+  real          :: missing_val
   logical, save :: debut_cosp=.true.
 !$OMP THREADPRIVATE(debut_cosp)
@@ -173,5 +173,5 @@
   real, dimension(Nlevlmdz)                :: presnivs
   integer                                  :: itap, k, ip
-  real                                     :: dtime, freq_cosp
+  real                                     :: dtime
   real, dimension(2)                       :: time_bnds
 
Index: LMDZ6/trunk/libf/phylmd/physiq_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/physiq_mod.F90	(revision 6124)
+++ LMDZ6/trunk/libf/phylmd/physiq_mod.F90	(revision 6125)
@@ -1641,7 +1641,5 @@
                   mr_ozone_cosp0,cldtau_cosp0,cldemi_cosp0,JrNt_cosp0)
 
-             CALL phys_cosp(itap,phys_tstep,freq_cosp, &
-                  ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, &
-                  ecrit_mth,ecrit_day,ecrit_hf, ok_all_xml, missing_val, &
+             CALL phys_cosp(itap,phys_tstep,missing_val, &
                   klon,klev,longitude_deg,latitude_deg,presnivs,overlap, &
                   JrNt_cosp0,ref_liq_cosp0,ref_ice_cosp0, &
@@ -1661,7 +1659,5 @@
                   mr_ozone_cosp0,cldtau_cosp0,cldemi_cosp0,JrNt_cosp0)
 
-             CALL lmdz_cosp_interface(itap,phys_tstep,freq_cosp, &
-                  ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, &
-                  ecrit_mth,ecrit_day,ecrit_hf, ok_all_xml, missing_val, &
+             CALL lmdz_cosp_interface(itap,phys_tstep,missing_val, &
                   klon,klev,longitude_deg,latitude_deg,presnivs,overlap, &
                   JrNt_cosp0,ref_liq_cosp0,ref_ice_cosp0, &
@@ -4786,7 +4782,5 @@
              !       print*,'Dans physiq.F avant appel cosp ref_liq,ref_ice=',
              !     s        ref_liq,ref_ice
-             CALL phys_cosp(itap,phys_tstep,freq_cosp, &
-                  ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, &
-                  ecrit_mth,ecrit_day,ecrit_hf, ok_all_xml, missing_val, &
+             CALL phys_cosp(itap,phys_tstep,missing_val, &
                   klon,klev,longitude_deg,latitude_deg,presnivs,overlap, &
                   JrNt,ref_liq,ref_ice, &
@@ -4823,7 +4817,5 @@
              print*,'Dans physiq.F avant appel '
              !     s        ref_liq,ref_ice
-             CALL lmdz_cosp_interface(itap,phys_tstep,freq_cosp, &
-                  ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, &
-                  ecrit_mth,ecrit_day,ecrit_hf, ok_all_xml, missing_val, &
+             CALL lmdz_cosp_interface(itap,phys_tstep,missing_val, &
                   klon,klev,longitude_deg,latitude_deg,presnivs,overlap, &
                   JrNt,ref_liq,ref_ice, &
Index: LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90	(revision 6124)
+++ LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90	(revision 6125)
@@ -1765,7 +1765,5 @@
                mr_ozone_cosp0,cldtau_cosp0,cldemi_cosp0,JrNt_cosp0)
 
-        CALL phys_cosp(itap,phys_tstep,freq_cosp, &
-               ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, &
-               ecrit_mth,ecrit_day,ecrit_hf, ok_all_xml, missing_val, &
+        CALL phys_cosp(itap,phys_tstep,missing_val, &
                klon,klev,longitude_deg,latitude_deg,presnivs,overlap, &
                JrNt_cosp0,ref_liq_cosp0,ref_ice_cosp0, &
@@ -1785,7 +1783,5 @@
                mr_ozone_cosp0,cldtau_cosp0,cldemi_cosp0,JrNt_cosp0)
 
-          CALL lmdz_cosp_interface(itap,phys_tstep,freq_cosp, &
-               ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, &
-               ecrit_mth,ecrit_day,ecrit_hf, ok_all_xml, missing_val, &
+          CALL lmdz_cosp_interface(itap,phys_tstep,missing_val, &
                klon,klev,longitude_deg,latitude_deg,presnivs,overlap, &
                JrNt_cosp0,ref_liq_cosp0,ref_ice_cosp0, &
@@ -6391,7 +6387,5 @@
           !       print*,'Dans physiq.F avant appel cosp ref_liq,ref_ice=',
           !     s        ref_liq,ref_ice
-          CALL phys_cosp(itap,phys_tstep,freq_cosp, &
-               ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, &
-               ecrit_mth,ecrit_day,ecrit_hf, ok_all_xml, missing_val, &
+          CALL phys_cosp(itap,phys_tstep,missing_val, &
                klon,klev,longitude_deg,latitude_deg,presnivs,overlap, &
                JrNt,ref_liq,ref_ice, &
@@ -6422,7 +6416,5 @@
                  print*,'Dans physiq.F avant appel '
           !     s        ref_liq,ref_ice
-          CALL phys_cosp2(itap,phys_tstep,freq_cosp, &
-               ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, &
-               ecrit_mth,ecrit_day,ecrit_hf, ok_all_xml, missing_val, &
+          CALL phys_cosp2(itap,phys_tstep,missing_val, &
                klon,klev,longitude_deg,latitude_deg,presnivs,overlap, &
                JrNt,ref_liq,ref_ice, &
@@ -6452,7 +6444,5 @@
                  print*,'Dans physiq.F avant appel '
           !     s        ref_liq,ref_ice
-          CALL lmdz_cosp_interface(itap,phys_tstep,freq_cosp, &
-               ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP, &
-               ecrit_mth,ecrit_day,ecrit_hf, ok_all_xml, missing_val, &
+          CALL lmdz_cosp_interface(itap,phys_tstep,missing_val, &
                klon,klev,longitude_deg,latitude_deg,presnivs,overlap, &
                JrNt,ref_liq,ref_ice, &
