Ignore:
Timestamp:
Mar 21, 2014 9:13:16 AM (7 years ago)
Author:
suehring
Message:

Bugfixes in ONLY statements

File:
1 edited

Legend:

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

    r1323 r1324  
    2020! Current revisions:
    2121! ------------------
     22! Bugfix: ONLY statement for module pegrid removed
    2223!
    23 !
    2424! Former revisions:
    2525! -----------------
     
    435435    USE kinds
    436436
    437     USE pegrid,                                                                &
    438         ONLY:  comm2d, comm_inter, ierr, MPI_DOUBLE_PRECISION, myid, ngp_a,    &
    439                target_id
     437    USE pegrid
    440438
    441439    IMPLICIT NONE
     
    521519    USE kinds
    522520
    523     USE pegrid,                                                                &
    524         ONLY:  comm2d, comm_inter, ierr, MPI_DOUBLE_PRECISION, myid, ngp_o,    &
    525                target_id
     521    USE pegrid
    526522
    527523    IMPLICIT NONE
Note: See TracChangeset for help on using the changeset viewer.