sPhenix code displayed by LXR |
|
|
|
|||
File indexing completed on 2025-08-03 08:16:38
0001 FVOIDP FUNCTION HIJJET2_ADDRESS() 0002 0003 COMMON/HIJJET2/NSG,NJSG(900),IASG(900,3),K1SG(900,100), 0004 & K2SG(900,100),PXSG(900,100),PYSG(900,100), 0005 & PZSG(900,100),PESG(900,100),PMSG(900,100) 0006 SAVE /HIJJET2/ 0007 EXTERNAL HIDATA ! All that is required to force loading of BLOCK DATA 0008 FVOIDP GETADDR 0009 0010 HIJJET2_ADDRESS = GETADDR(NSG) 0011 0012 RETURN 0013 END
| [ Source navigation ] | [ Diff markup ] | [ Identifier search ] | [ general search ] |
|
This page was automatically generated by the 2.3.7 LXR engine. The LXR team |
|