And you know what? You may have examples/f77_hbook/pawex10.kumac using mandel.f working if you have a fortran compiler! gopaw has the logic to do an on the fly compilation and loading of a FORTRAN file as the mandel.f.
If tuning properly the scripts:
<install_path>/gopaw/<version>/res/gopaw/scripts/sh/makf77dll
for Windows:
<install_path>\gopaw\<version>\res\gopaw\scripts\DOS\makf77dll.bat
passing examples/f77_hbook/pawex10.kumac should work. We have this feature working on macOS and centos7 by using gfortran. On an old Windows/XP, we have that working and we known that the plugin building found in makf77dll.bat works, but on our Windows-10 machines we do not have a FORTRAN compiler and then we had not been able to test all that.
IMPORTANT, IMPORTANT, IMPORTANT: as we do NOT have a hbook file reader, all the examples manipulating .hbook file do not work with gopaw.
The examples/f77_hbook/pawex10.kumac (original CERN-PAW version) is:
MACRO PAWEX10 1=100 ************************************************************************** * PAW TUTORIAL EXAMPLE 10 * * Calculate and plot (BOX option) Mandel distribution * ************************************************************************** Exec ALLDEF fun2 10 mandel.f [1] -2.4 .8 [1] -1.2 1.2 ' ' fortran/file 66 mandel.ps metafile 66 -111 hi/pl 10 BOX close 66 RETURN
and mandel.f:
*CMZ : 1.09/00 04/05/90 15.50.53 by Rene Brun
*-- Author :
REAL FUNCTION MANDEL(XP)
DIMENSION XP(2)
DATA NMAX/30/
X=XP(1)
Y=XP(2)
XX=0.
YY=0.
DO 30 N=1,NMAX
TT=XX*XX-YY*YY+X
YY=2.*XX*YY+Y
XX=TT
IF (4..LT.XX*XX+YY*YY) GO TO 1
30 CONTINUE
1 MANDEL=FLOAT(N)/FLOAT(NMAX)
END