Changeset 1046 for codes/icosagcm/trunk/src/initial/etat0_academic.f90

Timestamp:

08/20/20 16:22:41 (4 years ago)

Author:

ymipsl

Message:

Introduce modification from A. Durocher github to make held&suarez testcase working on GPU

YM & AD

File:

• codes/icosagcm/trunk/src/initial/etat0_academic.f90 (modified) (1 diff)

codes/icosagcm/trunk/src/initial/etat0_academic.f90

@@ -228 +228 @@
     ENDDO
 
-    CALL compute_theta2theta_rhodz(ps,theta,theta_rhodz,1)
+    CALL compute_theta2theta_rhodz(ps,theta,theta_rhodz,1, ondevice=.false.)