Ignore:
Timestamp:
Aug 7, 2009, 6:29:23 PM (15 years ago)
Author:
lguez
Message:

Added some "intent" attributes in declarations.

In "phyredem", "dtime" is not declared. It is not in any included
file. Probably accepted by compilers as an intrinsic non-standard
function. Removed this element of "tab_cntrl".

Added some "only" clauses in "use" statements.

If the ozone field is read from a file, it is now updated every
360th of the length of the current year, regardless of that length.

In "physiq", "omega" was output before it was defined. Moved the
output instruction after the definition.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/branches/LMDZ4-dev/libf/phylmd/open_climoz_m.F90

    r1220 r1225  
    2222    use mod_phys_lmdz_mpi_transfert, only: bcast_mpi ! broadcast
    2323
    24     integer, intent(out):: ncid ! of "climoz_LMDZ.nc"
     24    integer, intent(out):: ncid ! of "climoz_LMDZ.nc", OpenMP shared
    2525
    2626    real, pointer:: press_in_edg(:)
    27     ! (edges of pressure intervals for ozone climatology, in Pa, in strictly
    28     ! ascending order)
     27    ! edges of pressure intervals for ozone climatology, in Pa, in strictly
     28    ! ascending order, OpenMP shared
    2929
    3030    ! Variables local to the procedure:
Note: See TracChangeset for help on using the changeset viewer.