Ignore:
Timestamp:
Aug 15, 2013 8:46:27 AM (12 years ago)
Author:
raasch
Message:

tridia-solver moved to seperate module; the tridiagonal matrix coefficients of array tri are calculated only once at the beginning

File:
1 edited

Legend:

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

    r1182 r1212  
    2020! Current revisions:
    2121! ------------------
    22 !
     22! +tri
    2323!
    2424! Former revisions:
     
    463463#endif
    464464
    465     REAL, DIMENSION(:,:,:,:), ALLOCATABLE ::  rif_wall
     465    REAL, DIMENSION(:,:,:,:), ALLOCATABLE ::  rif_wall, tri
    466466
    467467    REAL, DIMENSION(:,:,:), ALLOCATABLE :: var_x, var_y, var_z, gamma_x,       &
Note: See TracChangeset for help on using the changeset viewer.