Changeset 3268 for palm/trunk


Ignore:
Timestamp:
Sep 21, 2018 1:45:37 PM (6 years ago)
Author:
sward
Message:

Fix in pointer assignment in MAS and MAS-Examples updated

Location:
palm/trunk
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/EXAMPLES/agents/canyon/INPUT/canyon_p3d

    r3159 r3268  
    3535 &runtime_parameters
    3636   !-- simulation time
    37       end_time                = 200.0,
     37      end_time                = 10800.0,
    3838
    3939   !-- others
     
    4646
    4747
    48  &agents_par
    49     dt_arel                = 3.1,
    50     dt_write_agent_data    = .1,
    51     dt_agent = 0.02,
    52     number_of_agent_groups = 2,
    53     adx                    = 1.8,1.8,
    54     ady                    = 1.,1.,
    55     asl                    = 13.,13.,
    56     asr                    = 27.,27.,
    57     ass                    = .5,38.,
    58     asn                    = 2.,39.5,
    59     at_x                   = 20.,20.,
    60     at_y                   = 999.,-999.,  ! chosen far out of domain so that agents walk nearly parallel
     48 &agent_parameters
     49    multi_agent_system_start = 10500.,
     50    dt_arel                  = 3.1,
     51    dt_write_agent_data      = .04,
     52    number_of_agent_groups   = 2,
     53    adx                      = 1.8,1.8,
     54    ady                      = 1.,1.,
     55    asl                      = 13.,13.,
     56    asr                      = 27.,27.,
     57    ass                      = .5,38.,
     58    asn                      = 2.,39.5,
     59    at_x                     = 20.,20.,
     60    at_y                     = 999.,-999.,  ! chosen far out of domain so that agents walk nearly parallel
    6161
    6262
     
    6666
    6767 &prepro_par
    68       tolerance_dp  = 1.41, 1.41,
     68      tolerance_dp  = .71,
    6969
    7070    /
  • palm/trunk/EXAMPLES/agents/canyon/OUTPUT/ani_agt.py

    r3159 r3268  
    8282    return ax,
    8383
    84 anim = animation.FuncAnimation(fig, animate, frames=Nt, interval=60, blit=False,save_count=0)
     84anim = animation.FuncAnimation(fig, animate, frames=Nt, interval=20, blit=False,save_count=0)
    8585anim.save('ags.mp4', dpi=200, writer='ffmpeg')
  • palm/trunk/EXAMPLES/agents/corners/INPUT/corners_p3d

    r3159 r3268  
    4646
    4747
    48  &agents_par
     48 &agent_parameters
     49    dim_size_agtnum_manual = 50,
    4950    dt_arel                = 12.,
    5051    dt_write_agent_data    = .05,
  • palm/trunk/SOURCE/multi_agent_system_mod.f90

    r3248 r3268  
    2525! -----------------
    2626! $Id$
     27! Cleaned up agent pointer assignment in output routine
     28!
     29! 3248 2018-09-14 09:42:06Z sward
    2730! Minor formating changes
    2831!
     
    13651368
    13661369#endif
    1367 
    1368           DEALLOCATE(out_agents)
     1370          agents => NULL()
     1371#if defined( __parallel )
     1372          IF ( ALLOCATED( out_agents ) ) DEALLOCATE( out_agents )
     1373#endif
    13691374       ELSE
    13701375          CALL cpu_log( log_point_s(17), 'mas_data_output', 'stop' )
    13711376       ENDIF
    13721377
     1378       IF ( ALLOCATED( trf_agents ) ) DEALLOCATE( trf_agents )
    13731379
    13741380    END SUBROUTINE mas_data_output_agents
Note: See TracChangeset for help on using the changeset viewer.