Skip to content

Commit 73ea037

Browse files
authored
Merge pull request #315 from GEOS-ESM/develop
2 parents 329ab6d + 1aae45b commit 73ea037

File tree

4 files changed

+8
-26
lines changed

4 files changed

+8
-26
lines changed

.circleci/config.yml

Lines changed: 4 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,11 @@
11
version: 2.1
22

33
# Anchors in case we need to override the defaults from the orb
4-
#baselibs_version: &baselibs_version v7.17.0
5-
#bcs_version: &bcs_version v11.3.0
6-
4+
#baselibs_version: &baselibs_version v7.27.0
5+
#bcs_version: &bcs_version v11.6.0
76

87
orbs:
9-
ci: geos-esm/circleci-tools@2
8+
ci: geos-esm/circleci-tools@4
109

1110
workflows:
1211
build-test:
@@ -17,7 +16,7 @@ workflows:
1716
- docker-hub-creds
1817
matrix:
1918
parameters:
20-
compiler: [ifort, gfortran]
19+
compiler: [gfortran, ifort]
2120
#baselibs_version: *baselibs_version
2221
repo: GEOSgcm
2322
checkout_fixture: true

interp_restarts.F90

Lines changed: 2 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -45,7 +45,6 @@ program interp_restarts
4545

4646
real(ESMF_KIND_R8), allocatable :: r8_ak(:)
4747
real(ESMF_KIND_R8), allocatable :: r8_bk(:)
48-
real(ESMF_KIND_R8), allocatable :: r8_akbk(:)
4948

5049
real(ESMF_KIND_R4), pointer :: r4_local(:,:,:)
5150
real(ESMF_KIND_R8), pointer :: r8_local(:,:,:), pt_local(:,:,:)
@@ -276,7 +275,6 @@ program interp_restarts
276275
call set_eta(npz,ks,ptop,pint,r8_ak,r8_bk)
277276
FV_Atm(1)%ak = r8_ak
278277
FV_Atm(1)%bk = r8_bk
279-
deallocate ( r8_ak,r8_bk )
280278
nq = nmoist
281279
FV_Atm(1)%ncnst = nq/km
282280
if( is_master() ) then
@@ -468,12 +466,8 @@ program interp_restarts
468466

469467

470468
! AK and BK
471-
allocate ( r8_akbk(npz+1) )
472-
r8_akbk = FV_Atm(1)%ak
473-
if (AmWriter) call MAPL_VarWrite(OutFmt,"AK",r8_akbk)
474-
r8_akbk = FV_Atm(1)%bk
475-
if (AmWriter) call MAPL_VarWrite(OutFmt,"BK",r8_akbk)
476-
deallocate ( r8_akbk )
469+
if (AmWriter) call MAPL_VarWrite(OutFmt,"AK",r8_ak)
470+
if (AmWriter) call MAPL_VarWrite(OutFmt,"BK",r8_bk)
477471

478472
allocate(r8_local(is:ie,js:je,npz+1))
479473

scripts/fv3.j

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -124,8 +124,8 @@ endif
124124
#######################################################################
125125

126126
setenv GEOSDIR @GEOSDIR
127-
setenv GEOSBIN @GEOSBIN
128-
setenv GEOSETC @GEOSETC
127+
setenv GEOSBIN ${GEOSDIR}/bin
128+
setenv GEOSETC ${GEOSDIR}/etc
129129

130130
set TAG = `cat $GEOSETC/.FV3_VERSION`
131131
set RUN_CMD = "$GEOSBIN/esma_mpirun -np "

scripts/fv3_setup

Lines changed: 0 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -637,15 +637,8 @@ echo $EXPDIRroot > $HOME/.EXPDIRroot
637637
#######################################################################
638638

639639
set GEOSDIR = $GEOSDEF
640-
641-
#
642-
# GEOSBIN does point to the bin/ directory in each
643-
#
644640
setenv GEOSSRC ${GEOSDIR}
645641
setenv GEOSBIN ${GEOSDIR}/bin
646-
setenv GEOSETC ${GEOSDIR}/etc
647-
648-
setenv GEOSUTIL ${GEOSSRC}
649642

650643
#######################################################################
651644
# Check for Group ID Sponsor Code
@@ -831,10 +824,6 @@ s?@BATCH_OUTPUTNAME?$BATCH_OUTPUTNAME?g
831824
s?@BATCH_JOINOUTERR?$BATCH_JOINOUTERR?g
832825
s?@SITE?$SITE?g
833826
s?@GEOSDIR?$GEOSDIR?g
834-
s?@GEOSSRC?$GEOSSRC?g
835-
s?@GEOSBIN?$GEOSBIN?g
836-
s?@GEOSETC?$GEOSETC?g
837-
s?@GEOSUTIL?$GEOSUTIL?g
838827
s?@SINGULARITY_BUILD?$SINGULARITY_BUILD?g
839828
s?@NATIVE_BUILD?$NATIVE_BUILD?g
840829
s?@SINGULARITY_SANDBOX?$SINGULARITY_SANDBOX?g

0 commit comments

Comments
 (0)