[Nek5000-users] nek5000 compilation - success!!

[stefanke]

Yes you PBS job file looks ok.
I will submit the fix to the repo.

Stefan

On Nov 26, 2009, at 6:16 PM, Tamay Ozgokmen wrote:

> 
> It worked!!! It is always a great feeling when that happens :)
> Thanks Stefan!! Really appreciate this!
> 
> So I need to run it now - I have a simple script (see below) that I
> submit with qsub, it should work, right?
> 
> sysx1:~/nek_examples/mli ozgokmen$ cat neks
> #!/bin/bash
> #PBS -lnodes=48:ppn=2
> #PBS -lwalltime=00:95:00
> #PBS -W group_list=tcf_user
> #PBS -q production_q
> #PBS -A vpit1010
> NUM_NODES=`/bin/cat $PBS_NODEFILE | /usr/bin/wc -l | /usr/bin/sed "s/ //g"`
> cd $PBS_O_WORKDIR
> export PATH=/nfs/software/bin:$PATH
> echo mli65-sgsd-p > SESSION.NAME
> echo `pwd`'/' >> SESSION.NAME
> rm -f logfile
> rm -f ioinfo
> 
> /bin/echo starting
> /bin/date
> /bin/echo
> 
> jmdrun  -np $NUM_NODES \
>  -hostfile $PBS_NODEFILE \
>  ./nek5000 &> mli65-sgsd-p.log
> 
> /bin/echo
> /bin/date
> /bin/echo ending
> 
> exit;
> 
> 
> 
> 
> 
> 
> On Nov 26, 2009, at 12:10 PM, stefanke wrote:
> 
>> #include <stdio.h>
>> #include <stdlib.h>
>> #include "jl/fname.h"
>> 
>> #define print_stack FORTRAN_NAME(print_stack, PRINT_STACK)
>> 
>> #if defined __GLIBC__
>> 
>> #include <execinfo.h>
>> /* Obtain a backtrace and print it to stdout. */
>> void print_stack(void)
>> {
>> void *bt[50];
>> int i;
>> int bt_size = backtrace(bt, 50);
>> char **symbols = backtrace_symbols(bt, bt_size);
>> 
>> printf ("backtrace(): obtained %d stack frames.\n", bt_size);
>> for (i=0; i<bt_size; i++) printf("%s\n", symbols[i]);
>> free (symbols);
>> }
>> #else
>> void print_stack(){};
>> #endif
> 
> 
>