Commit b5d010e0 authored by gotm's avatar gotm

New naming of .h files

parent fcf2f446
#$Id: Makefile,v 1.1 2002-05-02 14:00:41 gotm Exp $
#$Id: Makefile,v 1.2 2002-05-29 13:37:49 gotm Exp $
#
# Makefile to build the 2D specific library - libm2d.a
#
include ../Rules.make
INCS = static.h dynamic_declarations.h dynamic_allocations.h
INCS = static_2d.h dynamic_declarations_2d.h dynamic_allocations_2d.h
LIB = $(LIBDIR)/lib2d${buildtype}.a
MODSRC = m2d.F90 variables_2d.F90
......
!$Id: variables_2d.F90,v 1.1 2002-05-02 14:00:47 gotm Exp $
!$Id: variables_2d.F90,v 1.2 2002-05-29 13:37:49 gotm Exp $
#include "cppdefs.h"
!-----------------------------------------------------------------------
!BOP
......@@ -20,9 +20,9 @@
!
! !PUBLIC DATA MEMBERS:
#ifdef STATIC
#include "static.h"
#include "static_2d.h"
#else
#include "dynamic_declarations.h"
#include "dynamic_declarations_2d.h"
#endif
integer :: size2d_field
integer :: mem2d
......@@ -31,8 +31,11 @@
! Original author(s): Karsten Bolding & Hans Burchard
!
! $Log: variables_2d.F90,v $
! Revision 1.1 2002-05-02 14:00:47 gotm
! Initial revision
! Revision 1.2 2002-05-29 13:37:49 gotm
! New naming of .h files
!
! Revision 1.1.1.1 2002/05/02 14:00:47 gotm
! recovering after CVS crash
!
! Revision 1.1 2001/05/03 19:30:41 bbh
! 2D variables seperated from m2d
......@@ -86,7 +89,7 @@
! Allocates memory for the public data members - if not static
#ifndef STATIC
#include "dynamic_allocations.h"
#include "dynamic_allocations_2d.h"
#endif
#ifdef DEBUG
......
#$Id: Makefile,v 1.1 2002-05-02 14:00:52 gotm Exp $
#$Id: Makefile,v 1.2 2002-05-29 13:37:49 gotm Exp $
#
# Makefile to build the 3D specific library - libm3d.a
#
include ../Rules.make
INCS = static.h dynamic_declarations.h dynamic_allocations.h
INCS = static_3d.h dynamic_declarations_3d.h dynamic_allocations_3d.h
LIB = $(LIBDIR)/lib3d${buildtype}.a
MODSRC = m3d.F90 variables_3d.F90 advection_3d.F90 eqstate.F90 \
......
!$Id: variables_3d.F90,v 1.1 2002-05-02 14:00:58 gotm Exp $
!$Id: variables_3d.F90,v 1.2 2002-05-29 13:37:50 gotm Exp $
#include "cppdefs.h"
!-----------------------------------------------------------------------
!BOP
......@@ -22,9 +22,9 @@
REALTYPE :: dt,cnpar=0.9
!
#ifdef STATIC
#include "static.h"
#include "static_3d.h"
#else
#include "dynamic_declarations.h"
#include "dynamic_declarations_3d.h"
#endif
integer :: size3d_field
integer :: mem3d
......@@ -33,8 +33,11 @@
! Original author(s): Karsten Bolding & Hans Burchard
!
! $Log: variables_3d.F90,v $
! Revision 1.1 2002-05-02 14:00:58 gotm
! Initial revision
! Revision 1.2 2002-05-29 13:37:50 gotm
! New naming of .h files
!
! Revision 1.1.1.1 2002/05/02 14:00:58 gotm
! recovering after CVS crash
!
! Revision 1.6 2001/09/19 13:07:00 bbh
! Moved advection related 3D fields to global allocation
......@@ -102,7 +105,7 @@
! Allocates memory for the public data members - if not static
#ifndef STATIC
#include "dynamic_allocations.h"
#include "dynamic_allocations_3d.h"
#endif
#ifdef DEBUG
......
!$Id: domain.F90,v 1.1 2002-05-02 14:01:11 gotm Exp $
!$Id: domain.F90,v 1.2 2002-05-29 13:37:50 gotm Exp $
#include "cppdefs.h"
!-----------------------------------------------------------------------
!BOP
......@@ -27,9 +27,9 @@
logical :: openbdy=.false.
integer :: calc_points
#ifdef STATIC
#include "static.h"
#include "static_domain.h"
#else
#include "dynamic_declarations.h"
#include "dynamic_declarations_domain.h"
#endif
integer :: nsbv
integer, parameter :: INNER= 1
......@@ -48,8 +48,11 @@
! Original author(s): Karsten Bolding & Hans Burchard
!
! $Log: domain.F90,v $
! Revision 1.1 2002-05-02 14:01:11 gotm
! Initial revision
! Revision 1.2 2002-05-29 13:37:50 gotm
! New naming of .h files
!
! Revision 1.1.1.1 2002/05/02 14:01:11 gotm
! recovering after CVS crash
!
! Revision 1.19 2001/10/23 14:15:55 bbh
! Moved ga from coordinates.F90 to domain.F90
......@@ -237,7 +240,7 @@
il = imin ; ih = imax ; jl = jmin ; jh = jmax
#ifndef STATIC
iimin = imin ; iimax = imax ; jjmin = jmin ; jjmax = jmax; kmax = kdum
#include "dynamic_allocations.h"
#include "dynamic_allocations_domain.h"
#endif
call get_bathymetry(H,Hland,il,ih,jl,jh,rc)
case default
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment