Ignore:
Timestamp:
Oct 26, 2016 11:15:40 AM (8 years ago)
Author:
knoop
Message:

Anelastic approximation implemented

File:
1 edited

Legend:

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

    r2032 r2037  
    2020! Current revisions:
    2121! ------------------
    22 !
     22! Anelastic approximation implemented
    2323!
    2424! Former revisions:
     
    252252             ( 'unknown      ', i9 = 1, dots_max-42 ) /)
    253253
     254    CHARACTER (LEN=16) :: heatflux_output_unit     !< unit for heatflux output
     255    CHARACTER (LEN=16) :: waterflux_output_unit    !< unit for waterflux output
     256    CHARACTER (LEN=16) :: momentumflux_output_unit !< unit for momentumflux output
     257
    254258    CHARACTER (LEN=9), DIMENSION(300) ::  dopr_unit = 'unknown'
    255259
     
    368372            id_var_x_fl, id_var_y_fl, id_var_z_fl,  nc_stat,                   &
    369373            netcdf_data_format, netcdf_data_format_string, netcdf_deflate,     &
    370             netcdf_precision, output_for_t0
    371            
    372            
     374            netcdf_precision, output_for_t0, heatflux_output_unit,             &
     375            waterflux_output_unit, momentumflux_output_unit
     376
    373377    SAVE
    374378
Note: See TracChangeset for help on using the changeset viewer.