Ignore:
Timestamp:
Jul 2, 2020, 4:58:11 PM (4 years ago)
Author:
lguez
Message:

Bug fix: revert revision [3601]

Bug fix: revert revision [3601]. Procedure phys_output_write is
called a first time by physiq before the call to phyetat0, so before
ftsoil is allocated. So we cannot reference `ftsoil(:, nsoilmx,
is_ter) in phys_output_write`.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Ocean_skin/libf/phylmd/phys_output_ctrlout_mod.F90

    r3744 r3747  
    19481948
    19491949   type(ctrl_out), save:: o_delta_sst &
    1950         = ctrl_out([1, 10, 10, 1, 10, 10, 11, 11, 11, 11], 'delta_sst', &
     1950        = ctrl_out([1, 10, 10, 1, 10, 10, 11, 11, 11, 11], 'delta_SST', &
    19511951        "ocean-air interface temperature minus bulk SST", "K", '')
    19521952
Note: See TracChangeset for help on using the changeset viewer.