Ignore:
Timestamp:
Apr 6, 2009 6:36:10 AM (12 years ago)
Author:
raasch
Message:

further dvr updates

File:
1 edited

Legend:

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

    r279 r284  
    332332                             ycoor_dvrp, zcoor_dvrp )
    333333
    334              tmp_r = 0.8;  tmp_g = 0.7;  tmp_b = 0.6;  tmp_t = 0.0
     334             tmp_r = topography_color(1)
     335             tmp_g = topography_color(2)
     336             tmp_b = topography_color(3)
     337             tmp_t = 0.0
    335338             CALL DVRP_MATERIAL_RGB( m-1, 1, tmp_r, tmp_g, tmp_b, tmp_t )
    336339
     
    455458                          ycoor_dvrp, zcoor_dvrp )
    456459
    457           tmp_r = 0.0;  tmp_g = 0.6;  tmp_b = 0.0;  tmp_t = 0.0
     460          tmp_r = groundplate_color(1)
     461          tmp_g = groundplate_color(2)
     462          tmp_b = groundplate_color(3)
     463          tmp_t = 0.0
    458464          CALL DVRP_MATERIAL_RGB( m-1, 1, tmp_r, tmp_g, tmp_b, tmp_t )
    459465
Note: See TracChangeset for help on using the changeset viewer.