Changeset 4055 for trunk/LMDZ.GENERIC/libf/phygeneric/inifis_mod.F90

Timestamp:

Feb 6, 2026, 10:20:21 PM (4 weeks ago)

Author:

mturbet

Message:

Cleaning of continuum routines following 04-02-26 hackathon. RIP our beloved bilinear and bilinearbig routines. You will be deeply missed...

File:

• trunk/LMDZ.GENERIC/libf/phygeneric/inifis_mod.F90 (modified) (1 diff)

trunk/LMDZ.GENERIC/libf/phygeneric/inifis_mod.F90

@@ -381 +381 @@
      call getin_p("continuum",continuum)
      if (is_master) write(*,*) trim(rname)//": continuum = ",continuum
-     
-     if (is_master) write(*,*) trim(rname)//&
-       ": use generic continuum opacity database ?"//&
-       " (matters only if callrad=T)"
-     generic_continuum_database=.true. ! default value
-     call getin_p("generic_continuum_database",generic_continuum_database)
-     if (is_master) write(*,*) trim(rname)//": generic_continuum_database = ", &
-     generic_continuum_database
  
      if (is_master) write(*,*) trim(rname)//": version for H2H2 CIA file ?"