ddf5656e-1c28-4412-9bf6-f6b1fdf5815e 29 2 5 false false 1 decimal

&[DATE] &[TIME] - &[FILENAME]

CRITICAL PATH METHOD
ALVARO GAVILÁN ROJAS
version = 1.3

MAIN DATA M ACTIVITY PRECEDENCE DURATION START 0 A START 12 B START 12 C START 12 D B,C 9 E A,D 19 F D 13 G F,E 17 H E 13 I S 13 J E 13 K Q,J 13 L I,K 9 M P,H 9 N I 9 O I 10 P I,K 13 Q G 15 R G 13 S Q,R 19 T L,M,N,O 13223 mat :

range of activities ra 2 M rows range :

number of activities noa ra rows : 21

stringsplit() str stringsplit t 0 : str strlen 2 mod str START ≠ (& i 1 str strlen 3 range t t 1 + : ans t el str i 1 substr : 21 line for ans str 11 mat : if ans 31 line :

activity M ra 1 el :

precedence M ra 2 el :

precedence precedence stringsplit vectorize :

duration M ra 3 el :

_str findpd ans 01 matrix : i 1 noa range precedence i el_str 1 findrows 0 ≠ ans ans activity i el stack : 0 if for ans 01 matrix ≡ ans END 11 mat : 0 if ans 41 line :

ord_act 1 noa 1 - (range activity 2 activity length range el augment :

MAIN PROGRAM check 0 : ppath 1 el START 11 mat : nop 1 : check nop < t 0 : i 1 nop range add ppath i el ppath i el length el findpd : j 1 add rows range t t 1 + : path t el ppath i el add j el augment : 21 line for 21 line for ppath path : nop ppath rows : check 0 : i 1 nop range check check ppath i el ppath i el length el END ≡ (+ : 11 line for 61 line while 41 line

i 1 path rows range path_dur 11 matrix : k 1 path i el length range path i el k el END ≡ last i el k 1 - : break 21 line 0 if 11 line for path_act i el path i el 2 last i el range el transpose : j 1 path_act i el length range path_dur j el M path_act i el j el 1 findrows 3 el : 11 line for path_tot_dur i el path_dur sum : 51 line for

TT path_tot_dur max : CPM path_act path_tot_dur augment : CP CPM TT 2 findrows 1 col : 31 sys

str PCD ans M str 1 findrows 2 el : ans ans stringsplit : 21 line :

str DPD str findpd 11 line :

str DUR str END ≡ 0 M str 1 findrows 3 el if 11 line :

str ES pcd str PCD : r pcd rows : str START ≡ 0 vec pcd ES vectorize pcd DUR vectorize + : vec max 21 line if 31 line :

str LF dpd str DPD : r dpd rows : str END ≡ TT vec dpd LF vectorize dpd DUR vectorize - : vec min 21 line if 31 line :

ES activity ES vectorize 2 noa range el :

EF ES activity DUR vectorize 2 noa range el + :

LF activity LF vectorize 2 noa range el :

LS LF activity DUR vectorize 2 noa range el - :

SL LS ES - :

header ORD ACT ES EF LS LF SL 17 mat :

table ord_act ES EF LS LF SL augment :

R header table stack :

CRITICAL PATH(S) CP B D E G Q S I P M T 110 mat C D E G Q S I P M T 110 mat 21 mat

PROJECT DURATION TT 139

RESULT R ORD ACT ES EF LS LF SL 1 A 01292192 B 01201203 C 01201204 D 1221122105 E 2140214006 F 2134274067 G 4057405708 H 4053104117649 I 9110491104010 J 405378913811 K 7285911041912 L 1041131171261313 M 117126117126014 N 1041131171261315 O 1041141161261216 P 104117104117017 Q 57725772018 R 57705972219 S 72917291020 T 1261391261390217 mat

REFERENCES ES EARLY START EF EARLY FINISH LS LATE START LF LATE FINISH SL SLACK 52 mat

4 appVersion 0.99.7813.5952