Changeset 5922


Ignore:
Timestamp:
Dec 9, 2025, 1:54:11 PM (2 days ago)
Author:
yann meurdesoif
Message:

GPU port of atke routines
YM

Location:
LMDZ6/branches/PBLSURF_GPUPORT/libf/phylmd
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/PBLSURF_GPUPORT/libf/phylmd/lmdz_atke_exchange_coeff.f90

    r5268 r5922  
    88                        wind_u,wind_v,temp,qvap,play,pinterf,cdrag_uv, &
    99                        tke,eps,tke_shear,tke_buoy,tke_trans,Km_out,Kh_out)
     10!$gpum horizontal ngrid
    1011
    1112!========================================================================
    … …  
    411412!===============================================================================================
    412413subroutine atke_vdiff_tke(ngrid,nlay,dtime,z_lay,z_interf,temp,play,l_exchange,Sm,tke,tke_trans)
     414!$gpum horizontal ngrid
    413415
    414416! routine that computes the vertical diffusion of TKE by the turbulence

  • LMDZ6/branches/PBLSURF_GPUPORT/libf/phylmd/lmdz_call_atke.f90

    r5876 r5922  
    103103
    104104subroutine atke_explicit_prediction(ngrid,nlay,rg,rd,dtime,pinterf,play,temp,wind1,x_in,K_in,x_surf,cdrag,x_predict)
     105!$gpum horizontal ngrid
    105106
    106107INTEGER, INTENT(IN) :: ngrid ! number of horizontal index (flat grid)
Note: See TracChangeset for help on using the changeset viewer.