/********************************************************************/ /* */ /* This header file was created at the UCLA Office of Academic */ /* computing. */ /* */ /* The University of California requires the following disclaimer */ /* concerning all distributed programs: */ /* */ /* Although this program material has been tested by its */ /* contributor, no warranty, expressed or implied, is made by the */ /* contributor or the University of California as to the accuracy */ /* and functioning of the program and related program material, nor */ /* shall the fact of the distribution constitute any such warranty, */ /* and no responsibility is assumed by the contributor or the */ /* University of California, in connection therewith. */ /* */ /********************************************************************/ #pragma linkage( DFPaddpal, FORTRAN ) #pragma linkage( DFPgetpal, FORTRAN ) #pragma linkage( DFPputpal, FORTRAN ) #pragma linkage( DFPnpals, FORTRAN ) #pragma linkage( DFPwriteref, FORTRAN ) #pragma linkage( DFPreadref, FORTRAN ) #pragma linkage( DFPrestart, FORTRAN ) #pragma linkage( DFPlastref, FORTRAN ) #pragma map( DFPaddpal, "DPAPAL" ) #pragma map( DFPgetpal, "DPGPAL" ) #pragma map( DFPputpal, "DPPPAL" ) #pragma map( DFPnpals, "DPNPALS" ) #pragma map( DFPwriteref, "DPWREF" ) #pragma map( DFPreadref, "DPRREF" ) #pragma map( DFPrestart, "DPREST" ) #pragma map( DFPlastref, "DPLREF" )