Changeset 295 for codes/icosagcm/trunk/src/etat0_academic.f90
- Timestamp:
- 10/31/14 14:52:01 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
codes/icosagcm/trunk/src/etat0_academic.f90
r286 r295 134 134 135 135 136 !$OMP BARRIER 136 137 CALL compute_pression(ps,p,1) 138 !$OMP BARRIER 137 139 CALL compute_exner(ps,p,pks,pk,1) 140 !$OMP BARRIER 138 141 CALL compute_geopotential(phis,pks,pk,theta,phi,1) 139 142
Note: See TracChangeset
for help on using the changeset viewer.