2 !
this should be placed at last part of the declaration
latitude latitude this system is used *****************************************************************! type coord sequence union map real z z in m endmap xyz map real ! latitude in deg is to the north ! longitude in deg is to the east *h ! height in m endmap llh map real ! polar angle ! azimuthal angle *radius ! radial distance endmap sph endunion character *sys ! which system xyz
block data cblkMuInt integer i ! Pair total X sec data(MuPrTX(i), i=1, 38)/1 0.431132E-02
! magnetic field component expressions ! this should be placed at last part of the declaration integer max_mag_types parameter(max_mag_types=3) character *4 mag_types(max_mag_types) data mag_types(1)/'xyz'/
! magnetic field component expressions ! this should be placed at last part of the declaration integer max_mag_types * mag_types(2)/'hva'/