Ignore:
Timestamp:
Aug 15, 2018 9:23:10 AM (3 years ago)
Author:
sward
Message:

Added MAS end time, used time_since_reference_point, corrected tolerance_dp in nav_mesh

File:
1 edited

Legend:

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

    r3187 r3198  
    2525! -----------------
    2626! $Id$
     27! Redefined MAS limited time dimension to fit usage of multi_agent_system_end
     28!
     29! 3187 2018-07-31 10:32:34Z sward
    2730! Changed agent output to precision NF90_DOUBLE
    2831!
     
    283286
    284287    USE control_parameters,                                                    &
    285         ONLY:  max_masks, fl_max, var_fl_max, varnamelength
     288        ONLY:  fl_max, max_masks, multi_agent_system_end,                      &
     289               multi_agent_system_start, var_fl_max, varnamelength
    286290    USE kinds
    287291#if defined( __netcdf )
     
    19681972          ELSE
    19691973             CALL netcdf_create_dim( id_set_agt, 'time',                       &
    1970                                      INT(end_time/dt_write_agent_data*1.2),    &
     1974                                     INT( ( MIN( multi_agent_system_end,       &
     1975                                                 end_time ) -                  &
     1976                                            multi_agent_system_start ) /       &
     1977                                            dt_write_agent_data * 1.1 ),       &
    19711978                                     id_dim_time_agt, 331 )
    19721979          ENDIF
Note: See TracChangeset for help on using the changeset viewer.