Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- PKGBUILD:
- # Contributor: dibblethewrecker dibblethewrecker.at.jiwe.dot.org
- # Maintainer: (epsilom) Xavier Corredor <xavier.corredor.llano (a) gmail.com>
- pkgname=vis5d+
- pkgver=1.2.1
- pkgrel=4
- 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'
- 'f35aa4d904b83617a6020bbbd74eb254')
- build() {
- cd $startdir/src/$pkgname-$pkgver
- patch -Np1 -i ../../patch
- FC=gfortran F77=gfortran CFLAGS="$CFLAGS -fno-range-check" \
- FFLAGS="$FFLAGS -fno-range-check" \
- ./configure --prefix=/usr --with-netcdf=/usr/lib/ --with-x #--with-mixkit=/usr
- /lib
- make || return 1
- make DESTDIR=$startdir/pkg install
- }
- EOF
- patch:
- 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[va
- r]->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[va
- r]->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)
- EOF
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement