1 files changed, 58 insertions, 0 deletions
diff --git a/Donjon/data/d2p_sap.x2m b/Donjon/data/d2p_sap.x2m
new file mode 100644
index 0000000..620089d
--- /dev/null
+++ b/Donjon/data/d2p_sap.x2m
@@ -0,0 +1,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 .