From 9e30776d23357cc79fef4c2873bf8d8b0b5a4568 Mon Sep 17 00:00:00 2001 From: George Gayno Date: Tue, 5 Mar 2024 13:42:01 -0600 Subject: [PATCH] Add comment in orog source code. Fixes #786. --- sorc/orog_mask_tools.fd/orog.fd/mtnlm7_oclsm.F | 1 + 1 file changed, 1 insertion(+) diff --git a/sorc/orog_mask_tools.fd/orog.fd/mtnlm7_oclsm.F b/sorc/orog_mask_tools.fd/orog.fd/mtnlm7_oclsm.F index cd8f5192e..58b5ecb86 100644 --- a/sorc/orog_mask_tools.fd/orog.fd/mtnlm7_oclsm.F +++ b/sorc/orog_mask_tools.fd/orog.fd/mtnlm7_oclsm.F @@ -459,6 +459,7 @@ SUBROUTINE TERSUB(IMN,JMN,IM,JM,NM,NR,NF0,NF1,NW,EFAC,BLAT, ! Read 30-sec Antarctica RAMP data. Points scan from South ! to North, and from Greenwich to Greenwich. +! The error handling here needs to be cleaned up. iosg = 0 error=NF__OPEN("./topography.antarctica.ramp.30s.nc", & NF_NOWRITE,fsize,ncid)