typo in wrt_tides.F and def_tides.F?

Bug reports, work arounds and fixes

Moderators: arango, robertson

Post Reply
Message
Author
mjfconan
Posts: 20
Joined: Mon Mar 03, 2014 1:57 pm
Location: SKLEC, ECNU, China

typo in wrt_tides.F and def_tides.F?

#1 Unread post by mjfconan »

(1) wrt_tides.F

Code: Select all

line 91
      SUBROUTINE wrt_tides_nf90 (ng, tile)
line 367
      SUBROUTINE wrt_tides_pio (ng, tile)
should be

Code: Select all

      SUBROUTINE wrt_tides_nf90 (ng, tile, LBi, UBi, LBj, UBj)
      SUBROUTINE wrt_tides_pio (ng, tile, LBi, UBi, LBj, UBj)
(2) def_tides.F

Code: Select all

line 64
          CALL def_tides_nf90 (ng)
line 68
          CALL def_tides_pio (ng)
should be

Code: Select all

          CALL def_tides_nf90 (ng, ldef)
          CALL def_tides_pio (ng, ldef)

User avatar
arango
Site Admin
Posts: 1347
Joined: Wed Feb 26, 2003 4:41 pm
Location: DMCS, Rutgers University
Contact:

Re: typo in wrt_tides.F and def_tides.F?

#2 Unread post by arango »

Yes, good catch. Thank you for reporting this issue. I will update the code.

Post Reply