Ignore:
Timestamp:
Aug 24, 2016 3:47:17 PM (5 years ago)
Author:
kanani
Message:

changes in the course of urban surface model implementation

File:
1 edited

Legend:

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

    r2001 r2007  
    2020! Current revisions:
    2121! ------------------
    22 !
     22! Increased DIMENSION of data_output, data_output_user, do2d, do3d
    2323!
    2424! Former revisions:
     
    631631    CHARACTER (LEN=1000) ::  message_string = ' '
    632632
    633     CHARACTER (LEN=20), DIMENSION(100) ::  data_output = ' ',    &
     633    CHARACTER (LEN=20), DIMENSION(500) ::  data_output = ' ',    &
    634634                                           data_output_user = ' ', doav = ' '
    635635    CHARACTER (LEN=20), DIMENSION(max_masks,100) ::  &
     
    639639    CHARACTER (LEN=20), DIMENSION(200) ::  data_output_pr_user = ' '
    640640    CHARACTER (LEN=20), DIMENSION(max_masks,0:1,100) ::  domask = ' '
    641     CHARACTER (LEN=20), DIMENSION(0:1,100) ::  do2d = ' ', do3d = ' '
     641    CHARACTER (LEN=20), DIMENSION(0:1,500) ::  do2d = ' ', do3d = ' '
    642642
    643643    INTEGER(iwp), PARAMETER :: fl_max = 100, var_fl_max = 20
Note: See TracChangeset for help on using the changeset viewer.