Changeset 2400


Ignore:
Timestamp:
Nov 21, 2015, 7:38:32 PM (8 years ago)
Author:
fhourdin
Message:

Compilation bug fixing ...

Location:
LMDZ5/trunk/libf/phylmd
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/phylmd/add_phys_tend.F90

    r2399 r2400  
    1717USE phys_local_var_mod, ONLY: u_seri, v_seri, ql_seri, qs_seri, q_seri, &
    1818                              t_seri
    19 USE phys_state_var_mod, ONLY: ftsol, zdu
     19USE phys_state_var_mod, ONLY: ftsol
    2020USE geometry_mod, ONLY: longitude_deg, latitude_deg
    2121USE print_control_mod, ONLY: prt_level

  • LMDZ5/trunk/libf/phylmd/print_debug_phys.F90

    r2399 r2400  
    1414print*,'l    u, v, T, q, ql'
    1515DO k = 1, klev
    16    write(*,'(i3,2f8.4,3f14.4,2e14.2)') k,longitude_deg(i),latitude_deg(i),u_seri(i,k),v_seri(i,k),t_seri(i,k),q_seri(i,k),ql_seri(i,k)
     16   write(*,'(i3,2f8.4,3f14.4,2e14.2)') k,longitude_deg(i),latitude_deg(i), &
     17   u_seri(i,k),v_seri(i,k),t_seri(i,k),q_seri(i,k),ql_seri(i,k)
    1718ENDDO
    1819
Note: See TracChangeset for help on using the changeset viewer.