-
Notifications
You must be signed in to change notification settings - Fork 1
/
CSCRP045.FOR
12327 lines (11610 loc) · 546 KB
/
CSCRP045.FOR
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
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
!-----------------------------------------------------------------------
! CROPSIM CEREAL GROWTH AND DEVELOPMENT MODULE V4.5
! Last edit 27/06/10 LAH
!-----------------------------------------------------------------------
SUBROUTINE CSCROP (FILEIOIN, RUN, TN, RN, RNMODE, !Command line
& ISWWAT, ISWNIT, ISWDIS, MESOM, !Contols
& IDETS, IDETO, IDETG, IDETL, FROP, !Controls
& SN, ON, RUNI, REP, YEAR, DOY, STEP, CN, !Run+loop
& SRAD, TMAX, TMIN, TAIRHR, RAIN, CO2, TDEW, !Weather
& DRAIN, RUNOFF, IRRAMT, !Water
& DAYL, WINDSP, DEWDUR, CLOUDS, ST, EO, ES, !Weather
& NLAYR, DLAYR, DEPMAX, LL, DUL, SAT, BD, SHF, SLPF, !Soil states
& SNOW, SW, NO3LEFT, NH4LEFT, FERNIT, !H2o,N states
& TLCHD, TNIMBSOM, TNOXD, !NEW !N components
& TOMINFOM, TOMINSOM, TOMINSOM1, TOMINSOM2, TOMINSOM3,!N components
& YRPLT, HARVFRAC, !Pl.date
& PARIP, PARIPA, EOP, EP, ET, TRWUP, ALBEDOS, !Resources
& CAID, KCAN, KEP, !States
& RLV, NFP, RWUPM, RWUMX, CANHT, LAIL, LAILA, !States
& UNO3, UNH4, UH2O, !Uptake
& SENCALG, SENNALG, SENLALG, !Senescence
& RESCALG, RESNALG, RESLGALG, !Residues
& STGYEARDOY, GSTAGE, !Stage dates
& DYNAMIC) !Control
! For incorporation in CSM should:
! Ensure that Alt-plant routine:
! Sending control ISWDIS
! Sending DEWDUR(=-99.0?), CLOUDS(=0.0?), ES, ALBEDO(=0.2)
! Setting dummies for PARIP, PARIPA, LAIL, LAILA
! Eliminate '!' from SUMVALS call.
! Need to do something with metadata name if INH file
! And to run well in CSM should:
! Read ICIN (with -99 in profile) and ICSW variables
! Temporary changes .. need firming-up:
! Height increase on emergence day has initialisation value
! Thoughts about possible changes:
! 1. Phyllochron senescence delayed if low light interception
! 2. Leaf and stem N top-up reduced in stages 4 and 5 (NTUPF)
! Questions
! 1. What x-file information is essential to run
! Checks needed
! 1. Algorthms for fraction of day at changeovers
! 2. Blips in response curves and reasons for these
! 3 All declarations,initialisations to 0 or -99
! Changes for cassava
! 1 Product read-in from species file;product->harvest outputs
! 2 Stages read-in from species file
! 3. Temperature and water stress effects on specific leaf area
! 4. Leaf appearance rate reduction with leaf number
! 5. PTF parameters derived from root/shoot function
! 6. Memory water stress factor calculated from WFG->leaf area
! 7. Storage root initiation period introduced
! 8. Storage root number initiation parameter introduced
! 9. Storage root basic fraction parameter introduced
! 10. Photoperiod sensitivity type read-in from species file
! 11. Storage root N added
! 12. Protection of N supply for leaf growth added. (Problem
! with N on growth because lack of N->reduced growth->
! reduced uptake!
USE CRSIMDEF
IMPLICIT NONE
INTEGER,PARAMETER::MESSAGENOX=10 ! Messages to Warning.out
INTEGER,PARAMETER::DINX = 3 ! Disease number,maximum
INTEGER,PARAMETER::PSX = 20 ! Principal stages,maximum
INTEGER,PARAMETER::SSX = 20 ! Secondary stages,maximum
INTEGER,PARAMETER::PHSX = 5 ! Phyllochron stages,maximum
INTEGER,PARAMETER::KEYSTX = 9 ! Maximum number of key stages
INTEGER,PARAMETER::DCNX = 10 ! Disease control #,maximum
INTEGER,PARAMETER::LCNUMX=500 ! Maximum number of leaf cohorts
INTEGER,PARAMETER::LNUMX= 500 ! Maximum number of leaves/axis
INTEGER,PARAMETER::HANUMX= 40 ! Maximum # harvest instructions
INTEGER,PARAMETER::NL = 20 ! Maximum number of soil layers
INTEGER,PARAMETER::RUNINIT=1 ! Program initiation indicator
INTEGER,PARAMETER::SEASINIT=2 ! Reinitialisation indicator
INTEGER,PARAMETER::RATE = 3 ! Program rate calc.indicator
INTEGER,PARAMETER::INTEGR=4 ! Program update indicator
INTEGER,PARAMETER::OUTPUT=5 ! Program output indicator
INTEGER,PARAMETER::SEASEND= 6 ! Program ending indicator
CHARACTER(LEN=1),PARAMETER::BLANK = ' '
CHARACTER(LEN=3),PARAMETER::DASH = ' - '
!REAL,PARAMETER::PATM=101300.0! Pressure of air,Pa
!REAL,PARAMETER::SHAIR=1005.0 ! Specific heat of air,MJ/kg
!REAL,PARAMETER::SBZCON=4.903E-9 !Stefan Boltzmann,MJ/K4/m2/d
INTEGER ADAP ! Anthesis,days after planting d
REAL ADAPFR ! Anthesis DAP+fraction #
INTEGER ADAPM ! Anthesis,DAP,measured d
INTEGER ADAT ! Anthesis date (Year+doy) #
INTEGER ADATEND ! Anthesis end date (Year+doy) #
INTEGER ADATERR ! Anthesis date error d
INTEGER ADATM ! Anthesis date,measured #
REAL ADATT ! Anthesis date from t file YrDoy
REAL ADAYEFR ! Anthesis end,fraction of day #
REAL ADAYFR ! Anthesis,fraction of day #
INTEGER ADOY ! Anthesis day of year d
REAL AEDAPFR ! Anthesis end date (DAP+fr) #
INTEGER AEDAPM ! Anthesis end date,measured #
REAL AFLF(0:LNUMX) ! CH2O factor for leaf,average #
REAL AH2OROOTZONE ! Available h2o in root zone mm
REAL AH2OPROFILE ! Available H2o,profile mm
REAL ALBEDO ! Canopy+soil albedo fr
REAL ALBEDOS ! soil albedo fr
REAL AMTNIT ! Cumulative amount of N applied kg/ha
REAL AMTNITPREV ! Cumulative N,previous treatmnt kg/ha
REAL ANDEM ! Crop N demand kg/ha
REAL ANFER(200) ! N amount in fertilizer appln kg/ha
INTEGER ARGLEN ! Argument component length #
INTEGER ASTG ! Anthesis stage #
REAL AVGSW ! Average soil water in SWPLTD %
REAL AWNAI ! Awn area index m2/m2
REAL AWNS ! Awn score,1-10 #
REAL BASELAYER ! Depth at base of layer cm
REAL BD(20) ! Bulk density (moist) g/cm3
REAL CAID ! Canopy area index #
REAL CANHT ! Canopy height cm
REAL CANHTG ! Canopy height growth cm
REAL CANHTS ! Canopy height standard cm
REAL CARBO ! Ch2o available,phs+reserves g/p
REAL CARBOADJ ! Ch2o adjustment for LAI change g/p
REAL CARBOBEG ! Ch2o available,beginning day g/p
REAL CARBOBEGI ! Ch2o avail,internal co2 calc g/p
REAL CARBOBEGIA ! Ch2o avail,internal co2,adj #
REAL CARBOBEGP ! Ch2o avail,PARUE calculation g/p
REAL CARBOBEGR ! Ch2o avail,resistances calc g/p
REAL CARBOC ! Ch2o assimilated,cumulative g/p
REAL CARBOEND ! Ch2o available,end of day g/p
REAL CARBOENDI ! Ch2o avail,internal co2 calc g/p
REAL CARBOENDP ! Ch2o avail,PARUE calculation g/p
REAL CARBOENDR ! Ch2o avail,resistances calc g/p
REAL CARBOGF ! Ch2o grain fill g/p
INTEGER CARBOLIM ! Ch2o limited grain growth Days d
REAL CARBOLSD ! Ch2o used for leaves from seed g/p
REAL CARBOPM ! Ch2o available,>mature g/p
REAL CARBOR ! Ch2o available,roots g/p
REAL CARBORRS ! Ch2o to roots from reserves g/p
REAL CARBOT ! Ch2o available,tops g/p
REAL CARBOTMP ! Ch2o available,temporary value g/p
REAL CARBOTMPI ! Ch2o avail,internal co2 calc g/p
REAL CARBOTMPP ! Ch2o avail,PARUE calculation g/p
REAL CARBOTMPR ! Ch2o avail,resistances calc g/p
INTEGER CCOUNTV ! Counter for days after max lf# #
INTEGER CDAYS ! Crop cycle duration PVoCd
REAL CHFR ! Chaff growth rate,fr stem gr #
REAL CHPHASE(2) ! Chaff gr. start,etc.,stages #
REAL CHPHASEDU(2) ! Chaff gr. start,etc.,stages PVTt
REAL CHRSWAD ! Chaff reserves kg/ha
REAL CHRSWT ! Chaff reserves g/p
REAL CHTPC(10) ! Canopy ht % associated w LA% %
REAL CHWAD ! Chaff weight kg/ha
REAL CHWADOUT ! Chaff weight for output kg/ha
REAL CHWT ! Chaff weight g/p
REAL CLAPC(10) ! Canopy lf area % down to ht %
REAL CLOUDS ! Cloudiness factor,relative,0-1 #
INTEGER CN ! Crop component (multicrop) #
REAL CNAA ! Canopy N at anthesis kg/ha
REAL CNAAM ! Canopy N,anthesis,measured kg/ha
REAL CNAD ! Canopy nitrogen kg/ha
REAL CNADPREV ! Canopy nitrogen,previous day kg/ha
REAL CNADSTG(20) ! Canopy nitrogen,specific stage kg/ha
REAL CNAM ! Canopy N at maturity kg/ha
REAL CNAMERR ! Canopy N,maturity,error %
REAL CNAMM ! Canopy N,mature,measured kg/ha
REAL CNCTMP ! Canopy N concentration,temp %
INTEGER CNI ! Crop component,initial value #
REAL CNPCA ! Canopy N % at anthesis #
REAL CNPCMM ! Canopy N,maturity,measured %
REAL CO2 ! CO2 concentration in air vpm
REAL CO2AIR ! CO2 concentration in air g/m3
REAL CO2CC ! CO2 compensation conc (vpm) #
REAL CO2EX ! Exponent for CO2-phs function #
REAL CO2FP ! CO2 factor,photosynthesis #
REAL CO2FPI ! CO2 factor,phs,internal Co2 #
REAL CO2F(10) ! CO2 factor rel values 0-2 #
REAL CO2INT ! CO2 concentration,internal g/m3
REAL CO2INTPPM ! CO2 concentration,internal ppm
REAL CO2INTPPMP ! CO2 concentration,internal,prv ppm
REAL CO2MAX ! CO2 conc,maximum during cycle vpm
REAL CO2PAV(0:12) ! CO2 concentration in air g/m3
REAL CO2PC ! CO2 concentration,phase cumul ppm
REAL CO2RF(10) ! CO2 reference concentration vpm
INTEGER COLNUM ! Column number #
INTEGER CSIDLAYR ! Layer # output from function #
INTEGER CSTIMDIF ! Time difference function #
REAL CSVPSAT ! Vapour pressure function op mb
INTEGER CSYDOY ! Yr+Doy output from function #
INTEGER CSYEARDOY ! Year+Doy from function #
REAL CSYVAL ! Y value from function #
INTEGER CTRNUMPD ! Control # missing phases #
REAL CUMDEP ! Cumulative depth cm
REAL CUMDU ! Cumulative development units #
REAL CUMDULAG ! Cumulative DU lag phase #
REAL CUMDULF ! Cumulative DU during leaf ph #
REAL CUMDULIN ! Cumulative DU linear phase #
REAL CUMDUS ! Cumulative DU during stem ph #
REAL CUMSW ! Soil water in depth SWPLTD cm
REAL CUMTT ! Cumulative thermal times #
REAL CUMVD ! Cumulative vernalization days d
REAL CWAA ! Canopy weight at anthesis kg/ha
REAL CWAAM ! Canopy wt,anthesis,measured kg/ha
REAL CWAD ! Canopy weight kg/ha
INTEGER CWADCOL ! Column number for canopy wt #
REAL CWADPREV ! Canopy weight,previous day kg/ha
REAL CWADSTG(20) ! Canopy weight,particular stage kg/ha
REAL CWADT ! Canopy weight from t file kg/ha
REAL CWAHC ! Canopy weight harvested,forage kg/ha
REAL CWAHCM ! Canopy wt harvested,forage,mes kg/ha
REAL CWAM ! Canopy weight,maturity kg/ha
REAL CWAMERR ! Canopy weight,maturity,error %
REAL CWAMM ! Canopy wt,mature,measured kg/ha
REAL CWAN(HANUMX) ! Canopy wt minimum after harvst kg/ha
INTEGER DAE ! Days after emergence d
INTEGER DAP ! Days after planting d
INTEGER DAPCALC ! DAP output from funcion #
INTEGER DAS ! Days after start of simulation d
INTEGER DATE ! Date (Year+Doy) #
INTEGER DATECOL ! Date column number #
REAL DAYL ! Daylength,6deg below horizon h
REAL DAYLCAV ! Daylength (6deg) av for cycle h
REAL DAYLCC ! Daylength,cycle sum h.d
REAL DAYLPAV(0:12) ! Daylength (6deg) av for phase h
REAL DAYLPC ! Daylength (6deg),cumulative h
REAL DAYLPREV ! Daylength previous day h
REAL DAYLS(0:10) ! Daylength sensitivity,phase %/10h
REAL DAYLST(0:12) ! Daylength (6deg) at stage h
REAL DAYSUM ! Days accumulated in month #
INTEGER DCDAT(DCNX) ! Disease control application YrDoy
REAL DCDUR(DCNX) ! Disease control duration d
REAL DCFAC(DCNX) ! Disease control gr factor 0-1 #
INTEGER DCTAR(DCNX) ! Disease control target #
REAL DEADN ! Dead leaf N retained on plant g/p
REAL DEADNAD ! Dead N retained on plant kg/ha
REAL DEADWAD ! Dead weight retained on plant kg/ha
REAL DEADWAM ! Dead weight retained,maturity kg/ha
REAL DEADWAMM ! Dead weight retained,measured kg/ha
REAL DEADWT ! Dead leaf wt.retained or shed g/p
REAL DEADWTM ! Dead leaf wt.on plant,maturity g/p
REAL DEADWTR ! Dead leaf wt.retained on plant g/p
REAL DEADWTS ! Dead leaf wt.shed from plant g/p
REAL DEADWTSGE ! Dead weight rtained,stem g end g/p
REAL DEPMAX ! Maximum depth of soil profile cm
REAL DEWDUR ! Dew duration h
REAL DF ! Daylength factor 0-1 #
REAL DFNEXT ! Daylength factor,next phase #
REAL DFOUT ! Daylength factor for output #
REAL DFPE ! Development factor,pre-emerge #
REAL DGLF(LNUMX) ! Days during which leaf growing #
INTEGER DIDAT(DINX) ! Disease initiation date YrDoy d
INTEGER DIDOY(DINX) ! Disease infestation doy d
REAL DIFFACR(DINX) ! Dis favourability requirement #
REAL DIGFAC(DINX) ! Disease growth factor 0-1 #
REAL DLAYR(20) ! Depth of soil layers cm
REAL DLAYRTMP(20) ! Depth of soil layers with root cm
REAL DMP_EP ! Dry matter per unit EP g/mm
REAL DMP_ET ! Dry matter per unit ET g/mm
REAL DMP_Irr ! Dry matter per unit irrigation g/mm
REAL DMP_NApp ! Dry matter per unit N applied kg/kg
REAL DMP_NUpt ! Dry matter per unit N taken uo kg/kg
REAL DMP_Rain ! Dry matter per unit water g/mm
INTEGER DOM ! Day of month #
INTEGER DOY ! Day of year d
INTEGER DOYCOL ! Day of year column number #
REAL DRAIN ! Drainage from soil profile mm/d
REAL DRAINC ! Drainage from profile,cumulat mm
INTEGER DRDAT ! Double ridges date #
INTEGER DRDATM ! Double ridges date,measured #
REAL DRF1 ! Double ridges factor 1 #
REAL DRF2 ! Double ridges factor 2 #
REAL DRF3 ! Double ridges factor 3 #
REAL DRSTAGE ! Double ridges stage #
REAL DSTAGE ! Develoment stage,linear #
REAL DTRY ! Effective depth of soil layer cm
REAL DU ! Developmental units PVC.d
REAL DUL(20) ! Drained upper limit for soil #
REAL DULAG ! Developmental units,lag phase PVC.d
REAL DULF ! Development time,leaves C.d
REAL DULFNEXT ! Development time,leaves,next oCd
REAL DULIN ! Developmental units,linear ph PVC.d
REAL DUNEED ! Developmental units needed ph PVC.d
REAL DUPHASE ! Development units,current ph PVoCd
REAL DUPNEXT ! Development units,next phase PVoCd
REAL DUTOMSTG ! Developmental units,germ->mat Du
REAL DWRPH ! Reained dead wt harvested g/p
REAL DWRPHC ! Reained dead wt harvested,cum g/p
INTEGER DYNAMIC ! Program control variable #
INTEGER DYNAMICPREV ! Program control varbl,previous #
REAL EARLYN ! Leaf # for early N switch #
REAL EARLYW ! Leaf # for early h20 switch #
INTEGER ECSTG ! End crop stage #
INTEGER EDAP ! Emergence DAP d
REAL EDAPFR ! Emergence DAP+fraction #
INTEGER EDAPM ! Emergence DAP measured #
INTEGER EDATM ! Emergence date,measured (Afle) #
INTEGER EDATMX ! Emergence date,measured (YrDy) #
REAL EDAYFR ! Emergence day fraction #
INTEGER EMDATERR ! Emergence date error d #
REAL EMRGFR ! Fraction of day > emergence #
REAL EMRGFRPREV ! Fraction of day > em,previous #
REAL EO ! Potential evaporation mm/d
REAL EOC ! Potential evap,cumulative mm
REAL EOEBUD ! Potential evap,Ebudget mm/d
REAL EOEBUDC ! Potential evap,Ebudget,cumulat mm
REAL EOEBUDCRP ! Potential evaporation,crop mm/d
REAL EOEBUDCRP2 ! Potential evaporation,crop mm/d
REAL EOMPEN ! Potential evap,Penman mm/d
REAL EOMPENC ! Potential evap,Penman,cum mm
REAL EOP ! Potential evaporation,plants mm/d
REAL EOP330 ! Potential tp,full cover,330ppm mm/d
REAL EOPCO2 ! Potential tp,full cover,xppm mm/d
REAL EOPEN ! Potential evaporation,cumulatv mm/d
REAL EOPENC ! Potential evaporation,cumulatv mm
REAL EOPT ! Potential evaporation,cumulatv mm/d
REAL EOPTC ! Potential evaporation,cumulatv mm
REAL EOSOIL ! Potential evaporation,no cover mm/d
REAL EP ! Transpiration daily mm/d
REAL EPCC ! Transpiration cycle sum mm
REAL EPPC(0:12) ! Transpiration cycle sum mm
REAL EPSRATIO ! Function,plant/soil evap rate #
INTEGER ERRNUM ! Error number from compiler #
REAL ERRORVAL ! Plgro-tfile values/Plgro #
REAL ES ! Actual soil evaporation rate mm/d
REAL ET ! Evapotranspiration daily mm/d
REAL ETCC ! Evapotranspiration cycle sum mm
REAL ETPC(0:12) ! Evapotranspiration phase sum mm
INTEGER EVALOUT ! Evaluate output lines for exp #
INTEGER EVHEADNM ! Number of headings in ev file #
INTEGER EVHEADNMMAX ! Maximum no headings in ev file #
REAL EWAD ! Ear weight kg/ha
INTEGER EYEARDOY ! Emergence Year+DOY #
REAL FAC(20) ! Factor ((mg/Mg)/(kg/ha)) #
INTEGER FAPPNUM ! Fertilization application number
INTEGER FDAY(200) ! Dates of fertilizer appn (YrDoy)
REAL FERNIT ! Fertilizer N applied kg/ha
REAL FERNITPREV ! Fertilizer N applied to ystday kg/ha
INTEGER FILELEN ! Length of file name #
INTEGER FLDAP ! Final leaf date Yrdoy
REAL FLN ! Final leaf # #
REAL FLNAITKEN ! Final leaf #,AIKEN formula #
REAL FNH4 ! Unitless ammonium supply index #
REAL FNO3 ! Unitless nitrate supply index #
INTEGER FNUMERA ! File number,A-data errors #
INTEGER FNUMERR ! File number,error file #
INTEGER FNUMERS ! File number,A-data error summary
INTEGER FNUMERT ! File number,T-data errors #
INTEGER FNUMEVAL ! Number used for evaluate op #
INTEGER FNUMLVS ! File number,leaves #
INTEGER FNUMMEAS ! Number used for measured data #
!INTEGER FNUMMETA ! File number,metadata file #
INTEGER FNUMOV ! Number used for overview op #
INTEGER FNUMPHA ! File number,phases #
INTEGER FNUMPHEM ! File number,phenology,measured #
INTEGER FNUMPHES ! File number,phenology,simulate #
INTEGER FNUMPREM ! File number,measured responses #
INTEGER FNUMPRES ! File number,simulated response #
INTEGER FNUMPSUM ! Number used for plant summary #
INTEGER FNUMREA ! File number,reads.out file #
INTEGER FNUMT ! Number used for T-file #
INTEGER FNUMTMP ! File number,temporary file #
INTEGER FNUMWRK ! File number,work file #
INTEGER FROP ! Frquency of outputs,as sent d
INTEGER FROPADJ ! Frquency of outputs,adjusted d
REAL FSDU ! Rstage when final sen started PVoCd
REAL FSOILH2O ! Final soil water cm
REAL FSOILN ! Final soil inorganic N kg/ha
REAL G2A(0:3) ! Grain growth rate,adjusted mg/du
REAL G3 ! Cultivar coefficient,stem wt g
INTEGER GDAP ! Germination DAP d
REAL GDAPFR ! Germination DAP+fr #
INTEGER GDAPM ! Germination DAP,measured #
INTEGER GDATM ! Germination date,measured #
REAL GDAYFR ! Fraction of day to germination #
REAL GEDAYSE ! Period germination->emergence d
REAL GEDAYSG ! Period planting->germination d
REAL GERMFR ! Fraction of day > germination #
REAL GESTAGE ! Germination,emergence stage #
REAL GESTAGEPREV ! Germ,emerg stage,previous day #
REAL GEUCUM ! Cumulative germ+emergence unit #
REAL GFDAPFR ! Grain filling start DAP+fr #
INTEGER GFDAPM ! Grain filling date,measured #
REAL GFDAT ! Grain filling start DAP #
REAL GFDUR ! Linear grain fill duration d
REAL GGPHASE(4) ! Grain set start,etc.,stages #
REAL GGPHASEDU(4) ! Grain set start,etc.,stages PVTt
REAL GLIGP ! Grain lignin content %
REAL GNAD ! Grain N kg/ha
REAL GNAM ! Grain N at maturity kg/ha
REAL GNAMM ! Harvest N,mature,measured kg/ha
REAL GNOAD ! Grains per unit area #/m2
REAL GNOAM ! Grains per unit area,maturity #/m2
REAL GNOAMM ! Grain #,mature,measured #/m2
REAL GNOGM ! Grains/tiller (group),maturity #/gr
REAL GNOGMM ! Grain#/group,mature,measured #/gr
REAL GNONADJ ! Grain # N stress adj.factor #
REAL GNONF ! Grain # N stress adj.factor %
REAL GNOPD ! Grains per plant #/p
REAL GNOPM ! Grains per plant,maturity #/p
REAL GNOWADJ ! Grain # H2O stress adj.factor #
REAL GNOWF ! Grain # H2O stress adj.factor %
REAL GNOWS ! Cultivar coefficient,grain # #/g
REAL GNOWTM ! Grains/non-grain wt,maturity #/g
REAL GNPCM ! Harvest N%,maturity %
REAL GNPCMM ! Harvest N,mature,measured %
REAL GNPH ! Grain N harvested g/p
REAL GNPHC ! Grain N harvested,cumulative g/p
REAL GPLASENF ! Green leaf area,final sen strt #
REAL GRAINANC ! Grain N concentration,fr #
REAL GRAINN ! Grain N g/p
REAL GRAINNDEM ! N demand for grain filling g/p
REAL GRAINNDEMLSR ! Grain N demand,leaves+stem+rt g/p
REAL GRAINNGL ! Grain N growth from leaves g/p
REAL GRAINNGR ! Grain N growth from roots g/p
REAL GRAINNGRS ! Reserves N use for grain g/p
REAL GRAINNGS ! Grain N growth from stems g/p
REAL GRAINNGU ! Grain N growth,uptake g/p
REAL GRAINNTMP ! Grain N,temporary value g/p
REAL GRNMN ! Grain N minimum conc,% #
REAL GRNMX ! Grain N,maximum conc,% #
REAL GRNS ! Grain N standard conc,% #
REAL GROCH ! Chaff growth rate g/p
REAL GROCHFR ! Chaff growth rate,fraction st #
REAL GROGR ! Grain growth g/p
REAL GROGRA ! Grain growth,current assim g/p
REAL GROGRP ! Grain growth potential g/p
REAL GROGRPA ! Grain growth,possible,assim g/p
REAL GROGRRS ! Grain growth,from reserves g/p
REAL GROLF ! Leaf growth rate g/p
REAL GROLFP ! Leaf growth,potential g/p
REAL GROLFRS ! Leaf growth from reserves g/p
REAL GROLFRT ! Leaf growth from root d matter g/p
REAL GROLFRTN ! Leaf N growth from root N g/p
REAL GROLS ! Leaf+stem growth g/p
REAL GROLSP ! Leaf+stem growth potential g/p
REAL GRORS ! Reserves growth g/p
REAL GRORSGR ! Reserves gr,unused grain assim g/p
REAL GRORSPM ! Reserves growth,post-maturity g/p
REAL GRORSPRM ! Reserves growth,pre-maturity g/p
REAL GROSR ! Storage root growth g/p
REAL GROST ! Stem growth rate g/p
REAL GROSTP ! Stem growth potential g/p
REAL GROSTPSTORE ! Stem growth potential,previous g/p
REAL GRP_ET ! Harvest product per unit water g/mm
REAL GRP_Rain ! Harvest product per unit water g/mm
REAL GRWT ! Grain weight g/p
REAL GRWTM ! Grain weight at maturity g/p
REAL GRWTSGE ! Grain weight,stem growth end g/p
REAL GRWTTMP ! Grain weight,temporary value g/p
REAL GSTAGE ! Growth stage #
INTEGER GSTDCOL ! Growth stage column number #
REAL GWAD ! Grain weight kg/ha
REAL GWAHM ! Grain weight,harvest,measured kg/ha
REAL GWAM ! Grain weight,maturity kg/ha
REAL GWAMM ! Grain weight,maturity,measured kg/ha
REAL GWEFR ! Grain weight end lag,fraction #
REAL GWLFR ! Grain weight end lag,fraction #
REAL GWPH ! Grain wt harvested g/p
REAL GWPHC ! Grain wt harvested,cumulative g/p
REAL GWTA ! Cultivar coeff,gr.wt.adjusted mg
REAL GWTAA ! Grain weight adjustment,above %/g
REAL GWTAS ! Cultivar coeff,gr.wt.adj.sress mg
REAL GWTAT ! Grain weight adj threshold g/p
REAL GWTCF ! Grain wt compensation factor #
REAL GWTS ! Cultivar coefficient,grain wt mg
REAL GWUD ! Grain size g
REAL GWUDELAG ! Grain size,end lag period g
REAL GWUM ! Grain size,maturity g
REAL GWUMM ! Grain wt/unit,mat,measured g
INTEGER GYEARDOY ! Germination Year+DOY #
REAL GrP_EP ! Harvest product per unit EP g/mm
REAL GrP_Irr ! Harvest dm per unit irrigation g/mm
REAL GrP_NApp ! Harvest dm per unit N appllied kg/kg
REAL GrP_NUpt ! Harvest dm per unit N taken up kg/kg
REAL H2OA ! Water available in root zone mm
REAL H2OPROFILE ! Total h2o in soil profile mm
REAL H2OROOTZONE ! Total h2o in root zone mm
INTEGER HADOY ! Harvest day of year d
REAL HAFR ! Harvested fraction kg/ha
REAL HAMT(HANUMX) ! Harvest amount #
INTEGER HANUM ! Harvest instruction number #
REAL HARDAYS ! Accumulated hardening days #
REAL HARDILOS ! Hardening index loss #
REAL HARVFRAC(2) ! Harvest fraction as brought in #
REAL HAWAD ! Harvested weight (grazing,etc) kg/ha
INTEGER HAYEAR ! Harvest year #
REAL HBPC(HANUMX) ! Harvest by-product percentage #
REAL HBPCF ! Harvest by-product %,final #
INTEGER HDOYF ! Earliest doy for harvest #
INTEGER HDOYL ! Last doy for harvest #
REAL HDUR ! Hardening duration,days d
INTEGER HFIRST ! Earliest date for harvest #
REAL HIAD ! Harvest index,above ground #
INTEGER HIADCOL ! Harvest index column number #
REAL HIADT ! Harvest index from t file #
REAL HIAM ! Harvest index,above ground,mat #
REAL HIAMERR ! Harvest index,maturity,error %
REAL HIAMM ! Harvest index,mature,measure #
REAL HIAMMTMP ! Harvest index,mature,temporary #
REAL HIND ! Harvest index,N,above ground #
REAL HINM ! Harvest index,N,abground,mat #
REAL HINMM ! Harvest N index,mature,meas %
INTEGER HLAST ! Last date for harvest #
REAL HLOSSFR ! Fraction hardiness days lost fr
REAL HLOSSTEMP ! Temp threshold,hardiness loss C
REAL HMPC ! Harvest moisture percent,std.. #
REAL HNAD ! Product N kg/ha
REAL HNAM ! Grain N at maturity kg/ha
REAL HNAMERR ! Harvest N,error %
REAL HNAMM ! Harvest N,mature,measured kg/ha
REAL HNC ! Product N concentration,fr #
REAL HNPCM ! Harvest N%,maturity %
REAL HNPCMERR ! Harvest N%,error %
REAL HNPCMM ! Harvest N,mature,measured %
INTEGER HNUMACOL ! Harvest number per area column #
REAL HNUMAD ! Harvest product#/unit area #/m2
REAL HNUMAERR ! Harvest #,maturity,error %
REAL HNUMAM ! Harvest no/area,maturity #/m2
REAL HNUMAMM ! Harvest no/area,mature,measure #/m2
REAL HNUMAT ! Harvest number/area,t file #/m2
INTEGER HNUMBER ! Number of harvest instructions #
INTEGER HNUMECOL ! Harvest number per ear column #
REAL HNUMET ! Harvest number/ear,t file #/s
REAL HNUMGERR ! Harvest #/group,error %
REAL HNUMGM ! Harvest #,mature #/g
REAL HNUMGMM ! Harvest #,mature,measured #/g
REAL HNUMPM ! Product# per plant,maturity #/p
REAL HNUMPMM ! Product #,mature,measured #/p
REAL HPC(HANUMX) ! Harvest percentage %
REAL HPCF ! Harvest percentage,final %
REAL HPRODN ! Harvest product N g/p
REAL HSTAGE ! Hardening stage 0-1 #
INTEGER HSTG ! Harvest maturity stage #
REAL HWAD ! Product weight kg/ha
INTEGER HWADCOL ! Product wt column number #
REAL HWADT ! Harvest weight from t file kg/ha
REAL HWAHERR ! Harvest wt,harvest,error %
REAL HWAHM ! Harvest wt,harvest,measured kg/ha
REAL HWAM ! Harvest product wt.,maturity kg/ha
REAL HWAMM ! Harvest product wt.,measured kg/ha
INTEGER HWTUCOL ! Harvest weight per unit column #
REAL HWUD ! Harvest wt/unit g
REAL HWUM ! Harvest product size,maturity g
REAL HWUMERR ! Grain wt per unit error %
REAL HWUMM ! Hprod wt/unit,mat,measured g
REAL HWUMYLD ! Harest wt,mature,calculated g/#
REAL HWUT ! Product weight/unit,t file mg
REAL HYAMM ! Harvest product,msured,std.h2o kg/ha
INTEGER HYEARDOY(HANUMX)! Dates of harvest operations #
INTEGER HYEARF ! Earliest year for harvest #
INTEGER HYEARL ! Last year for harvest #
INTEGER HYRDOY(HANUMX)! Dates of harvest operations #
INTEGER I ! Loop counter #
REAL ICWT ! Initial water table depth cm
INTEGER IDETGNUM ! Number of times into IDETG #
INTEGER IESTG ! Inflorescence emergence stage #
REAL IRRAMT ! Irrigation amount for today mm
REAL IRRAMTC ! Irrigation amount,cumulative mm
REAL ISOILH2O ! Initial soil water cm
REAL ISOILN ! Initial soil inorganic N kg/ha
REAL KCAN ! Extinction coeff for PAR #
REAL KCANI ! Extinction coeff,PAR,init.val. #
REAL KEP ! Extinction coeff for SRAD #
REAL KEPI ! Extinction coeff,SRAD,init val #
INTEGER KEYPS(KEYSTX) ! Principal key stage number #
INTEGER KEYPSNUM ! Principal key stage total # #
INTEGER KEYSS(KEYSTX) ! Secondary key stage number #
INTEGER KEYSSNUM ! Secondary key stage total # #
INTEGER L ! Loop counter #
INTEGER L1 ! Loop counter #
INTEGER L2 ! Loop counter #
REAL LA1S ! Area of leaf 1,standard cm2
REAL LAFNO ! Leaf # (one axis),final area #
REAL LAFR ! Leaf area increase factor,rep #
REAL LAFS ! Leaf area/all nodes,final cm2
REAL LAFST ! Leaf area factor change stage #
REAL LAFSTDU ! Leaf area factor change st,DU #
REAL LAFSWITCH ! Leaf # changed increase factor #
REAL LAFV ! Leaf area increase factor,veg #
REAL LAGE(0:LNUMX) ! Leaf age at leaf position C.d
REAL LAGEG(0:LNUMX)! Leaf age increment C.d
REAL LAGEP(0:LNUMX)! Leaf age (phyllochrons),lf pos #
REAL LAI ! Leaf area index #
REAL LAIA ! Leaf area index,active #
INTEGER LAIDCOL ! Leaf area index column #
REAL LAIL(30) ! Leaf area index by layer m2/m2
REAL LAILA(30) ! Leaf area index,active,by layr m2/m2
REAL LAIPREV ! Leaf area index,previous day #
REAL LAIPROD ! Leaf area index produced #
REAL LAISTG(20) ! Leaf area index,specific stage #
REAL LAIX ! Leaf area index,maximum #
REAL LAIXERR ! Leaf area index,max,error %
REAL LAIXM ! Lf lamina area index,mx,meas m2/m2
REAL LAIXT ! Leaf area index,max,t-file m2/m2
REAL LAIXX ! Leaf area index,max posible #
REAL LANC ! Leaf actual N concentration #
REAL LANCRS ! Leaf N concentration,+reserves #
REAL LAP(0:LNUMX) ! Leaf area at leaf position cm2/p
REAL LAPD ! Leaf area (green) per plant cm2
REAL LAPH ! Leaf area (green) harvested cm2/d
REAL LAPHC ! Leaf area (green) harvested,cu cm2/p
INTEGER LAPOTCHG ! Leaf area gr pot,increment chg cm2/p
REAL LAPOTX(LNUMX) ! Leaf area potentials,maxima cm2/l
REAL LAPOTXCHANGE ! Leaf area potential,changover cm2/l
REAL LAPP(LNUMX) ! Leaf area diseased,leaf posn cm2/p
REAL LAPS(LNUMX) ! Leaf area senesced,leaf posn cm2/p
REAL LAPSTMP ! Leaf area senesced,temporary cm2/p
REAL LATL(1,LNUMX) ! Leaf area,tiller1,leaf pos cm2/l
REAL LAWCF ! Leaf area/wt change,fr.st fr
REAL LAWFF ! Leaf area/wt flexibility,fr.st fr
REAL LAWL(2) ! Area to wt ratio,n=youngest lf cm2/g
REAL LAWS ! Leaf area/wt ratio,standard cm2/g
REAL LAWTR ! Leaf area/weight,temp response fr/C
REAL LAWTS ! Leaf area/weight,temp standard C
REAL LAWWR ! Leaf area/weight,water response fr
REAL LAXNO ! Leaf # (one axis),maximum area #
REAL LAXS ! Area of biggest leaf,main stem cm2
INTEGER LCNUM ! Leaf cohort number (inc.grow) #
REAL LCOA(LCNUMX) ! Leaf cohort area cm2
REAL LCOAS(LCNUMX) ! Leaf cohort area senesced cm2
REAL LEAFN ! Leaf N g/p
INTEGER LENDIS ! Length,ISWDIS flag #
INTEGER LENENAME ! Length,experiment description #
INTEGER LENGROUP ! Length of group name #
INTEGER LENLINE ! Length of character string #
INTEGER LENLINESTAR ! Length of character string #
INTEGER LENRNAME ! Length of run description #
INTEGER LENTNAME ! Length,treatment description #
REAL LFENDFR ! Fraction of day leaves growint #
REAL LFGSDU ! Leaf growth start,d.units #
REAL LFWAA ! Leaf weight at anthesis g/m2
REAL LFWAAM ! Leaf weight,anthesis,measured g/m2
REAL LFWT ! Leaf weight g/p
REAL LFWTA ! Leaf weight,anthesis g/p
REAL LFWTAE ! Leaf weight,anthesis end g/p
REAL LFWTM ! Leaf weight,maturity g/p
REAL LFWTSGE ! Leaf weight,stem growth end g/p
REAL LGPHASE(2) ! Leaf growth phase start,end #
REAL LGPHASEDU(2) ! Leaf growth phase,start,end Du
INTEGER LINENUM ! Line number in RMSE values #
REAL LL(20) ! Lower limit,soil h2o #
REAL LLIFA ! Leaf life duration,active,phyl #
REAL LLIFATT ! Leaf life duration,active C.d
REAL LLIFEG(0:LNUMX) ! Leaf expansion growth,phyll #
REAL LLIFG ! Leaf growth phase,phyll #
REAL LLIFGTT ! Leaf growth phase C.d
REAL LLIFS ! Leaf senescence duration phyl
REAL LLIFSTT ! Leaf senescence duration,Ttime C.d
REAL LLIGP ! Leaf lignin percentage #
REAL LLNAD ! Leaf lamina nitrogen kg/ha
REAL LLOSA ! Leaf area loss,accelerated sen fr
REAL LLRSWAD ! Leaf lamina reserves weight kg/ha
REAL LLRSWT ! Leaf lamina reserves g/p
INTEGER LLSTG ! Last leaf fully expanded stage #
REAL LLWAD ! Leaf lamina weight kg/ha
REAL LLWADOUT ! Leaf lamina weight for output kg/ha
REAL LNCGL ! N concentration,growth,lower fr
REAL LNCGU ! N concentration,growth,upper fr
REAL LNCM ! Leaf N conc,minimum fr
REAL LNCMN(0:1) ! Leaf N conc,minimum fr
REAL LNCPL ! Leaf N concentration,phs,lower fr
REAL LNCPU ! Leaf N concentration,phs,upper fr
REAL LNCR ! Leaf N relative to maximum #
REAL LNCSEN ! N conc.for senescence fr
REAL LNCSENF ! Leaf N con,senescence,final fr
REAL LNCTL ! Leaf N conc,tillering,lower fr
REAL LNCTU ! Leaf N conc,tillering,upper fr
REAL LNCX ! Leaf N conc,maximum fr
REAL LNCXS(0:1) ! Leaf N conc,maximum,stage fr
REAL LNDEM ! Leaf demand for N g/p
REAL LNGU ! Leaf N supplied from uptake g/p
REAL LNPCMN(0:1) ! Leaf N conc,minimum %
REAL LNPCS(0:1) ! Leaf N conc,standard,stage %
REAL LNPH ! Leaf N harvested g/p
REAL LNPHC ! Leaf N harvested,cumulative g/p
REAL LNUM ! Leaf number,Haun stage #
INTEGER LNUMCOL ! Leaf number column #
REAL LNUMEND ! Leaf number,Haun stage,end day #
REAL LNUMG ! Leaf number increase per day #
REAL LNUMNEED ! Leaf # stage to start new leaf #
REAL LNUMPREV ! Leaf number,Haun stage #
REAL LNUMSERR ! Leaf #,error %
INTEGER LNUMSG ! Leaf number produced on axis #
REAL LNUMSM ! Leaf #/shoot,Haun,maturity #
REAL LNUMSMM ! Leaf #,mature,measured #/s
REAL LNUMSTG(20) ! Leaf number,specific stage #
REAL LNUMT ! Leaf number from t file #
REAL LNUMTS ! Leaf number,terminal spikelet #
REAL LNUSE(0:3) ! Leaf N use,overall and parts g
REAL LRETS ! Stage --> dead leaves retained #
REAL LRETSDU ! Stage --> dead leaves retained PVoCd
INTEGER LRTIP ! Layer with root tip #
REAL LSAW ! Leaf sheath area/wt cm2/g
REAL LSAWR ! Leaf sheath area/wt,end leaf cm2/g
REAL LSAWV ! Leaf sheath area/wt,veg.phases cm2/g
INTEGER LSEED ! Layer with seed #
REAL LSENE ! Leaf senescence,end stage #
REAL LSENEDU ! Leaf senescence,end stage #
REAL LSENI ! Leaf senescence,injury %/d
REAL LSENS ! Leaf senescence,start stage #
REAL LSENSDU ! Leaf senescence,start stage PVoCd
REAL LSEWF ! Leaf wt loss,normal senesce fr
REAL LSHAI ! Leaf sheath area index m2/m2
REAL LSHFR ! Leaf sheath fraction of total #
REAL LSHRSWAD ! Leaf sheath reserves weight kg/ha
REAL LSHRSWT ! Leaf sheath reserves g/p
REAL LSHWAD ! Leaf sheath weight kg/ha
REAL LSNDEM ! Leaf and stem N demand g/p
REAL LSNUM(HANUMX) ! Livestock number #/ha
REAL LSTAGE ! Leaf stage 0-1 over leaf phase #
REAL LSWT(HANUMX) ! Livestock weight (individual) kg
REAL LWPH ! Leaf weight harvested g/p
REAL LWPHC ! Leaf wt harvested,cumulative g/p
INTEGER MDAP ! Maturity date.Days>planting #
REAL MDAPFR ! Maturity DAP+fraction #
INTEGER MDAPM ! Maturity DAP,measured #
REAL MDAT ! Maturity date.Year+DOY #
INTEGER MDATERR ! Maturity date error d
INTEGER MDATM ! Maturity date,measured #
REAL MDATT ! Maturity date from t file YrDoy
REAL MDAYFR ! Maturity,fraction of day #
INTEGER MDOY ! Maturity day of year d
INTEGER MESSAGENO ! Number of Warning messages #
REAL MJPERE ! Energy per Einstein (300-170) MJ/E
INTEGER MSTG ! Maturity stage #
REAL NCNU ! NO3,NH4 conc factor,N uptake ppm
REAL NCRG ! N factor,root growth ppm
REAL NFG ! N factor,growth 0-1 #
REAL NFGCAV ! N factor,growth,average,cycle #
REAL NFGCC ! N factor,growh,cycle sum #
REAL NFGL ! N factor,gr,lower limit #
REAL NFGPAV(0:12) ! N factor,growth,average,phase #
REAL NFGPC ! N factor,growth,cumulative #
REAL NFGU ! N factor,gr,upper limit #
REAL NFLF(LNUMX) ! N factor for leaf,average #
REAL NFLFP(LNUMX) ! N factor phs leaf,average #
REAL NFP ! N factor,photosynthesis 0-1 #
REAL NFPCAV ! N factor,phs,average,cycle #
REAL NFPCC ! N factor,phs,cumulative,cycle #
REAL NFPL ! N factor,phs,lower limit #
REAL NFPPAV(0:12) ! N factor,phs,average,phase #
REAL NFPPC ! N factor,phs,cumulative,phase #
REAL NFPU ! N factor,phs,upper limit #
REAL NFRG ! N factor,root growth 0-1 #
REAL NFS ! N factor,senescence #
REAL NFSF ! N factor,final sen.trigger fr #
REAL NFT ! N factor,tillering 0-1 #
REAL NFTL ! N factor,tillering,lower limit #
REAL NFTU ! N factor,tillering,upper limit #
REAL NH4FN ! NH4 conc factor,NH4 uptake 0-1 #
REAL NH4LEFT(20) ! NH4 concentration in soil mg/Mg
REAL NLABPC ! N labile fraction,standard %
INTEGER NLAYR ! Number of layers in soil #
INTEGER NLAYRROOT ! Number of layers with roots #
INTEGER NLIMIT ! N limited grain growth (Days) #
REAL NO3FN ! NO3 conc factor,NO3 uptake 0-1 #
REAL NO3LEFT(20) ! NO3 concentration in soil mg/Mg
INTEGER NOUTPG ! Number for growth output file #
INTEGER NOUTPG2 ! Number for growth output file2 #
INTEGER NOUTPGF ! Number for growth factors file #
INTEGER NOUTPGN ! Number for growthN output file #
REAL NPOOLL ! Leaf N pool (ie.above minimum) g/p
REAL NPOOLNEED ! N required for grain growth g/p
REAL NPOOLR ! Root N pool (ie.above minimum) g/p
REAL NPOOLS ! Stem N pool (ie.above minimum) g/p
REAL NPTFL ! Minimum N uptake used by leaf frFR
INTEGER NSDAYS ! N stress days #
REAL NTUPF ! N top-up fraction /d
REAL NUF ! Plant N supply/demand,max=1.0 #
REAL NULEFT ! N uptake remaining for use g
REAL NULEFTL ! N uptake remaining fro leaves g
REAL NUPAC ! N uptake,cumulative kg/ha
REAL NUPACM ! N uptake,cumulative,measured kg/ha
REAL NUPAD ! N uptake rate (/d) kg/ha
REAL NUPAP ! Total root N uptake rate,potnl kg/ha
REAL NUPAPCSM ! Total N uptake rate,potnl,CSM kg/ha
REAL NUPC ! N uptake,cumulative g/p
REAL NUPD ! N uptake g/p
REAL NUPRATIO ! N uptake potential/demand #
REAL NUSEFAC ! N use factor;mx nuselim,navfr #
REAL NUSELIM ! N limit on N for grain filling #
INTEGER ON ! Option number (sequence runs) #
INTEGER ONI ! Option number,initial value #
INTEGER OUTCOUNT ! Output counter #
REAL PARFC ! Max photosynthesis/phs at 330 #
REAL PARIF ! PAR interception fraction #
REAL PARIF1 ! PAR interception fr,1-crop mdl #
REAL PARIFOUT ! PAR interception fr for output #
REAL PARIFPREV ! PAR interception fr,previous #
REAL PARIP ! PAR interception percentage %
REAL PARIPA ! PAR interception %, active %
REAL PARIUE ! PAR intercepted use efficiency g/MJ
REAL PARIUED ! PAR intercepted use efficiency g/MJ
REAL PARIX ! PAR interception,maximum,fr #
REAL PARMJC ! PAR,cumulative MJ/m2
REAL PARMJFAC ! PAR conversion factor MJ/MJ
REAL PARMJIADJ ! PAR intercepted adjustment MJ/m2
REAL PARMJIC ! PAR intercepted,cumulative MJ/m2
REAL PARU ! PAR utilization effic g/MJ
REAL PARU2 ! PAR use efficiency,afterchange g/MJ
REAL PARUE ! PAR use efficiency,standard g/MJ
REAL PARUEC ! PAR use efficiency to today g/MJ
REAL PARURFR ! PAR utilize factor,reprod fr #
INTEGER PATHL ! Path length #
REAL PD(0:PSX) ! Phase durations deg.d
REAL PD2ADJ ! Phase 2+3 adjusted deg.d
REAL PDADJ ! Phase duration adjustment deg.d
INTEGER PDATE ! Planting Yrdoy from X-file #
INTEGER PDAYS(0:12) ! Phase durations PVoCd
REAL PDFS ! Phase duration,final senescenc deg.d
REAL PDL(0:10) ! Phase durations,phint units #
REAL PDMTOHAR ! Phase duration,mature->harvest deg.d
REAL PDSRI ! Storage root initiation phase oC.d
REAL PECM ! Phase duration,emergence Cd/cm
REAL PEGD ! Phase duration,germ+dormancy deg.d
REAL PFGCAV ! P factor,growh,cycle,av 0-1 #
REAL PFGPAV(0:12) ! P factor,growh,phase,av 0-1 #
REAL PFPCAV ! P factor,phs,cycle,average 0-1 #
REAL PFPPAV(0:12) ! P factor,phs,phase,average 0-1 #
INTEGER PGDAP ! Plantgro file days after plt #
REAL PGERM ! Phase duration,germination deg.d
INTEGER PGROCOL(20) ! Plantgro column = t-file data #
REAL PGVAL ! Plantgro file value #
REAL PHINT ! Phylochron interval deg.d
REAL PHINTF(PHSX) ! Phylochron interval,factor lf# #
REAL PHINTL(PHSX) ! Phylochron interval,change lf# #
REAL PHINTOUT ! Phylochron interval,adjusted deg.d
REAL PHINTS ! Phylochron interval,standard deg.d
INTEGER PHINTSTG ! Phylochron stage #
REAL PHOTQR ! Photon requirement,calculated E/mol
REAL PHSV ! Phs,fr reduction with VPD /KPa
REAL PHTV ! Phs,threshold VPD for reduction KPa
REAL PLA ! Plant leaf area cm2
REAL PLAG(2) ! Plant leaf area growth,tiller1 cm2/t
REAL PLAGLF(LNUMX) ! Plant leaf area growth,by leaf cm2/t
REAL PLAGT(2) ! Plant leaf area growth,total cm2/p
REAL PLAGTP(2) ! Plant lf area growth,potential cm2/p
REAL PLAGTTEMP ! Plant leaf area gr,total,temp. cm2/p
REAL PLAS ! Leaf area senesced,normal cm2/p
REAL PLASC ! Leaf area senesced,cold cm2/p
REAL PLASCSUM ! Leaf area senesced,cold,summed cm2/p
REAL PLASFS ! Leaf area senesced,final sen cm2/p
REAL PLASI ! Leaf area senesced,injury cm2/p
REAL PLASL ! Leaf area senesced,low light cm2/p
REAL PLASN ! Leaf area senesced,N shortage cm2/p
REAL PLASP ! Leaf area senesced,phyllochron cm2/p
REAL PLASPM ! Leaf area senesced,post mature cm2/p
REAL PLASS ! Leaf area senesced,stress cm2/p
REAL PLAST ! Leaf area senesced,tiller loss cm2/p
REAL PLAST1 ! LA senesced,tiller,youngest co cm2/p
REAL PLAST2 ! LA senesced,tiller,2ndyonug co cm2/p
REAL PLASTMP ! Leaf area senesced,temporary cm2/p
REAL PLASTMP2 ! Leaf area senesced,temporary cm2/p
REAL PLASW ! Leaf area senesced,h2o stress cm2/p
REAL PLAX ! Plant leaf area,maximum cm2
INTEGER PLDAY ! Planting day of year d
INTEGER PLDAYTMP ! Planting day of year #
REAL PLMAGE ! Planting material age d
REAL PLPH ! Plants/hill or shoots/cutting #
REAL PLTLOSS ! Plant popn lost through cold #/m2
REAL PLTPOP ! Plant Population #/m2
REAL PLTPOPE ! Plant Population established #/m2
REAL PLTPOPP ! Plant Population planned #/m2
REAL PLWTGS ! Plant weight at grain set g/p
INTEGER PLYEAR ! Planting year #
INTEGER PLYEARDOY ! Planting year*1000+DOY #
INTEGER PLYEARDOYPREV ! Year+Doy for planting,previous #
INTEGER PLYEARDOYT ! Planting year*1000+DOY target #
INTEGER PLYEARTMP ! Year(Yr)+Doy,planting tem val #
REAL PPEXP ! Photoperiod response exponent #
REAL PPTHR ! Photoperiod threshold h
INTEGER PSDAP (PSX) ! Stage DAP #
REAL PSDAPFR(PSX) ! Stage DAP+fr #
INTEGER PSDAPM (PSX) ! Stage DAP,measured #
INTEGER PSDAT (PSX) ! Stage YrDoydate #
INTEGER PSDATM (PSX) ! Stage date,measured #
REAL PSDAYFR(PSX) ! Stage fraction of day #
INTEGER PSIDAP ! Principal stage,inter,date dap
INTEGER PSIDAPM ! Principal stg,inter,measured dap
INTEGER PSIDATERR ! Principal stage,inter,error dap
INTEGER PSNUM ! Principal stage number #
REAL PSTART(0:PSX) ! Principal phase thresholds du
REAL PTF ! Partition fraction to tops #
REAL PTFA ! Partition fr adjustment coeff. #
REAL PTFMN ! Partition fraction,minimum #
REAL PTFMX ! Partition fraction,maximum #
REAL PTTN ! Minimum soil temperature,plt C
REAL PTX ! Maximum soil temperature,plt C
INTEGER PWDINF ! First YrDoy of planting window #
INTEGER PWDINL ! Last YrDoy of planting window #
INTEGER PWDOYF ! First doy of planting window #
INTEGER PWDOYL ! Last doy of planting window #
INTEGER PWYEARF ! First year of planting window #
INTEGER PWYEARL ! Last year of planting window #
REAL RAIN ! Rainfall mm
REAL RAINC ! Rainfall,cumulative mm
REAL RAINCA ! Rainfall,cumulativ to anthesis mm
REAL RAINCC ! Precipitation cycle sum mm
REAL RAINPAV(0:12) ! Rainfall,average for phase mm
REAL RAINPC(0:12) ! Precipitation phase sum mm
REAL RANC ! Roots actual N concentration #
REAL RATM ! Boundary layer,air,resistance s/m
REAL RB ! Leaf resistance addition fac s/m
REAL RCROP ! Stomatal res,crop basis s/m
REAL RDGAF ! Root depth gr,acceleration fac #
REAL RDGS ! Root depth growth rate,standrd cm/d
INTEGER REP ! Number of run repetitions #
REAL RESCAL(0:20) ! Residue C at harvest,by layer kg/ha
REAL RESCALG(0:20) ! Residue C added,by layer kg/ha
REAL RESLGAL(0:20) ! Residue lignin,harvest,bylayer kg/ha
REAL RESLGALG(0:20)! Residue lignin added,layer kg/ha
REAL RESNAL(0:20) ! Residue N at harvest by layer kg/ha
REAL RESNALG(0:20) ! Residue N added,by layer kg/ha
REAL RESPC ! Respiration,total,cumulative g/p
REAL RESPGF ! Respiration,grain fill g/p
REAL RESPRC ! Respiration,roots,cumulative g/p
REAL RESPTC ! Respiration,tops,cumulative g/p
REAL RESWAL(0:20) ! Residue om added by layer kg/ha
REAL RESWALG(0:20) ! Residue om at harvest,by layer kg/ha
REAL RLDF(20) ! Root length density fac,new gr #
REAL RLF ! Leaf stomatal res,330.0 ppmCO2 s/m
REAL RLFC ! Leaf stomatal resistance s/m
REAL RLFN ! Root length factor,N #
REAL RLFNU ! Root length factor,N uptake cm/dm3
REAL RLFWU ! Root length factor,water uptk /cm2
REAL RLIGP ! Root lignin concentration %
REAL RLV(20) ! Root length volume by layer cm-2
REAL RLWR ! Root length/weight ratio m/10mg
REAL RM ! Mesophyll resistance d/m
REAL RMSE(30) ! Root mean square error values #
INTEGER RN ! Treatment replicate #
REAL RNAD ! Root N kg/ha
REAL RNAM ! Root N at maturity kg/ha
REAL RNAMM ! Root N at maturity,measured kg/ha
REAL RNCM ! Root N conc,minimum fr
REAL RNCMN(0:1) ! Root N conc,minimum fr
REAL RNCR ! Roots N relative to maximum #
REAL RNCX ! Root N concentration,maximum fr
REAL RNCXS(0:1) ! Roots N conc,maximum,by stage fr
REAL RNDEM ! Root demand for N g/p
REAL RNH4U(20) ! Potential ammonium uptake kg/ha
INTEGER RNI ! Replicate number,initial value #
REAL RNO3U(20) ! Potential nitrate uptake kg/ha
REAL RNPCMN(0:1) ! Root N conc,minimum %
REAL RNPCS(0:1) ! Roots N conc,standard,by stage %
REAL RNUMX ! Root N uptake,maximum mg/cm
REAL RNUSE(0:3) ! Root N use,overall and parts g
REAL ROOTN ! Root N g/p
REAL ROOTNS ! Root N senesced g/p
REAL ROWSPC ! Row spacing cm
INTEGER RPCOL ! Replicate column number #
REAL RRESP ! Root respiration fraction #
REAL RSADJ ! Stomatal res,adjusted Co2+H2o d/m
REAL RSCA ! Reserves conc,anthesis %
REAL RSCD ! Reserves concentration,end day fr
REAL RSCLX ! Reserves conc,leaves,max. #
REAL RSCM ! Reserves concentration,mature fr
REAL RSCMM ! Reserves conc,maturity,msured #
REAL RSCO2 ! Stomatal res,adjusted for Co2 d/m
REAL RSCS ! Reserves concentration,std #
REAL RSCX ! Reserves concentration,maximum fr
REAL RSEN ! Root senescence fraction #
REAL RSFP ! Reserves factor,photosynthesis fr
REAL RSFPL ! Reserves conc.,phs.lower bound fr
REAL RSFPU ! Reserves conc.,phs upper bound fr
REAL RSFRS ! Reserves fraction,standard #
REAL RSN ! Reserve N g/p
REAL RSNAD ! Reserve N kg/ha
REAL RSNEED ! Reserves need to bring to min g/p
REAL RSNPH ! Reserves N harvested g/p
REAL RSNPHC ! Reserves N harvested,cum g/p
REAL RSNUSE ! Reserve N use g
REAL RSOIL ! Soil resistance s/m
REAL RSTAGE ! Reproductive develoment stage #
REAL RSTAGEFS ! Rstage when final sen started #
REAL RSTAGEP ! Reproductive dc stage,previous #
REAL RSTAGETMP ! Reproductive develoment stage #
REAL RSUSE ! Reserves utilisation fraction #
REAL RSWAA ! Reserve weight,anthesis g/p
REAL RSWAAM ! Reserve wt,anthesis,measured g/p
REAL RSWAD ! Reserves weight kg/ha
REAL RSWADPM ! Reserves weight,post maturity kg/ha
REAL RSWAM ! Reserves at maturity kg/ha
REAL RSWAMM ! Reserves at maturity,measured kg/ha
REAL RSWPH ! Reserves weight harvested g/p
REAL RSWPHC ! Reserves wt harvested,cum g/p
REAL RSWT ! Reserves weight g/p
REAL RSWTA ! Reserves weight,anthesis g/p