- Timestamp:
- Dec 23, 2021, 6:54:17 PM (2 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/dynphy_lonlat/phylmd/etat0dyn_netcdf.F90
r4049 r4050 150 150 CALL regr_lat_time_coefoz 151 151 CALL press_coefoz 152 CALL regr_pr_o3(p3d, q3d(:,:,:,i ))153 q3d(:,:,:,i )=q3d(:,:,:,i)*48./ 29.!--- Mole->mass fraction152 CALL regr_pr_o3(p3d, q3d(:,:,:,iq)) 153 q3d(:,:,:,iq)=q3d(:,:,:,iq)*48./ 29. !--- Mole->mass fraction 154 154 END IF 155 155 #endif
Note: See TracChangeset
for help on using the changeset viewer.