Ignore:
Timestamp:
Mar 7, 2007 8:38:00 AM (15 years ago)
Author:
raasch
Message:

preliminary version, several changes to be explained later

File:
1 edited

Legend:

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

    r39 r51  
    44! Actual revisions:
    55! -----------------
    6 !
     6! +rif_wall
    77!
    88! Former revisions:
     
    267267          CASE ( 'rif_m' )
    268268             READ ( 13 )  rif_m
     269          CASE ( 'rif_wall' )
     270             READ ( 13 )  rif_wall
    269271          CASE ( 's_av' )
    270272             ALLOCATE( s_av(nzb:nzt+1,nys-1:nyn+1,nxl-1:nxr+1) )
Note: See TracChangeset for help on using the changeset viewer.