//JCABJESF  JOB TIME=(,45)                                                      
//   EXEC    FORTCLG,RG=8000K,LIBB='APP1.C370IBMN.LIBRARY'                      
//* *********************************************************                   
//* THIS IS A TEST JOB TO TEST THE DFSD LOAD MODULE FROM FORTRAN                
//* *********************************************************                   
//FORT.SYSIN   DD  DISP=OLD,DSN=JCABJES.HDF.TO.SD.FORT                          
//LKED.HDF  DD  DISP=SHR,DSN=JCABJES.HDF3.LOAD                                  
//LKED.SYSIN  DD  *                                                             
 INCLUDE  HDF(DFF,DFSDF)                                                        
//GO.INPUT   DD  DISP=OLD,DSN=JCABJES.TESTFILE.FLOAT.SINCOS