//INLIBR JOB 2010OT078,FINKELSTEIN,PRTY=4,CLASS=C,TIME=3,MSGCLASS=P 00000001 //* 1. LIBRARIES AND DATA SETS ARE FORMED (AT SPOOL1). 00000002 //* 2. INSTRUCTIONS ARE PRINTED. TAPE NAME = SSTR3 00000003 //* 3. INFORMATION FROM TAPE IS INTRODUCED INTO LIBRARIES. 00000004 //ORGTAPE PROC L=1,NT=SSTR3,P=A,BL=3200,POOL1=SPOOL1 00000005 // EXEC PGM=IEBGENER 00000006 //SYSPRINT DD SYSOUT=&P 00000007 //SYSUT1 DD UNIT=2400,VOL=SER=&NT,LABEL=(&L,NL), 00000008 // DCB=(RECFM=FB,LRECL=80,BLKSIZE=&BL),DISP=(OLD,KEEP) 00000009 //SYSUT2 DD UNIT=SYSDA,VOL=SER=&POOL1,DISP=(SHR,KEEP), 00000010 // DSN=USER78.LIBRARY.FORT 00000011 //SYSIN DD DUMMY 00000012 // PEND 00000013 //CREATE EXEC PGM=IEFBR14 00000014 //DD DD DSN=USER78.LIBRARY.FORT,DISP=(NEW,KEEP), 00000015 // SPACE=(TRK,(75,0,10)),VOL=SER=SPOOL1,UNIT=SYSDA, 00000016 // DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200,DSORG=PO) 00000017 //DD1 DD DSN=USER78.LIBRARY.LOAD,DISP=(NEW,KEEP), 00000018 // SPACE=(TRK,(35,0,10)),VOL=SER=SPOOL1,UNIT=SYSDA, 00000019 // DCB=(RECFM=UB,BLKSIZE=7294,DSORG=PO) 00000020 //DD2 DD DSN=USER78.DATINP1,DISP=(NEW,KEEP),VOL=SER=SPOOL1, 00000021 // UNIT=SYSDA,SPACE=(TRK,(8,0)), 00000022 // DCB=(RECFM=VS,LRECL=2768,BLKSIZE=800,DSORG=PS) 00000023 //DD3 DD DSN=USER78.DATINP2,DISP=(NEW,KEEP),VOL=SER=SPOOL1, 00000024 // UNIT=SYSDA,SPACE=(TRK,(1,0)), 00000025 // DCB=(RECFM=VS,LRECL=2768,BLKSIZE=800,DSORG=PS) 00000026 //CR1 EXEC ORGTAPE,L=1 00000027 //SYSUT2 DD SYSOUT=A 00000028 //SYSIN DD DUMMY 00000029 //CR2 EXEC ORGTAPE,L=2 00000030 //SYSUT2 DD SYSOUT=A 00000031 //SYSIN DD DUMMY 00000032 //CR3 EXEC ORGTAPE,L=3 00000033 //SYSIN DD * 00000034 GENERATE MAXNAME=4,MAXGPS=4 00000035 MEMBER NAME=FIAAMAIN 00000036 RECORD IDENT=(8,'END ',7) 00000037 MEMBER NAME=FIABDAT 00000038 RECORD IDENT=(8,'END ',7) 00000039 MEMBER NAME=FIADISC 00000040 RECORD IDENT=(8,'END ',7) 00000041 MEMBER NAME=FIAZP 00000042 //CR4 EXEC ORGTAPE,L=4 00000043 //SYSIN DD * 00000044 GENERATE MAXNAME=2,MAXGPS=2 00000045 MEMBER NAME=FIBAPRIM 00000046 RECORD IDENT=(8,'END ',7) 00000047 MEMBER NAME=FIBDATA 00000048 //CR5 EXEC ORGTAPE,L=5 00000049 //SYSUT2 DD DSN=USER78.LIBRARY.FORT(FIBENEST) 00000050 //SYSIN DD DUMMY 00000051 //CR6 EXEC ORGTAPE,L=6 00000052 //SYSIN DD * 00000053 GENERATE MAXNAME=2,MAXGPS=2 00000054 MEMBER NAME=FIBENSTA 00000055 RECORD IDENT=(8,'END ',7) 00000056 MEMBER NAME=FIBR1 00000057 //CR7 EXEC ORGTAPE,L=7 00000058 //SYSIN DD * 00000059 GENERATE MAXNAME=6,MAXGPS=6 00000060 MEMBER NAME=FILALPT1 00000061 RECORD IDENT=(8,'END ',7) 00000062 MEMBER NAME=FILEN 00000063 RECORD IDENT=(8,'END ',7) 00000064 MEMBER NAME=FILENBET 00000065 RECORD IDENT=(8,'END ',7) 00000066 MEMBER NAME=FILMLTV1 00000067 RECORD IDENT=(8,'END ',7) 00000068 MEMBER NAME=FILMLTV2 00000069 RECORD IDENT=(8,'END ',7) 00000070 MEMBER NAME=FILSCAL 00000071 //CR8 EXEC ORGTAPE,L=8 00000072 //SYSIN DD * 00000073 GENERATE MAXNAME=7,MAXGPS=7 00000074 MEMBER NAME=FINADAPT 00000075 RECORD IDENT=(8,'END ',7) 00000076 MEMBER NAME=FINASURF 00000077 RECORD IDENT=(8,'END ',7) 00000078 MEMBER NAME=FINKENST 00000079 RECORD IDENT=(8,'END ',7) 00000080 MEMBER NAME=FINKFMP 00000081 RECORD IDENT=(8,'END ',7) 00000082 MEMBER NAME=FINKIMMR 00000083 RECORD IDENT=(8,'END ',7) 00000084 MEMBER NAME=FINKMTV 00000085 RECORD IDENT=(8,'END ',7) 00000086 MEMBER NAME=FINKSCAL 00000087 //CR9 EXEC ORGTAPE,L=9 00000088 //SYSIN DD * 00000089 GENERATE MAXNAME=4,MAXGPS=4 00000090 MEMBER NAME=FINNADOP 00000091 RECORD IDENT=(8,'END ',7) 00000092 MEMBER NAME=FINNCORR 00000093 RECORD IDENT=(8,'END ',7) 00000094 MEMBER NAME=FINNMAXI 00000095 RECORD IDENT=(8,'END ',7) 00000096 MEMBER NAME=FINNPRED 00000097 //CR10 EXEC ORGTAPE,L=10 00000098 //SYSIN DD * 00000099 GENERATE MAXNAME=4,MAXGPS=4 00000100 MEMBER NAME=FIPREST 00000101 RECORD IDENT=(8,'END ',7) 00000102 MEMBER NAME=FIPRIN 00000103 RECORD IDENT=(8,'END ',7) 00000104 MEMBER NAME=FIPRINT 00000105 RECORD IDENT=(8,'END ',7) 00000106 MEMBER NAME=FIPRIN16 00000107 //CR11 EXEC ORGTAPE,L=11 00000108 //SYSIN DD * 00000109 GENERATE MAXNAME=2,MAXGPS=2 00000110 MEMBER NAME=FXINPUT2 00000111 RECORD IDENT=(8,'END ',7) 00000112 MEMBER NAME=FXINPUT1 00000113 //CR12 EXEC ORGTAPE,L=12 00000114 //SYSUT2 DD DSN=USER78.LIBRARY.FORT(DATINP1) 00000115 //CR13 EXEC ORGTAPE,L=13 00000116 //SYSUT2 DD DSN=USER78.LIBRARY.FORT(DATINP2) 00000117 //CR14 EXEC ORGTAPE,L=14,BL=80 00000118 //SYSIN DD * 00000119 GENERATE MAXNAME=5,MAXGPS=5 00000120 MEMBER NAME=INLIBR 00000121 RECORD IDENT=(8,'// ',1) 00000122 MEMBER NAME=FORTED 00000123 RECORD IDENT=(8,'// ',1) 00000124 MEMBER NAME=INP11 00000125 RECORD IDENT=(8,'// ',1) 00000126 MEMBER NAME=INP12 00000127 RECORD IDENT=(8,'// ',1) 00000128 MEMBER NAME=ALBTEST 00000129 //CR15 EXEC ORGTAPE,L=15 00000130 //SYSUT2 DD SYSOUT=A 00000131 //* 00000132 // 00000133 //FORTED JOB 2010OT078,FINKELSTEIN,TIME=10,PRTY=3,CLASS=C 00000001 //* FORTRAN COMPILATION - JOB EXAMPLE 00000002 //FORHCL PROC N=USER78,M=FI,P=A,FXPGM=PRMFORTH,V=SPOOL1 00000003 //FORT EXEC PGM=&FXPGM,REGION=200K,PARM='OBJ,NOTERM,MAP',DPRTY=(4,11) 00000004 //SYSPRINT DD SYSOUT=&P 00000005 //SYSLIN DD DSN=&&LOADSET,DISP=(MOD,PASS,DELETE),UNIT=SYSDA, 00000006 // SPACE=(80,(200,100),RLSE),DCB=BLKSIZE=80 00000007 //SYSIN DD DSN=&N..LIBRARY.FORT(&M),DISP=SHR,VOL=SER=&V,UNIT=SYSDA 00000008 //LKED EXEC PGM=IEWL,REGION=96K,PARM=(MAP,LIST,NCAL),COND=(4,LT,FORT), 00000009 // DPRTY=(4,11) 00000010 //SYSLMOD DD DSN=&N..LIBRARY.LOAD(&M),DISP=OLD,VOL=SER=&V,UNIT=SYSDA 00000011 //SYSPRINT DD SYSOUT=&P 00000012 //SYSUT1 DD DSN=&&SYSUT1,UNIT=SYSDA,SPACE=(1024,(20,10),RLSE), 00000013 // DCB=BLKSIZE=1024 00000014 //SYSLIN DD DSN=&&LOADSET,DISP=(OLD,DELETE) 00000015 // PEND 00000016 // EXEC FORHCL,M=FIAAMAIN 00000017 // EXEC FORHCL,M=FIABDAT 00000018 // EXEC FORHCL,M=FIADISC 00000019 // EXEC FORHCL,M=FIAZP 00000020 // EXEC FORHCL,M=FIBAPRIM 00000021 // EXEC FORHCL,M=FIBDATA 00000022 // EXEC FORHCL,M=FIBENEST,REGION=226K 00000023 // EXEC FORHCL,M=FIBENSTA 00000024 // EXEC FORHCL,M=FIBR1 00000025 // EXEC FORHCL,M=FILALPT1 00000026 // EXEC FORHCL,M=FILEN 00000027 // EXEC FORHCL,M=FILENBET 00000028 // EXEC FORHCL,M=FILMLTV1 00000029 // EXEC FORHCL,M=FILMLTV2 00000030 // EXEC FORHCL,M=FILSCAL 00000031 // EXEC FORHCL,M=FINADAPT 00000032 // EXEC FORHCL,M=FINASURF 00000033 // EXEC FORHCL,M=FINKENST 00000034 // EXEC FORHCL,M=FINKFMP 00000035 // EXEC FORHCL,M=FINKIMMR 00000036 // EXEC FORHCL,M=FINKMTV 00000037 // EXEC FORHCL,M=FINKSCAL 00000038 // EXEC FORHCL,M=FINNPRED 00000039 // EXEC FORHCL,M=FINNADOP 00000040 // EXEC FORHCL,M=FINNCORR 00000041 // EXEC FORHCL,M=FINNMAXI 00000042 // EXEC FORHCL,M=FIPREST 00000043 // EXEC FORHCL,M=FIPRIN 00000044 // EXEC FORHCL,M=FIPRINT 00000045 // EXEC FORHCL,M=FIPRIN16 00000046 // 00000047 //INP11 JOB '2010OT078','FINKELSTEIN',PRTY=3,CLASS=C,TIME=1,MSGCLASS=P 00000001 //* JOB EXAMPLE: INPUT OF PARAMETERS 'SETPAR' ('INPUT') -'ALB' SERVICE 00000002 //* FOR OS 00000003 // EXEC FORTGCLG,P=P,REGION.GO=130K 00000004 //FORT.SYSIN DD DSN=USER78.LIBRARY.FORT(FXINPUT1),DISP=SHR, 00000005 // VOL=SER=SPOOL1,UNIT=SYSDA 00000006 //GO.FT12F001 DD DSN=USER78.LIBRARY.FORT(DATINP1),DISP=SHR, 00000007 // LABEL=(,,,IN),VOL=SER=SPOOL1,UNIT=SYSDA 00000008 //GO.FT13F001 DD DSN=USER78.DATINP1,DISP=OLD, 00000009 // LABEL=(,,,OUT),VOL=SER=SPOOL1,UNIT=SYSDA 00000010 // 00000011 //INP12 JOB '2010OT078','FINKELSTEIN',PRTY=3,CLASS=C,TIME=1,MSGCLASS=P 00000001 //* JOB EXAMPLE: INPUT OF PARAMETERS 'SETPOT' ('INPUT2') -'ALB' SERVICE 00000002 //* FOR OS 00000003 // EXEC FORTGCLG,P=P,REGION.GO=70K 00000004 //FORT.SYSIN DD DSN=USER78.LIBRARY.FORT(FXINPUT2),DISP=SHR, 00000005 // VOL=SER=SPOOL1,UNIT=SYSDA 00000006 //GO.FT12F001 DD DSN=USER78.LIBRARY.FORT(DATINP2),DISP=SHR, 00000007 // LABEL=(,,,IN),VOL=SER=SPOOL1,UNIT=SYSDA 00000008 //GO.FT11F001 DD DSN=USER78.DATINP2,DISP=OLD, 00000009 // LABEL=(,,,OUT),VOL=SER=SPOOL1,UNIT=SYSDA 00000010 // 00000011 //ALBTEST JOB '2010OT078',FINKELSTEIN,TIME=3,CLASS=C,PRTY=3, 00000001 // MSGLEVEL=(1,1),MSGCLASS=P 00000002 //* JOB EXAMPLE - 'ALB' COMPLEX:'ALBEAL' - LINK EDITOR + COMPUTATION 00000003 //* FOR OS OVERLAY IS USED ** CONTROL LISTING ** 00000004 //ALB PROC N=USER78,FREGN=200K,P=A,POOL1=SPOOL1 00000005 //* LIBRARY NAMES: USER78.LIBRARY.LOAD , USER78.LIBRARY.FORT : SPOOL1 00000006 //* ARE PRESUMED : USER78.DATINP1 , USER78.DATINP2 ..........: SPOOL1 00000007 //* SYS1.FORTLIB 00000008 //LKED EXEC PGM=IEWL,REGION=96K,PARM='NOMAP,NOLIST,LET,OVLY' 00000009 //SYSPRINT DD SYSOUT=&P 00000010 //SYSLIB DD DSN=&N..LIBRARY.LOAD,DISP=SHR,UNIT=SYSDA,VOL=SER=&POOL1 00000011 // DD DSN=SYS1.FORTLIB,DISP=SHR 00000012 //LN DD DSN=&N..LIBRARY.LOAD,DISP=SHR,UNIT=SYSDA,VOL=SER=&POOL1 00000013 //SYSLMOD DD DSN=&&GOSET(GO),SPACE=(TRK,(70,2,1)),VOL=SER=&POOL1, 00000014 // UNIT=SYSDA,DISP=(NEW,PASS) 00000015 //SYSUT1 DD UNIT=SYSDA,SPACE=(1024,(200,20)) 00000016 //GO EXEC PGM=*.LKED.SYSLMOD,COND=(4,LT,LKED),REGION=&FREGN 00000017 //GO1 DD DSN=*.LKED.SYSLMOD,DISP=(OLD,DELETE) 00000018 //* CONTROL CARDS: (SEE BELOW) 00000019 //*T05F001 DD DSN=&N..LIBRARY.FORT(&EE),DISP=SHR, 00000020 //* VOL=SER=&POOL1,UNIT=SYSDA,LABEL=(,,,IN) 00000021 //* PROTEIN: (SEE BELOW) 00000022 //*T12F001 DD DSN=&N..LIBRARY.FORT(&PR),DISP=SHR, 00000023 //* VOL=SER=&POOL1,UNIT=SYSDA,LABEL=(,,,IN) 00000024 //* OUTPUT 00000025 //FT06F001 DD SYSOUT=&P 00000026 //*T06F001 DD VOL=SER=&POOL1,UNIT=SYSDA,DSN=USER78.TEST1, 00000027 //*SPACE=(TRK,(2,1),RLSE),LABEL=(,,,OUT),DISP=(NEW,KEEP,DELETE), 00000028 //*DCB=(BLKSIZE=1210,RECFM=FB,LRECL=121) 00000029 //* FILES FOR PARAMETER SETS (INPUT) 00000030 //FT11F001 DD DSN=USER78.DATINP2,DISP=SHR, 00000031 // VOL=SER=&POOL1,UNIT=SYSDA,LABEL=(,,,IN) 00000032 //FT13F001 DD DSN=USER78.DATINP1,DISP=SHR, 00000033 // VOL=SER=&POOL1,UNIT=SYSDA,LABEL=(,,,IN) 00000034 //* VIRTUAL MEMORY: DISC 00000035 //FT14F001 DD DSN=&WR,UNIT=SYSDA,VOL=SER=&POOL1,SPACE=(2000,(45,0)), 00000036 // DCB=(DSORG=DA,RECFM=VS,LRECL=2000),DISP=(NEW,DELETE,DELETE) 00000037 //* VIRTUAL MEMORY: TAPE OR DISC 00000038 //*T15F001 DD UNIT=2400,VOL=SER=SSTR1,DISP=(NEW,PASS), 00000039 //* LABEL=(1,SL),DCB=(RECFM=VS,LRECL=7200) 00000040 //FT15F001 DD DSN=&BR,UNIT=SYSDA,DCB=(DSORG=DA,RECFM=VS,LRECL=7200), 00000041 // SPACE=(TRK,(365,0,10)),DISP=(NEW,DELETE,DELETE),VOL=SER=&POOL1 00000042 //***** VIRTUAL MEMORY: DISC (FOR 'GLOBULA' ONLY) ******************* 00000043 //*T15F001 DD DSN=&BR,UNIT=SYSDA,DCB=(DSORG=DA,RECFM=VS,LRECL=7200), 00000044 //* SPACE=(TRK,(12,0,1)),DISP=(NEW,DELETE,DELETE),VOL=SER=&POOL1 00000045 // PEND 00000046 //STEP1 EXEC ALB 00000047 //* OVERLAY MODULE FOR 'ALB' COMPLEX 00000048 //LKED.SYSLIN DD * 00000049 INCLUDE LN(FIAAMAIN,FIABDAT,FIADISC,FIAZP) 00000050 OVERLAY A 00000051 INCLUDE LN(FIBAPRIM,FIBDATA) 00000052 OVERLAY A 00000053 INCLUDE LN(FIBENEST) 00000054 OVERLAY A 00000055 INCLUDE LN(FIBENSTA,FIBR1) 00000056 OVERLAY A 00000057 INCLUDE LN(FILALPT1,FILEN,FILENBET,FILMLTV1,FILMLTV2,FILSCAL) 00000058 OVERLAY A 00000059 INCLUDE LN(FINADAPT,FINASURF,FINKENST,FINKFMP,FINKIMMR) 00000060 INCLUDE LN(FINKMTV,FINKSCAL) 00000061 OVERLAY A 00000062 INCLUDE LN(FINNPRED,FINNADOP,FINNCORR,FINNMAXI) 00000063 OVERLAY A 00000064 INCLUDE LN(FIPREST,FIPRIN,FIPRINT,FIPRIN16) 00000065 //GO.FT12F001 DD * 00000066 TRYPSIN INHIBITOR 58 RPDFCLEPPYTGPCKARIIRYFYNAKAGLCQTFVYGGCRAKRNNFKSAEDCMRTCGGA PROTEINASE INHIBITOR TRYPSIN INHIBITOR BOVINE PANCREAS R.HUBER,D.KUKLA,A.RUEHLMANN,O.EPP,H.FORMANEK, J.DEISENHOFER,W.STEIGEMANN REFERENCE 1 J.DEISENHOFER,W.STEIGEMANN ACTA CRYSTALLOGR.,SECT.B V. 31 238 1975 1.5 A **SSBOND:5-55,14-38,30-51*CYSPRO:-* HET:-* = /* 00000080 //GO.FT05F001 DD * 00000081 1 2 3 4 5 6 7 8 /* 00000090 // 00000091