--- trunk/libf/dyn3d/etat0_lim.f90 2012/01/30 12:54:02 57 +++ trunk/dyn3d/ce0l.f 2014/03/05 14:57:53 82 @@ -1,4 +1,4 @@ -PROGRAM etat0_lim +PROGRAM ce0l ! This program sets the initial and boundary values. @@ -13,10 +13,10 @@ !------------------------------------- call new_unit(unit_nml) - open(unit_nml, file="used_namelists", status="replace", action="write") + open(unit_nml, file="used_namelists.txt", status="replace", action="write") CALL conf_gcm CALL etat0 CALL limit close(unit_nml) -END PROGRAM etat0_lim +END PROGRAM ce0l