blob: 620089d85184c2c8ab5fca2856fde3aff67fb884 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
|
***********************************************************
* * * *
* Input file : d2p_sap.x2m *
* Purpose : Test of non-regression with mco for fuel XS *
* Author(s) : J. TAFOREAU (2016) *
* * * *
***********************************************************
*----
* STRUCTURES, MODULES and PROCEDURES definitions
*----
MODULE UTL: D2P: END: ;
LINKED_LIST INFO XSL ;
*----
* NAME OF FILES GENERATED BY D2P: MODULE
*----
SEQ_ASCII XSLIB ;
XSM_FILE L_INFO :: FILE 'Info.xsm' ;
SEQ_ASCII D2PPROC :: FILE 'd2p_proc.x2m' ;
*----
* INFORMATIONS TO BE COMPLETED BY THE USER
*----
* CREATION OF SIGNATURES
INFO := UTL: :: CREA SIGNATURE 3 = 'L_IN' 'FO ' ' ' ;
XSL := XSLIB ;
D2PPROC INFO := D2P: INFO XSL ::
PHASE 1 EDIT 1
PKEY
CBOR ppmB
BARR AIC
TCOM TF
DMOD DCA
TMOD TCA
ENDPKEY
ADF DRA 1 'FD_B'
FUEL
BARR USER 1 0 ENDBARR
GRID USER GLOBAL ppmB 6 ENDGLOBAL
HELIOS
GENPMAXS
! 1 2 3 4 5 6 7 8 9 0 1 2 3 4
JOB_OPT T F F F F F F F F F F F F F
DERIVATIVE T
COMMENT 'FUEL SAP GRID CASE'
IUPS 0
PROC
MEMO
;
L_INFO := INFO ;
END: ;
QUIT .
|
