Ignore:
Timestamp:
Sep 23, 2024, 8:58:28 AM (6 hours ago)
Author:
Sebastien Nguyen
Message:

restore correct variable name in THREADPRIVATE directive

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/phys_local_var_mod.F90

    r5204 r5215  
    416416      REAL,ALLOCATABLE,SAVE,DIMENSION(:) :: h1_diag
    417417      REAL,ALLOCATABLE,SAVE,DIMENSION(:,:) :: xtrunoff_diag
    418 !$OMP THREADPRIVATE(h1_diagv,xtrunoff_diag)
     418!$OMP THREADPRIVATE(h1_diag,xtrunoff_diag)
    419419      REAL,ALLOCATABLE,SAVE,DIMENSION(:,:) :: zxfxtcalving
    420420!$OMP THREADPRIVATE(zxfxtcalving)
Note: See TracChangeset for help on using the changeset viewer.