.                    go to 200

       go to 100

  These lines are here to deliberately cause a compile-time error.

  You need to place you own copy of SIZE.h in the include

         go to 9000

         go to 9000

         go to 9000

         go to 9000

            go to 10

  and b) to comment out these lines.

  These lines are here to deliberately cause a compile-time error.

  You need: a) to place you own copy of OCNIDS.h in a directory

  and b) to comment out these lines.

  These lines are here to deliberately cause a compile-time error.

  You need: a) to place you own copy of ATMIDS.h in a directory

  and b) to comment out these lines.

  These lines are here to deliberately cause a compile-time error.

  You need: a) to place you own copy of OCNIDS.h in a directory

        to=theta(i,j,1,bi,bj)

        toa=to+273.16d0

              deltap = t  - to + gamma_blk*ht

        xolw=stefan*(to+273.16d0)**4

        _RL to

         go to 999

            go to 500

            go to 320

         if (ifail.eq.0) go to 350

         go to 999

         if (td .ne. 0.0) go to 500

         go to 900

         if (td .eq. 0.0)     go to 950

         if (td-tg .lt. tmin) go to 920

            if ((z.ne.xx(i)) .and. (z.ne.xdiff(i))) go to 950

         go to 999