Ignore:
Timestamp:
Jul 30, 2007 10:49:46 AM (17 years ago)
Author:
raasch
Message:

further preliminary changes concerning coupling

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/modules.f90

    r102 r103  
    55! Actual revisions:
    66! -----------------
    7 ! +comm_inter, coupling_char, coupling_mode, dt_coupling, ngp_xy, port_name,
    8 ! time_coupling, type_xy, uswst*, vswst*
     7! +comm_inter, constant_top_momentumflux, coupling_char, coupling_mode,
     8! dt_coupling, ngp_xy, port_name, time_coupling, top_momentumflux_u|v,
     9! type_xy, uswst*, vswst*
    910!
    1011! Former revisions:
     
    311312                conserve_volume_flow = .FALSE., constant_diffusion = .FALSE., &
    312313                constant_heatflux = .TRUE., constant_top_heatflux = .TRUE., &
     314                constant_top_momentumflux = .FALSE., &
    313315                constant_top_salinityflux = .TRUE., &
    314316                constant_waterflux = .TRUE., create_disturbances = .TRUE., &
     
    396398             time_do_sla = 0.0, time_dvrp = 0.0, time_prel = 0.0, &
    397399             time_restart = 9999999.9, time_run_control = 0.0, &
    398              top_heatflux = 9999999.9, top_momentumflux_u = 0.0, &
    399              top_momentumflux_v = 0.0, top_salinityflux = 9999999.9, &
     400             top_heatflux = 9999999.9, top_momentumflux_u = 9999999.9, &
     401             top_momentumflux_v = 9999999.9, top_salinityflux = 9999999.9, &
    400402             ug_surface = 0.0, u_gtrans = 0.0, &
    401403             ups_limit_e = 0.0, ups_limit_pt = 0.0, ups_limit_u = 0.0, &
Note: See TracChangeset for help on using the changeset viewer.