Initial import

3 files changed, 126 insertions, 0 deletions

diff --git a/.SRCINFO b/.SRCINFO
new file mode 100644
index 000000000000..4adccfc6e98f
--- /dev/null
+++ b/.SRCINFO
@@ -0,0 +1,18 @@
+pkgbase = vis5d+
+	pkgdesc = A system for interactive visualization of large 5-D gridded data sets
+	pkgver = 1.2.1
+	pkgrel = 8
+	url = http://vis5d.sourceforge.net/
+	arch = i686
+	arch = x86_64
+	license = GPL
+	depends = netcdf
+	depends = xorg-server
+	depends = mesa
+	source = http://downloads.sourceforge.net/vis5d/vis5d+-1.2.1.tar.bz2
+	source = patch
+	md5sums = 15a8b09ba8ae57b753e724d0825e40c1
+	md5sums = a1d73b709e03ca09fe2ce5954ac4f914
+
+pkgname = vis5d+
+
diff --git a/PKGBUILD b/PKGBUILD
new file mode 100644
index 000000000000..1d8e8e279050
--- /dev/null
+++ b/PKGBUILD
@@ -0,0 +1,33 @@
+# Maintainer: Xavier Corredor <xavier.corredor.llano (a) gmail.com>
+# Contributor: dibblethewrecker dibblethewrecker.at.jiwe.dot.org
+# Contributor: jjbca
+
+pkgname=vis5d+
+pkgver=1.2.1
+pkgrel=8
+pkgdesc="A system for interactive visualization of large 5-D gridded data sets"
+url="http://vis5d.sourceforge.net/"
+license=("GPL")
+arch=('i686' 'x86_64')
+depends=('netcdf' 'xorg-server' 'mesa')
+source=("http://downloads.sourceforge.net/vis5d/$pkgname-$pkgver.tar.bz2" "patch")
+md5sums=('15a8b09ba8ae57b753e724d0825e40c1'
+         'a1d73b709e03ca09fe2ce5954ac4f914')
+
+build() {
+    cd $srcdir/$pkgname-$pkgver
+    patch -Np1 -i $srcdir/patch
+    export FC=gfortran 
+    export F77=gfortran 
+    export CFLAGS="$CFLAGS -fno-range-check" 
+    export FFLAGS="$FFLAGS -fno-range-check"
+    export CPPFLAGS="$CFLAGS -DUSE_INTERP_ERRORLINE -DUSE_INTERP_RESULT"
+    ./configure --prefix=/usr --with-netcdf=/usr/lib/ --with-x V5D_LIBS_AUX="/usr/include/" \
+    --with-Tcl_Eval=yes --with-mesa --enable-threads #--enable-gtk #--with-mixkit=/usr/lib
+    make
+}
+
+package() {
+    cd $srcdir/$pkgname-$pkgver
+    make DESTDIR=$pkgdir install
+}
\ No newline at end of file
diff --git a/patch b/patch
new file mode 100644
index 000000000000..8ab966726f93
--- /dev/null
+++ b/patch
@@ -0,0 +1,75 @@
+diff -Naur vis5d+-1.2.1//src/misc.c vis5d+-1.2.1_new//src/misc.c
+--- vis5d+-1.2.1//src/misc.c	2001-11-07 06:53:12.000000000 -0500
++++ vis5d+-1.2.1_new//src/misc.c	2010-10-16 23:26:10.000000000 -0500
+@@ -144,10 +144,10 @@
+ 
+ 
+ 
+-/*** round ************************************************************
++/*** roundv5d ************************************************************
+    Round off x to a 'nice' value.
+ **********************************************************************/
+-float round( float x )
++float roundv5d( float x )
+ {
+    float base, fudge;
+    int temp;
+@@ -273,7 +273,7 @@
+       ctx->Variable[var]->HSliceRequest->Interval = 0.0;
+    }
+    else {
+-      ctx->Variable[var]->HSliceRequest->Interval = round( (ctx->Variable[var]->MaxVal - ctx->Variable[var]->MinVal)
++      ctx->Variable[var]->HSliceRequest->Interval = roundv5d( (ctx->Variable[var]->MaxVal - ctx->Variable[var]->MinVal)
+                                         / 10.0 );
+    }
+ 
+@@ -309,7 +309,7 @@
+       ctx->Variable[var]->VSliceRequest->Interval = 0.0;
+    }
+    else {
+-      ctx->Variable[var]->VSliceRequest->Interval = round( (ctx->Variable[var]->MaxVal - ctx->Variable[var]->MinVal)
++      ctx->Variable[var]->VSliceRequest->Interval = roundv5d( (ctx->Variable[var]->MaxVal - ctx->Variable[var]->MinVal)
+                                         / 10.0 );
+    }
+ 
+diff -Naur vis5d+-1.2.1//src/misc.h vis5d+-1.2.1_new//src/misc.h
+--- vis5d+-1.2.1//src/misc.h	2001-11-07 06:53:12.000000000 -0500
++++ vis5d+-1.2.1_new//src/misc.h	2010-10-16 23:26:28.000000000 -0500
+@@ -37,7 +37,7 @@
+ 
+ extern void die( char *msg );
+ 
+-extern float round( float x );
++extern float roundv5d( float x );
+ 
+ extern int which( char *file, char *fullpath );
+ 
+diff -Naur vis5d+-1.2.1//src/work.c vis5d+-1.2.1_new//src/work.c
+--- vis5d+-1.2.1//src/work.c	2001-11-07 06:53:30.000000000 -0500
++++ vis5d+-1.2.1_new//src/work.c	2010-10-16 23:27:16.000000000 -0500
+@@ -6791,7 +6791,7 @@
+ 		  request->HighLimit = floor(request->HighLimit*factor)/(float) factor;
+ 		}
+ 	 }
+-	 request->Interval = round((request->HighLimit - request->LowLimit)/5.0);
++	 request->Interval = roundv5d((request->HighLimit - request->LowLimit)/5.0);
+ 	 
+   }
+ }
+--- vis5d+-1.2.1/util/kludge.f  2001-10-24 12:46:49.000000000 +0200
++++ vis5d+-1.2.1.new/util/kludge.f      2011-04-28 14:41:00.883619139 +0200
+@@ -51,9 +51,13 @@
+       SUBROUTINE GETDAY(I)
+       IMPLICIT INTEGER (A-Z)
+       INTEGER MTBL(12)
++      INTEGER TARRAY(3)
+       DATA MTBL/0,31,59,90,120,151,181,212,243,273,304,334/
+ C
+-      CALL IDATE(MON,IDAY,IYEAR)
++      CALL IDATE(TARRAY)
++      IDAY = TARRAY(1)
++      MON = TARRAY(2)
++      IYEAR = TARRAY(3)
+       IF (IDAY.LT.1.OR.IDAY.GT.31) RETURN
+       IF (MON.LT.1.OR.MON.GT.12) RETURN
+       IDDD=IDAY+MTBL(MON)
\ No newline at end of file