Skip to content

Commit acced98

Browse files
added "ONLY" statement to "USE hdf4_fortran_api" (#201)
2 parents 6b09266 + 9abd4f9 commit acced98

1 file changed

Lines changed: 17 additions & 12 deletions

File tree

GEOSlandassim_GridComp/clsm_ensupd_read_obs.F90

Lines changed: 17 additions & 12 deletions
Original file line numberDiff line numberDiff line change
@@ -15,24 +15,29 @@
1515
! *********************************************************************
1616

1717
module clsm_ensupd_read_obs
18-
19-
use, intrinsic :: iso_c_binding, ONLY: &
20-
c_char
21-
22-
use, intrinsic :: iso_fortran_env, ONLY: &
23-
int16
18+
19+
use, intrinsic :: iso_c_binding, ONLY: &
20+
c_char
21+
22+
use, intrinsic :: iso_fortran_env, ONLY: &
23+
int16
2424

2525
use MAPL_BaseMod, ONLY: &
2626
MAPL_UNDEF
2727

2828
use MAPL_ConstantsMod, ONLY: &
2929
MAPL_TICE
30-
31-
use io_hdf5, ONLY: &
32-
hdf5read
33-
34-
use hdf4_fortran_api
35-
30+
31+
use io_hdf5, ONLY: &
32+
hdf5read
33+
34+
use hdf4_fortran_api, ONLY: &
35+
hopen, hclose, vfstart, vsfatch, &
36+
vsqfnelt, vsfseek, vsfsfld, &
37+
vsfread, vsfdtch, vfend, &
38+
sfstart, sfn2index, sfselect, &
39+
sfginfo, sfrdata, sfendacc, sfend
40+
3641
use MAPL, ONLY: &
3742
MAPL_ease_convert, &
3843
MAPL_ease_extent

0 commit comments

Comments
 (0)