POM普林斯顿海洋模型，用于建立模型

可以在f77, f90, g77, pgf77，CVF 等编译器中直接运行。POM2K代码有两个实例用户可以自由选择：1）一个河道水流的模型，此模型的所有参数都在代码中直接进行了设定。2）一个河口模型实例。该模型的网格文件IC直接以原文件的形式提供。河口模型的输入文件是通过GRID-DATA/GRID.f文件生成的。用户在建议自己的模型时要设置自己的模型网格，收集细化资料如：地形、温盐、表面风场及热能量等。通过将数据插值到网格点来生成模型初始重要条件、强迫条件。在GRID-DATA中的代码是用来做插值处理的有效工具，可帮助我们生成IC文件，作为模型输入。

C***********************************************************************
C
C     Common blocks for pom2k.f
C
C***********************************************************************
C
C     source_c should agree with source in pom2k.f.
C
      character*40 source_c
      parameter（source_c=‘pom2k  2004-01-08‘）
C
C***********************************************************************
C
C     Array sizes:
C
      integer
     $  im             imm1           imm2           jm             
     $  jmm1           jmm2           kb             kbm1           
     $  kbm2 
C
C***********************************************************************
C
C     Set size of problem here:
C
c     parameter
c -- file2ic （iproblem=3）
c    $ （im=41          jm=61          kb=16）
c -- seamount （iproblem=1）
c    $ （im=65          jm=49          kb=21）
C ---- from parameter file generated by runpom2k ----
      include ‘grid‘
C
C***********************************************************************
C                                     
      parameter
     $ （imm1=im-1      imm2=im-2      jmm1=jm-1      jmm2=jm-2      
     $  kbm1=kb-1      kbm2=kb-2      ）
C
C-----------------------------------------------------------------------
C
C     Scalars:
C
      real
     $  alpha          dte            dti            dti2             
     $  grav           hmax           kappa          pi             
     $  ramp           rfe            rfn            rfs            
     $  rfw            rhoref         sbias          slmax          
     $  small          tbias          time           tprni          
     $  umol           vmaxl

      integer
     $  iint           iprint         iskp           jskp           
     $  kl1            kl2            mode           ntp
C
      common/blkcon/ 
     $  alpha          dte            dti            dti2           
     $  grav           hmax           kappa          pi             
     $  ramp           rfe            rfn            rfs            
     $  rfw            rhoref         sbias          slmax          
     $  small          tbias          time           tprni          
     $  umol           vmaxl          
     $  iint           iprint         iskp           jskp           
     $  kl1            kl2            mode           ntp
C
C-----------------------------------------------------------------------
C
C     1-D arrays:
C
      real
     $  dz             dzz            z              zz
C
      common/blk1d/ 
     $  dz（kb）         dzz（kb）        z（kb）          zz（kb） 
C
C-----------------------------------------------------------------------
C
C     2-D arrays:
C
      real
     $  aam2d          advua          advva          adx2d          
     $  ady2d          art            aru            arv            
     $  cbc          

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件         33  2004-04-19 16:36  POM\POM2K\2004-04-12

     文件       3106  2004-04-19 16:36  POM\POM2K\A_README.Hunter

     文件    1608051  2004-04-19 16:37  POM\POM2K\IC.dat

     文件       7916  2004-04-19 16:38  POM\POM2K\pom2k.c

     文件       4093  2004-04-19 16:38  POM\POM2K\pom2k.change

     文件     191173  2004-04-19 16:38  POM\POM2K\pom2k.f

     文件      24175  2004-04-19 16:38  POM\POM2K\pom2k.n

     文件     410321  2004-04-19 16:38  POM\POM2K\pom2k.Prob1.out

     文件     312811  2004-04-19 16:39  POM\POM2K\pom2k.Prob3.out

     文件      71680  2004-04-19 16:39  POM\POM2K\pomviz.tar

     文件      22218  2004-04-19 16:39  POM\POM2K\pomviz.zip

     文件       7998  2004-04-19 16:35  POM\POM2K\PREVIOUSversions\2002-02-02\pom2k.c

     文件     190035  2004-04-19 16:35  POM\POM2K\PREVIOUSversions\2002-02-02\pom2k.f

     文件      25182  2004-04-19 16:35  POM\POM2K\PREVIOUSversions\2002-02-02\pom2k.n

     目录          0  2005-06-24 19:20  POM\POM2K\PREVIOUSversions\2002-02-02

     目录          0  2004-11-05 18:00  POM\POM2K\PREVIOUSversions\2003-09-09

     目录          0  2004-11-05 18:00  POM\POM2K\PREVIOUSversions\2003-09-24

     目录          0  2005-06-24 19:20  POM\POM2K\PREVIOUSversions

     文件       1182  2004-04-19 16:39  POM\POM2K\runpom2k

     文件       3054  2004-04-19 16:36  POM\POM2K\USERScomments\2002.02.25_Lobocki

     文件       2787  2004-04-19 16:36  POM\POM2K\USERScomments\2002.02.28_Narinesingh

     文件       1200  2004-04-19 16:36  POM\POM2K\USERScomments\2002.03.14_Lanucara

     文件       3146  2004-04-19 16:36  POM\POM2K\USERScomments\2002.09.06_Hunter

     目录          0  2005-06-24 19:20  POM\POM2K\USERScomments

     目录          0  2005-06-24 19:20  POM\POM2K

     文件     198705  2004-05-20 13:08  POM\POM中文说明书.pdf

     目录          0  2005-06-24 19:20  POM

----------- ---------  ---------- -----  ----

              3089084                    28



............此处省略1个文件信息